ฟอรั่มของบล็อก http://pssix.blogspot.com


รบกวนผู้รู้ เขียนสคริป Login ไอดีหน้าเวปนี้ให้หน่อยครับ

Share

sandweekly
มือใหม่เพิ่งสมัคร
มือใหม่เพิ่งสมัคร


จำนวนข้อความ : 1
ความนิยม : 0
เข้าร่วมเมื่อ : 12/04/2013

รบกวนผู้รู้ เขียนสคริป Login ไอดีหน้าเวปนี้ให้หน่อยครับ

ตั้งหัวข้อ by sandweekly on 05/01/16, 04:40 pm

รบกวนขอสคริป Login หน้าเวป [You must be registered and logged in to see this link.] หรือเวปต่างๆ

ผมอยากได้แต่เขียนไม่เป็นช่วยแนะนำหน่อยนะครับ em229
avatar
sak
PSsix Member Class II
PSsix Member Class II


จำนวนข้อความ : 34
ความนิยม : 0
เข้าร่วมเมื่อ : 26/11/2017

Re: รบกวนผู้รู้ เขียนสคริป Login ไอดีหน้าเวปนี้ให้หน่อยครับ

ตั้งหัวข้อ by sak on 11/12/17, 08:59 am

sandweekly พิมพ์ว่า:รบกวนขอสคริป  Login หน้าเวป [You must be registered and logged in to see this link.] หรือเวปต่างๆ

ผมอยากได้แต่เขียนไม่เป็นช่วยแนะนำหน่อยนะครับ em229

โปรแกรม camfrog จะเหลือ NickName หรือ ชื่อผู้ใช้ไว้ให้ ไม่ต้องกรอก
ฉนั้น.. จะส่งคีย์ กรอกเฉพาะช่อง Password และ SignOn เพื่อเข้าระบบให้เท่านั้น

Code:

#NoTrayIcon
Local $pid = Run(@ProgramFilesDir & "\Camfrog\Camfrog Video Chat\Camfrog Video Chat.exe")
If $pid = @error then Exit
if ProcessExists($pid) then
    if WinWaitActive("Camfrog Video Chat") then ;active program
        Local $Password = "xxx123"
       If ControlGetText("Camfrog Video Chat", "", "[CLASS:CEditTS; INSTANCE:1]")<> $Password Then ;checked password
           ControlSetText("Camfrog Video Chat", "", "[CLASS:CEditTS; INSTANCE:1]", $Password) ;send password
            ControlFocus("Camfrog Video Chat", "", "[CLASS:CButtonTS; INSTANCE:3]") ;focus control passw
            ControlSend("Camfrog Video Chat", "", "[CLASS:CButtonTS; INSTANCE:3]", "{Enter}") ;send ctrl logon
       Else
          ControlFocus("Camfrog Video Chat", "", "[CLASS:CButtonTS; INSTANCE:3]") ;focus ctrl
            ControlSend("Camfrog Video Chat", "", "[CLASS:CButtonTS; INSTANCE:3]", "{Enter}") ;send ctrl logon
        EndIf
    EndIf
EndIf
if Not ProcessExists($pid) then Exit

    เวลาขณะนี้ 19/06/18, 03:43 pm