filetransfer ???

jeg har set noget med at man sender 2000 tegn af gangen er det fordi der ikke kan sendes mere eller er deet bare tilfældigt ???

Én af mange måder at gøre det på - Drop det her i et modul:

Private 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

Public 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


Nu kan du downloade en given fil ved at kalde funktionen DownloadFile, som returnerer True, hvis overførslen lykkes. Eks.:
Downloadfile("http://www.eksperten.dk/img/eksperten_logo.gif","C:\EksLogo.gif")

her er noget med winsock:
http://www.ostrosoft.com/vb/projects/transfer.html

Det skal være sådan at man kan overføre filer mellem en server og en client.

Eller søg efter Winsock i kategorien Visual Basic på www.planetsourcecode.com.

Jeg har lige siddet og leget med en AutoUpdate som skulle kunne opdatere en anden fil via ftp. (Det er desværre med INet) men der findes mange med Winsock

Og http://www.planetsourcecode.com/vb/scripts/ShowCode.asp?txtCodeId=10579&lngWId=1 som arbejder som server og client