<code>
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

Private Sub Form_Load() 'replace the first argument with the URL of the file you want to download,
' and the second argument with the local file you want to save this file to.
ret = DownloadFile("http://www.adress.com/fil.txt", _
"c:\fil.txt")
End Sub
</code>

Med denna kod laddar jag ner en textfil. Den innehåller flera rader med text, som sedan ska läsas in en rad i taget. Men med nedladdningskoden verkar det bli nåt knas, för alla rader samlas på en rad (med ett obegripligt tecken emellan, typ radbryttecken). Öppnar jag textfilen i VB får jag in all text på ramma rad, detsamma om jag öppnar filen i Notepad/Anteckningar. Men om jag laddar ner filen med ett FTP-program är allt som det ska.

Så... tycker ni er se någon fel med nedladdningskoden ovan? Varför blir textfilen knas?