Results 1 to 5 of 5

Thread: Please make this program for me?

  1. #1

    Thread Starter
    New Member
    Join Date
    Nov 2001
    Posts
    9

    Question Please make this program for me?

    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]

  2. #2

    Thread Starter
    New Member
    Join Date
    Nov 2001
    Posts
    9
    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

  3. #3
    DaoK
    Guest
    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!

  4. #4
    DaoK
    Guest
    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 !

  5. #5
    DaoK
    Guest
    VB Code:
    1. Declare Function URLDownloadToFile Lib "urlmon" _
    2. Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL _
    3.  As String, ByVal szFileName As String, ByVal dWReserved As _
    4.  Long, ByVal lpfnCB As Long) As Long
    5.  
    6.  
    7. Function DownloadFile(URL As String, LocalFilename As String) As Boolean
    8.     Dim lngRetVal As Long
    9.     lngRetVal = URLDownloadToFile(0, URL, LocalFilename, 0, 0)
    10.     If lngRetVal = 0 Then DownloadFile = True
    11. End Function
    12.  
    13. 'Usage:
    14. If DownloadFile("http://www.hello.com/hi.zip","C:\myZip.zip") Then    
    15.     Msgbox "downloaded successfully."
    16. Else
    17.    Msgbox "download failed."
    18. End if

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width