Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Chriss Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: krieg313
  • Content: Threads
  • Order by date
  1. krieg313

    Better method for while ieobj,busy Doevents

    Is there a better way to tell the browser to wait until a page has loaded to continue? I've tried while ieobj.busy doevents wend do while ieobj.busy loop and even variable1 = ieobj.document.all.getelementsbytagname("td").length while ieobj.document.all.getelementsbytagname("td").length <...
  2. krieg313

    OLE Get URL from Clicked Linked.

    Well the title says it all, how would i get the url of the link i just clicked? Dim ObjForTesting As Object Dim Link As Object Dim ElementCol As Object Set ObjForTesting = CreateObject("InternetExplorer.Application") With ObjForTesting .Visible = True .navigate...
  3. krieg313

    Get URL path after Clicking on Link

    Well the title says it all, how would i get the url of the link i just clicked? Dim ObjForTesting As Object Dim Link As Object Dim ElementCol As Object Set ObjForTesting = CreateObject("InternetExplorer.Application") With ObjForTesting .Visible = True .navigate...
  4. krieg313

    Automate OK Dialog Box Click in OLE

    How can I stop Dialog Boxes / Error Messages from opening in my OLE object "IBMReflection"? here is the code: Private Sub cmdQuery_Click() Dim hostpassword As String Dim Session As Object Const SessionCon = "149.83.123.3" Set Session = CreateObject("ReflectionIBM.Application") With Session...
  5. krieg313

    Copy/Paste from OLE to Access 2003

    I am having trouble pasting data from my OLE object below. The code logs in to an application, goes into a certain screen and then from a certain position to another it copies text, which is not in any format whatsoever. here is an example: SPECIAL BROKER PULL 0 0...
  6. krieg313

    Automation of VB enter key

    I'd like to have the code press enter after a certain amount of characters have been entered in a textbox. This is what i have but it doesn't work. Private Sub Text0_KeyDown(Keycode As Integer, shift As Integer) 'Dim str As String Dim str As Object Set str = Text0 'str = "1234567" If...
  7. krieg313

    Code works on IE 6 but not IE 7

    The Code below was made in access 2003 and tested on IE6 and it worked fine, but after testing it on ie7 it gives off errors such as Object variable not defined, or Subscript out of range Sub Kick_Off_Log_In() Const str_usr = "qcc04" Const str_pw = "qc" Dim username As...
  8. krieg313

    VBA String Manipulation

    Hello, I need help extracting certain parts of a String that I pulled Using ie.Doc.Body.InnerText, the problem is that the text i need is all in one line, I need a way to tell the Code to stop when it sees a certain character or string. I've tried messing around with instr() but no luck. Here...

Part and Inventory Search

Back
Top