LarsK
Active Member
Hi, the code is developed over a long time, so No.
But I can help you getting started.
Create a VB Project, Add Microsoft Internet Transfer 6.0 (SP6)
Insert a TextBox named "Text1" and Command1 Button.
Code:
Private Sub Command1_Click()
Text1.Text = Inet1.OpenURL("http://" & "UserName" & ":" & "Password" & "@" & "192.168.0.15" & "/" & gett1.cgi & "")
End Sub
Will show Temp Sensor #1 Value in Text1.
Edit Username, Password, Ip Adress in the code.
A easy way of playing arround is to add textboxes instead and play with the code.
You can also use variables so you avoid doing something wrong inside the code.
Just remember to remove the " " when adding Boxes.
Happy Programming!!!
But I can help you getting started.
Create a VB Project, Add Microsoft Internet Transfer 6.0 (SP6)
Insert a TextBox named "Text1" and Command1 Button.
Code:
Private Sub Command1_Click()
Text1.Text = Inet1.OpenURL("http://" & "UserName" & ":" & "Password" & "@" & "192.168.0.15" & "/" & gett1.cgi & "")
End Sub
Will show Temp Sensor #1 Value in Text1.
Edit Username, Password, Ip Adress in the code.
A easy way of playing arround is to add textboxes instead and play with the code.
You can also use variables so you avoid doing something wrong inside the code.
Just remember to remove the " " when adding Boxes.
Happy Programming!!!