InetSendData2 Example for Visual Basic
Private Sub Command2_Click()
Dim s As String
Dim l As Integer
LEADNet1.EnableUseLEADRasterVariant
= False
s = "This is a test"
l = Len(s)
LEADNet1.InetSendData2
"This is a test", l, INETDATA_USER1
End Sub