#1
  1. No Profile Picture
    Registered User
    Devshed Newbie (0 - 499 posts)

    Join Date
    Dec 2011
    Posts
    23
    Rep Power
    0

    Sendkeys input save file .txt


    Hello I saved a text file who name is "qawerf.txt"
    in this file i saved this command

    Sleep (9000)
    SendKeys "TE1"
    SendKeys "{enter}"
    SendKeys "TES3"
    SendKeys "TES4"
    SendKeys "TES5"
    Sleep (100)
    SendKeys "{S 30}"
    Sleep (3000)
    SendKeys "{enter}"
    Sleep (1000)
    SendKeys "{S 30}"
    Sleep (100)
    SendKeys "{TAB 4}"
    Sleep (2000)
    SendKeys "%{TAB}"
    Sleep (2000)
    SendKeys "TE1"
    SendKeys "{enter}"
    SendKeys "TES3"
    SendKeys "TES4"
    SendKeys "TES5"
    Sleep (100)
    SendKeys "{S 30}"
    Sleep (3000)
    SendKeys "{enter}"
    Sleep (1000)
    SendKeys "{S 30}"
    Sleep (100)
    SendKeys "{TAB 4}"


    when i insert this code

    Private Sub sleep(Seconds As Double)
    Dim dblEndTime As Double
    dblEndTime = Timer + Seconds / 1000
    Do While dblEndTime > Timer
    DoEvents
    Loop
    End Sub


    Private Sub Timer1_Timer()
    Open ("c:\qswerf.txt") For Input As #1
    Dim a As String, b As String
    Do Until (EOF(1) = True)
    Input #1, a

    Loop
    Close #1
    End Sub

    BUT NOT WORK HOW CAN AUTO TYPE COMMAND
  2. #2
  3. Banned ;)
    Devshed Supreme Being (6500+ posts)

    Join Date
    Nov 2001
    Location
    Woodland Hills, Los Angeles County, California, USA
    Posts
    9,643
    Rep Power
    4247
    Thread moved to proper forum.
    Up the Irons
    What Would Jimi Do? Smash amps. Burn guitar. Take the groupies home.
    "Death Before Dishonour, my Friends!!" - Bruce D ickinson, Iron Maiden Aug 20, 2005 @ OzzFest
    Down with Sharon Osbourne

    "I wouldn't hire a butcher to fix my car. I also wouldn't hire a marketing firm to build my website." - Nilpo

IMN logo majestic logo threadwatch logo seochat tools logo