I would like a program that by the click of a button opens up a text file from my site in a frame, lets users fill out a simple form and the submit it so it e-mails it to me, please if some1 can do this for me please e-mail me at [email protected]
Printable View
I would like a program that by the click of a button opens up a text file from my site in a frame, lets users fill out a simple form and the submit it so it e-mails it to me, please if some1 can do this for me please e-mail me at [email protected]
I want a good lookin background on it and it to be about as big as 2 clenched fists wide and 1 up. I want the data fields to be:
Working Network: (data field here)
Time Until Delivered: (data field here)
Free SMSC Number (data field here)
I want this part of the program to load up in a new window (quite small and call it submit.
So the two buttons i want are "Get List" and "Submit"
the link i want the get list button to link to is http://www.ultimategsmboard.f2s.com/smsc.txt (as u can guess i want this to open up in the frame, and at the bottom can you put Copyright GsmUltra.com.kg 2001-2002 if you need any more info please just ask me, if some1 does kindly make this for me e-mail all the files afterwards to [email protected] <- my fastest e-mail address (do not use that 1 in the program though if you do need to use 1 in the program use [email protected] but it is not up and running yet but it will be soon.
Thanks Alot all
Make a search in that forum for that API download and it will download the file you want in the web adress you want very easily!
Make a search in that forum for that API download and it will download the file you want in the web adress you want very easily !
VB Code:
Declare Function URLDownloadToFile Lib "urlmon" _ Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL _ As String, ByVal szFileName As String, ByVal dWReserved As _ Long, ByVal lpfnCB As Long) As Long Function DownloadFile(URL As String, LocalFilename As String) As Boolean Dim lngRetVal As Long lngRetVal = URLDownloadToFile(0, URL, LocalFilename, 0, 0) If lngRetVal = 0 Then DownloadFile = True End Function 'Usage: If DownloadFile("http://www.hello.com/hi.zip","C:\myZip.zip") Then Msgbox "downloaded successfully." Else Msgbox "download failed." End if