Använder denna för att ladda upp en fil.
Vill dock lägga till lite info i min access-databas samtidigt, men den verkar ignorera den delen av koden. Filen hamnar där den ska, men ingenting skrivs till databasen.


<code>
<%
' Uppladdningskoden

If Request("action") = "upload" Then

' Startar en funktion som finns längre ner i koden
Dim fil
Set fil = get_upload_files()

' Koden som laddar upp filen med hjälp av funktionen
Dim plac, filen, innehall
innehall = fil("upload").Item("content")

Set filen = filer.CreateTextFile(mapp2 & "\" & extract_filename(fil("upload").Item("filename")))
For plac = 1 to LenB(innehall)
filen.Write chr(AscB(MidB(innehall, plac, 1)))
Next

If Request.Form("PM") = "" Then
pm = "(N/A)"
Else
pm = Server.HTMLEncode(Request.Form("PM"))
End If

usrID = Session("usrID")

Set rs = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * From image WHERE 1=2"
rs.Open SQL, Connection, 1, 2

rs.AddNew
rs("Album") = Request.Form("album")
rs("Owner") = usrID
rs("Source") = filen
rs("Date") = Now
rs("PM") = pm
rs.Update
rs.Close

filen.Close
Set filen = Nothing

%>

<script language="JavaScript">
{

alert('Jaaa, det här gick ju bra! =)');

document.location.href = 'add_image.asp'

}
</script>

<!--#INCLUDE FILE="inc_upload.asp"-->

<%

End If

%>
</code>

Jag ser inte någonstans att du öppnar någon databas =).. men jag kan ha fel..

mvh
//Jonnie

sant!

men den ligger där, lite högre upp.. fick inte med den när jag kopierade koden bara.

Du kan inte hämta värden i Request. Eftersom den inte kan tolka dem när du bifogar filer.

ok.. hur ska jag göra då? :(

Testa att skriva ut allt som finns i post-datat... Sedan kan du klura lite på hur du fixar en egen funktion som gör det... (för jag har för mig att det skickas upp till servern ändå)

Läs igenom kursen på http://www.pellesoft.se/login/articles/asp/fileupload.asp så ser du hur du får tag på dina objekt.

//Anna-Karin

Förstår inte mkt av den artikeln. Inte lust att skriva ett exempel med min kod (högst upp i tråden) som bas?

Vore jättesnällt!

Snälla? :)

jämrför
<info>
-----------------------------7d117c2c490276
Content-Disposition: form-data; name="test"; filename=
"C:\testDoc.txt"
Content-Type: text/plain

test upload file.
-----------------------------7d117c2c490276
Content-Disposition: form-data; name="filename"

userSpecified
-----------------------------7d117c2c490276
Content-Disposition: form-data; name="userSpecifiedName"

Test.txt
-----------------------------7d117c2c490276--
</info>

med


<info>
<form action="upload.asp" enctype="multipart/form-data" method="post" name="f" id="f">

Välj en fil att ladda upp:<br>
<input type="file" name="test" size="50"><br>
<input type="radio" name="filename" value="original" checked>Använd originalnamnet
<br>
<input type="radio" name="filename" value="userSpecified">Använd följande namn:
<input type="text" name="userSpecifiedName" value="">
<br>
<input type="submit" value="skicka filen">
</form>
</info>

Så kanske du kan klura ut hur du skall göra... Pelle hade visst skrivit nå'n funktion som gör det där, men jag förstod inte riktigt hur han hade tänkt sig att man skulle använda den... Mitt förslag är iaf. att du först loopar igenom det som skickas upp och letar reda på alla ställen där det är formulär-data... Sedan tar du och stoppar in det i en array.

Till sist har du en funktion som kan loopa igenom din array efter fältnamn och retunera värdet. Inte så svårt, bara lite sträng-hantering

Tack för hjälpen! Tyvärr förstår jag inte ditt exempel... Kan du vara mer precis eller kanske använda min kod (första posten i denna tråd) för att skriva ett exempel?

Tack!

Snälla! Skulle verkligen behöva den här koden.. Tack!