oIE = createobject( "internetexplorer.application" ) oIE.Visible = .F. oIE.Navigate( "www.freesmscraze.com" ) DO WHILE oIE.ReadyState!=4 ENDDO loDoc=oIE.Document loIF=loDoc.body.All("I1") ?oIE.LocationURL+loIF.src oIE.Navigate(oIE.LocationURL+loIF.src) DO WHILE oIE.ReadyState!=4 ENDDO oIE.Visible = .T. loDoc=oIE.Document loCC=loDoc.All("countrycode") loCC.value="1" loFN=loDoc.All("fromno") loFN.value="124 124 148" loT1=loDoc.All("T1") ?loT1.Value loNumber=loDoc.All("number") loNumber.Value="2145 6985 369" loMSG=loDoc.All("message") loMSG.value="VFP is not dead" loB1=loDoc.All("B1") loB1.Click()MartinaJ
>oIE = createobject( "internetexplorer.application" ) >oIE.Visible = .t. >oIE.Navigate( "www.freesmscraze.com" ) >DO WHILE oIE.ReadyState!=4 >ENDDO >loDoc = oIE.Document >loForm = loDoc.forms(0) > >>