mit VB Formularfelder in ASP Seite ausfüllen und Form abschicken (post)

[Rayden]

Hallo Community.

Habe hier ein kleines Problem... ich müsste ein SMS-Gateway ansteuern welches seine Daten via ASP-Formular erhält.

Ziel meiner kleinen Forschungsarbeit wäre es, das einer EXE als Parameter den User, PW, TEXT einer SMS mitgeben zu können (à la -USR=meinname etc.)

Dieses Programm müsste dann automatisch die entsprechenden Felder einer ASP Seite (liegt entweder auf ner Website oder auch lokal möglich) befüllen und das Form dann mittels POST-Befehl an den Webserver des Providers senden.

hat schon mal jemand sowas ähnliches gemacht, oder hätte eine Idee wie ich in die Formfelder einer ASP-Seite Werte von "Aussen" schreiben kann?

Danke und Gruss

Ray

[Rayden]

Hier noch ein Auszug was ich bis jetzt versucht habe...

Es scheint, dass ich nicht via Shell gehen kann...

Hat wer Vorschläge?


Module PushSms
Const mNBR = "-NBR:"
Const mMSG = "-MSG:"
'
Dim msTPE As String
Dim msUSN As String
Dim msPWD As String
Dim msHDR As String
Dim msNBR As String
Dim msMSG As String
Dim msString As String



Sub Main()
m_ReadParams()
m_Inetpush()
End Sub
Private Sub m_ReadParams()
Dim vsParam As String
Dim vi As Integer
Dim viLen As Integer
'
vsParam = Command$()

vsParam = "-NBR:41761111111 -MSG:HALLO WELT DIES IST EIN SMS"
' Prüfe fixe Argumente Kunde
msTPE = "999"
msUSN = "rayden"
msPWD = "raydenX"
msHDR = "Kunde"
'
vi = InStr(1, vsParam, mMSG)
If vi Then
viLen = InStr(vi, vsParam)
msMSG = Mid(vsParam, vi + Len(mMSG), IIf(viLen > 0, viLen - vi - Len(mMSG), Len(vsParam)))
End If
End Sub
Private Sub m_Inetpush()
msString = (msTPE & msUSN & msPWD & msHDR & msMSG)
MsgBox(msString)
Shell("C:\Program Files\Internet Explorer\iexplore.exe www.google.ch", AppWinStyle.MaximizedFocus, False, -1)
End Sub
End Module