Autoit ile HubSpot uygulamasına veri getirme hakkında.

Katılım
29 Ekim 2010
Mesajlar
365
Excel Vers. ve Dili
Microsoft Office 365 ProPlus 64 bit
Altın Üyelik Bitiş Tarihi
31-05-2024
Arkadaşlar merhaba ,

Şirketim Outlook kullanmaktan HubSpot adlı mesajlaşma sistemine geçti ve daha önce ekli senaryoyu kullanarak işlemleri kolayca halledebiliyordum AUTOİT Programı ile lakin chorme yada expoler den bir türlü açtıramadım HubSpot uygulamasını .

HubSpot'ta kullanmak için bir senaryo üretmeme yardımcı olabilir misiniz rica etsem.?
 

Ekli dosyalar

Katılım
24 Nisan 2005
Mesajlar
3,671
Excel Vers. ve Dili
Office 2016 EN 64 Bit
Altın Üyelik Bitiş Tarihi
25/05/2022
HubSpot nedir? Nasıl bir işlem yapılacak.
Ekli dosya sanırım outlook ile ilgili olan. İnternet üzerinden ulaşılabilen bir uygulamamı.
Ekran görüntüleri var mı?

Daha detay verilebilirse belki birşeylar yapılabilir.
 
Katılım
29 Ekim 2010
Mesajlar
365
Excel Vers. ve Dili
Microsoft Office 365 ProPlus 64 bit
Altın Üyelik Bitiş Tarihi
31-05-2024
Evet üstad internet üzerinden ulaşılabilen bir uygulama konuyu çözümlemdim WinWaitActivate kodlaması ile şuan gayet iyi bizde yeniyiz :) çıktıkça senaryoda düzenleme yapacağım .

Başka bir senaryoda bir sorunum var rica etsem kontrol edebilir misiniz , video olarak hazırladım sıkıntımı bir türlü kurgulayamadım senaryo yu .
If winexists ile yapmaya çalışıyorum lakin programdan yazı yada veri gelmediği için veri olmayan bölgeyi senaryoya göstereceğim birtürlü başaramdım destek olabilir misiniz rica etsem .

Senaryomdaki 92 satırdaki durumda yardıma ihtiyacım bir ip ucu yada kodlama hakkında yardımcı olabilir misiniz rica etsem.


https://www.hizliresim.com/7w2n4zn
 

Ekli dosyalar

Katılım
29 Ekim 2010
Mesajlar
365
Excel Vers. ve Dili
Microsoft Office 365 ProPlus 64 bit
Altın Üyelik Bitiş Tarihi
31-05-2024
Üstad konuya bakabilme imkanınız oldumu acaba ,aklıma bir dikir geldi ama kodlandıramadım .
Şöyle yapsak olur 92 satırdaki durum belirli bir süre sonra excel açtırıyor ,excel açılırsa açılmaz ise döngüye ona göre devam etse diye yapsak olabilir mi acaba ,

Yaklaşık 7000 sorgulama yapacak senaryo .
 
Katılım
24 Nisan 2005
Mesajlar
3,671
Excel Vers. ve Dili
Office 2016 EN 64 Bit
Altın Üyelik Bitiş Tarihi
25/05/2022
Üstad konuya bakabilme imkanınız oldumu acaba ,aklıma bir dikir geldi ama kodlandıramadım .
Şöyle yapsak olur 92 satırdaki durum belirli bir süre sonra excel açtırıyor ,excel açılırsa açılmaz ise döngüye ona göre devam etse diye yapsak olabilir mi acaba ,

Yaklaşık 7000 sorgulama yapacak senaryo .
Tam anlamadım ama buradaki aktif aktif değil sorgusu yararlı olur mu?
Excel teklif.xlsx dosyası aktif değil ise exit yapıp program kapatılabilir.

C#:
#include <AutoItConstants.au3>
#include <MsgBoxConstants.au3>

; aktif pencere başlığı bulma yöntemi
Opt("WinTitleMatchMode", 1) ;1=start, 2=subStr, 3=exact, 4=advanced, -1 to -4=Nocase

;Excel teklif.xlsx dosyası açılıyor.
$oExcel = ObjCreate("Excel.Application")
$oExcel.Workbooks.Open (@ScriptDir & "\teklif.xlsx").Sheets (1).Select ()
$oExcel.Visible = True
;Excel dosyası açıldıktan 10 sn sonra bilgi girişine başlanacaktır.
Sleep(5000)
Local $satir=0

;Excel teklif.xlsx dosyasının açılması 5 sn bekleniyor.
WinWait("teklif.xlsx","",5)
;Excel teklif.xlsx dosyasını aktif pencere yapıyor.
WinActivate("teklif.xlsx")

;Excel teklif.xlsx dosyasının aktif olup olmadığı kontrol ediliyor.
If WinActive("teklif.xlsx") Then
    MsgBox($MB_SYSTEMMODAL, "", "WinActive" & @CRLF & "Excel teklif.xlsx aktif.")
Else
    MsgBox($MB_SYSTEMMODAL, "", "WinActive" & @CRLF & "Excel teklif.xlsx aktif değil.")
