Hãy cùng khám phá AutoIt Script

Liên hệ QC

levanduyet

Hãy để gió cuốn đi.
Thành viên danh dự
Tham gia
30/5/06
Bài viết
1,798
Được thích
4,704
Giới tính
Nam
Đôi khi chúng ta muốn tạo một lệnh để thực hiện các công việc thường ngày như:
_ Mở Excel.
_ Mở NotePad.
_ Thực hiện chương trình nào đó...
Tôi đề nghị các bạn dùng chương trình sau AutoIt
http://www.hiddensoft.com/
Đây là phần mềm mã nguồn mở. Các bạn hãy khám phá và cùng lập trình với AutoIt

Lê Văn Duyệt
 
Bạn Duyệt ơi, thế VBA của Excel không có câu lệnh nào để nhảy đến cửa sổ khác (không phải excel) đang mở sao ??
 
Mình mới lập 1 forum dành cho những người yêu thích khám phá ngôn ngữ lập trình này, mọi người có hứng thú thì vào góp ý với diễn đàn nha. Mình hi vọng AutoIt ở Việt Nam thực sự phát triển.
Địa chỉ: autoit123.goin.to
Tên mình: Lê Văn Thành
Nick: forget_me_not_please
Có gì các bạn liên hệ với mình nha
 
Mình mới lập 1 forum dành cho những người yêu thích khám phá ngôn ngữ lập trình này, mọi người có hứng thú thì vào góp ý với diễn đàn nha. Mình hi vọng AutoIt ở Việt Nam thực sự phát triển.
Địa chỉ: autoit123.goin.to
Tên mình: Lê Văn Thành
Nick: forget_me_not_please
Có gì các bạn liên hệ với mình nha
Bạn xem lại Link xem, mình click vào không Link được.

TDN
 
AutoIt.gif


Các bạn có thể tải phiên bản mới nhất tại đây:

http://www.autoitscript.com/

Nếu các bạn muốn thử nghiệm AutoIt cùng với SAP thì các bạn có thể xem tập tin SAP.rar đính kèm.

Enjoy it.

Lê Văn Duyệt
 

File đính kèm

  • SAP.rar
    5.9 KB · Đọc: 94
Mã:
;Đoạn code sau giúp tự động log on vào SAP
;Thực hiện saplogon.exe
;Tại folder C:\Program Files\SAP\FrontEnd\SapGui
ShellExecute("saplogon.exe","","C:\Program Files\SAP\FrontEnd\SapGui")

;Waiting for the Sreen "SAP Logon 640" was shown
WinActivate("SAP Logon 640")
;Chờ 1 giây
Sleep(1000)
Send("!l")
;Waiting for the sreen "SAP" was shown
WinActivate("SAP")

; Cach 1 - Hay hon
_SAPSessAttach("SAP")
_SAPObjValueSet("usr/txtRSYST-MANDT","Client của bạn")
_SAPObjValueSet("usr/txtRSYST-BNAME","User")
_SAPObjValueSet("usr/pwdRSYST-BCODE","Pass")
; Nhấn Enter
send("{ENTER}")
;Waiting for the sreen "SAP Easy Access"
WinActivate("SAP Easy Access")

Nếu dùng VBA, thì chúng ta cũng có thể làm việc này:
Mã:
 ' Create the Function control (that is, the high-level Functions collection):
    Set Functions = CreateObject("SAP.Functions")
    ' Set the rest of Connection object values:
    Functions.Connection.System = "DVL"
    Functions.Connection.client = "Client của bạn"
    Functions.Connection.user = "User"
    Functions.Connection.password = "pass"
    Functions.Connection.language = "EN"
    If Functions.Connection.Logon(0, False) <> True Then
       Exit Sub
    End If
Dĩ nhiên để kết nối được bạn phải được cấp quyền.

Thực sự còn rất nhiều điều hấp dẫn để các bạn đến với AutoIt.
Hy vọng sẽ giới thiệu các bạn một số ứng dụng đã được viết bằng AutoIt.

Lê Văn Duyệt
 
Xin hỏi A. Lê văn Duyệt: Có cách nào dùng AutoIt để "click" các nút của Toolbar excel không? Tôi dùng lệnh ControlClick theo hướng dẫn của AutoIt nhưng không được (Còn các VD của nó cho Notepad không dùng cho excel được !)
 
Web KT
Back
Top Bottom