Problemmer med aspupload når der skal downloades
Jeg bruger download funktionen i aspupload. Men den laver noget underligt. Jeg laver en tekst fil med e-mail adresser som skal downloades, men den tekst fil som jeg får downloadet indeholder noget af koden fra min side.case "find"
' Da der skrives log af de veje der ikke bliver lagt i databasen skal vi bruge FSO
Dim fso, f, filespec
Set fso = CreateObject("Scripting.FileSystemObject")
' Find den fysiske placering af tekstfilen
filespec = Server.Mappath("EmailAdresser.txt")
Set f = fso.OpenTextFile(filespec,2)
sql = "SELECT * FROM kunder WHERE klubnr=" & session("klubnr")
set rs = conn.execute(sql)
do while not rs.eof
adresseListe = adresseListe & rs("email") & ";"
rs.movenext
loop
rs.close
f.WriteLine adresseListe
f.close
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
mySmartUpload.DownloadFile("EmailAdresser.txt")
end select