EndIf
 
Katılım
29 Ekim 2010
Mesajlar
365
Excel Vers. ve Dili
Microsoft Office 365 ProPlus 64 bit
Altın Üyelik Bitiş Tarihi
31-05-2024

Ekli dosyalar

Katılım
24 Nisan 2005
Mesajlar
3,671
Excel Vers. ve Dili
Office 2016 EN 64 Bit
Altın Üyelik Bitiş Tarihi
25/05/2022
burada exit else endif içinde değil.
Program excel kontrolü yaptığı gibi kapanacaktır.

Kod:
WinWait("teklif.xlsx","",5)
WinActivate("teklif.xlsx")
If WinActive("teklif.xlsx") Then
    MsgBox($MB_SYSTEMMODAL, "", "WinActive" & @CRLF & "Excel aktif.")
Else
    MsgBox($MB_SYSTEMMODAL, "", "WinActive" & @CRLF & "Excel aktif değil.")
EndIf

;5 kayıt için 5 daha fazlası için bu rakam arttırılabilir
Exit
Bu şekilde denediniz mi?
Kod:
WinWait("teklif.xlsx","",5)
WinActivate("teklif.xlsx")
If WinActive("teklif.xlsx") Then
    MsgBox($MB_SYSTEMMODAL, "", "WinActive" & @CRLF & "Excel aktif.")
Else
    MsgBox($MB_SYSTEMMODAL, "", "WinActive" & @CRLF & "Excel aktif değil.")
    Exit
EndIf

;5 kayıt için 5 daha fazlası için bu rakam arttırılabilir
 
Katılım
29 Ekim 2010
Mesajlar
365
Excel Vers. ve Dili
Microsoft Office 365 ProPlus 64 bit
Altın Üyelik Bitiş Tarihi
31-05-2024
Üstad ilgin için teşekkürler 7 nolu mesajdaki kodlar ile end ve if yerlerini değiştirerek işlem çözüldü verileri aldım :) 7500 tane excelim oldu .artık seneye 9000 olur .

Hubspot internet üzerinden ulaşılabilen bir crm programı outlook u çok aratıyor bana autoıt senaryosunu uyguladım çalışıyor lakin ekrandaki tablolar değişebiliyor onun için send (tab) fazla yada eksik kalabiliyor bunun yerine aşağıda ekran görüntüsü bulunan bölgede tuş mevcut autoıt e şöyle diyebilir miyiz send (tab ) yerine ekranda bulunan o tuşa bas (attach file) denilebilir mi ?

Ben bir kaç deneme yaptım ama oranın hangi buton olduğunu bulamadım au3 ınfo ile masue kordinatının ve ilgili tuşa basınca ne oluyor diye baktım ama herhangi bir buton olarak görmüyor burayı summary bilgileri aşağıdaki gibidir. bu işin kısa bir yolu var mıdır sayfadaki butona bas gibi .


Çok olmaz ise bir sorum daha olacak outlok ta kullandığım makroyu internet tabanlı bu mesajlaşma siteminde uyarlamak mümkün olur mu ? outlokta email adreslerini birleştirme için kullandığım bir macro mevcuttu.




Kod:
ExStyle:    0x00000100
Handle:    0x000201C2

>>>> Control <<<<
Class:    Intermediate D3D Window
Instance:    1
ClassnameNN:    Intermediate D3D Window1
Name:   
Advanced (Class):    [CLASS:Intermediate D3D Window; INSTANCE:1]
ID:   
Text:   
Position:    0, 0
Size:    1280, 680
ControlClick Coords:    897, 605
Style:    0x5C000000
ExStyle:    0x00280024
Handle:    0x000403CE

>>>> Mouse <<<<
Position:    897, 605
Cursor ID:    0
Color:    0xFAFAFA

>>>> StatusBar <<<<

>>>> ToolsBar <<<<

>>>> Visible Text <<<<
Chrome Legacy Window


>>>> Hidden Text <<<<
 

Ekli dosyalar

Katılım
24 Nisan 2005
Mesajlar
3,671
Excel Vers. ve Dili
Office 2016 EN 64 Bit
Altın Üyelik Bitiş Tarihi
25/05/2022
..... bunun yerine aşağıda ekran görüntüsü bulunan bölgede tuş mevcut autoıt e şöyle diyebilir miyiz send (tab ) yerine ekranda bulunan o tuşa bas (attach file) denilebilir mi ?
fastfind imagesearch eklentilerini araştırın.
Sırası geldiğinde ekranda bu buton resmini aratın. Bulduğunda mouseclick ile tıklama yaptırırsınız.

Çok olmaz ise bir sorum daha olacak outlok ta kullandığım makroyu internet tabanlı bu mesajlaşma siteminde uyarlamak mümkün olur mu ? outlokta email adreslerini birleştirme için kullandığım bir macro mevcuttu.
İlgili programın vba desteği var mı sormanız gerekiyor.
SAP gibi bazı programlarda bu tür macro destekleri oluyor.
 
Üst