Consulting

Results 1 to 4 of 4

Thread: End Loop after submitBtnClick

  1. #1

    End Loop after submitBtnClick

    With Vba I open some website, login (UName+Pw).
    After clicking SubmitBtn in Website i need that Loop ended.

    I was using this:
    [vba]
    Do
    intResponse = MsgBox("A you done?", _
    vbYesNo + vbQuestion + vbSystemModal)

    If intResponse = vbYes Then
    GoTo 10
    Else
    End If
    Loop
    10
    [/vba]


    But MsgBox is behind the Website i.e. not realy visible.

    [vba]
    Sub Going_Postal()
    Dim IE As Object
    Set IE = CreateObject("InternetExplorer.Application")
    With IE
    .navigate "http:xxxxxx"
    Do While .Busy: DoEvents: Loop
    Do While .readyState <> 4: DoEvents: Loop
    IE.Visible = True
    Do
    With .document.forms(1)
    ' .submit ' Works OK with this VBa command
    End Loop when submit clicked manually???
    End With
    Loop

    Do While .Busy: DoEvents: Loop
    Do While .readyState <> 4: DoEvents: Loop

    End With

    ' Do something...

    IE.Quit: Set IE = Nothing
    End Sub
    [/vba]
    Last edited by omnibuster; 07-26-2009 at 08:13 AM.

  2. #2
    VBAX Contributor
    Joined
    Feb 2009
    Posts
    103
    Location
    With Vba I open some website, login (UName+Pw).
    After clicking SubmitBtn in Website i need that Loop ended.
    is the website you're talking about you created by yourself or it is a third party site? if it is a third party site i don't think that would be possible.. but if you created the site then maybe you can put in the code on that 'SubmitBtn' and pass the arguments back to your vba..hmmm..just an idea..maybe some expert around here got a better idea to achieve what you're trying to do

  3. #3
    No.This is not my website.

    I think: SubmitButtonClick is same as EnterClick or MouseClick on the SubmitButton.
    So: If "Enter" Clicked or MouseClick used (clickevent) then End Loop.

  4. #4
    Thanks for looking here, but still need HELP.
    How end Do...Loop process with User EnterClick.
    [VBA]
    Do

    Loop Until Enter.Clicked
    [/VBA]

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •