Har suttit o grejat med detta lite idag. Kom på att det *borde* gå att göra ett simpelt upload script med hjälp av Filesystemobject, men det funkar bara lite halvt...
<%
Dim FsoObj, StrAndelse, StrFil
Set FsoObj = server.CreateObject("Scripting.FileSystemObject")
FsoObj.CopyFile ""&request.form("fil")&"", ""&server.mappath("mappen")&"\"
StrAndelse = Fsoobj.getExtensionName(""&request.form("fil")&"")
StrFil = ""&request.form("Fil")&""
StrFil = right(StrFil, instrrev(StrFil, "\"))
response.write(""&request.form("namn")&" laddade upp <b>"&StrFil&"</b><P>Filen hade ändelsen "&StrAndelse&"")
%>
Detta funkar när jag kör lokalt. Filen man väljer ska alltså kopieras till C:\inetpub\wwwroot\test\mappen\.
Problemet kommer sen när jag ska ha upp filerna på en server, hur skriver jag då? Testade med typ http://ip-numret till min server (modem), men det funkade ju såklart inte. :\
Vad vet jag, kanske det inte funkar alls? Eller varför har jag inte sett någon annan göra på detta sätt, går det jättelångsamt eller? Om det går långsamt eller inte gör iofs inget, för det är bara mkt små filer jag har att göra med.
Om någon kunde knäcka nöten skulle jag bli mycket glad.
************************
Det som fuckar är alltså:
Den letar efter sökvägen att lägga filen i på besökarens dator, inte på servern. När den upptäcker att besökaren inte har någon mapp som heter c:\inetpub\wwwroot\test\mappen\ så blir det fel, och allt brister.
Hur pekar man om det så att den letar på servern som sidan ligger på istället? :}
************************