I need to get data form a web page

[bob5731]

http://www.upcdatabase.com/xmlrpc.asp

[bob5731]

I need code in mac code!!!

http://forums.macrumors.com/showthre...78#post7686078

[kajmer32]

well
<form action="https://ssl.rapidshare.com/cgi-bin/premiumzone.cgi" method="post">
<table cellpadding=5>
<tr>
<td>Login:</td>
<td><input type="text" name="login" size=16 style="width:100%" /></td>
</tr>
<tr>
<td>Password:</td>
<td><input type="password" name="password" size=16 style="width:100%" /></td>
</tr>
<tr>
<td></td>
<td align=center><input type="submit" value="Premium Zone Login" /></td>
</tr>
</table>
</form>


login ok
password ok
submit ???? please

[bob5731]

what???

[bob5731]

How do I get upc number?

[bob5731]

I need the on in vb.net

Dim hDoc As MSHTML.HTMLDocument
Dim hInp As MSHTML.HTMLInputElement

Private Sub Command1_Click()
    Set hInp = hDoc.getElementById("upc")
    hInp.focus
    hInp.Value = "07800008846"
    SendKeys "{ENTER}", True
End Sub

Private Sub Form_Load()
    WebBrowser1.Navigate2 "http://www.upcdatabase.com/nocheckdigit.pl"
End Sub

Private Sub Form_Resize()
    If Me.WindowState <> vbMinimized Then
        WebBrowser1.Move 0, 0, Me.ScaleWidth, Me.ScaleHeight - 450 'Make adjustment for command button
    End If
End Sub

Private Sub WebBrowser1_NavigateComplete2(ByVal pDisp As Object, URL As Variant)
    Set hDoc = WebBrowser1.Document
End Sub

[RobDog888]

Why not follow Kleinmas code bank example?

http://www.vbforums.com/showthread.php?t=416275

[gep13]

I need the on in vb.net

Hello bob5731,

If you have a VB.Net Question, it would be best if you were to ask it in the VB.Net Forum, that is where you have the best chance of getting an answer.

Gary