Sökvägen till fileupload filen?

Jag har lyckats göra så den lägger in en post i databasen. Fast det lägg inte in nåt i bild kollumnen. Bild kollumnen har jag döpt till blob.
Koden som tar emot datan ser ut såhär.

<%
' Author Philippe Collignon
' Email PhCollignon@email.com

Response.Expires=0
Response.Buffer = TRUE
Response.Clear
'Response.BinaryWrite(Request.BinaryRead(Request.TotalBytes))
byteCount = Request.TotalBytes
'Response.BinaryWrite(Request.BinaryRead(varByteCount))

RequestBin = Request.BinaryRead(byteCount)
Dim UploadRequest
Set UploadRequest = CreateObject("Scripting.Dictionary")

BuildUploadRequest RequestBin

'email = UploadRequest.Item("email").Item("Value")

contentType = UploadRequest.Item("blob").Item("ContentType")
filepathname = UploadRequest.Item("blob").Item("FileName")
filename = Right(filepathname,Len(filepathname)-InstrRev(filepathname,"\"))
value = UploadRequest.Item("blob").Item("Value")

'Ta emot

set Conn=server.createobject("adodb.connection")
	        path="DBQ=" & server.mappath("DB.mdb")
	        conn.open "driver={microsoft access driver (*.mdb)}; " & path," ",""
	        SQL = "Select * from pages"
	        set Rs = Server.CreateObject("ADODB.Recordset")
	        Rs.Open sql, conn, 3, 3
			
			Rs.Addnew
                
                
        Rs("blob") = blob

        Rs.Update

		Rs.close
        Conn.close

'Create FileSytemObject Component
Set ScriptObject = Server.CreateObject("Scripting.FileSystemObject")

'Create and Write to a File
pathEnd = Len(Server.mappath(Request.ServerVariables("PATH_INFO")))-14
' Set MyFile = ScriptObject.CreateTextFile(Left(Server.mappath(Request.ServerVariables("PATH_INFO")),pathEnd)&filename)
Set MyFile = ScriptObject.CreateTextFile(Server.mappath("test/"&filename))
response.write(Server.mappath(filename)) 

For i = 1 to LenB(value)
MyFile.Write chr(AscB(MidB(value,i,1)))
Next

MyFile.Close
%>
<b>Uploaded file : </b><%=filename%><BR>
<img src="test/<%=filename%>">
<!--#include file="upload.asp"-->

Rs("blob") = [b]value[/b]

------------------
essentitia preter non sans multiplicandum

Nu slängde den in i blob kollumnen men det blev inte namnet på bilden eller sökvägen utan såg ut såhär.

???Ã÷?????????????????????????????????????????????i??Z??F???????????????????????????????????????????????????????????????????????Y?????????????????????????????????????????K??????????????J?????&?????L????????Q

Vad är det för konstigt?
Skriver den ut hex kod eller vad?

Jag kanske missförstod vad du ville, men i ditt första skript så var variabeln blob aldrig definierad.

Som det är nu så stoppar man in själva bilden i databasen. Om du vill lagra filnamnet så borde det väl se ut så här

RS("blob") = Server.mappath("test/"&filename)

Jag blev nog vilseledd av ditt namn på kolumnen. Skall du inte lagra något annat än filnamnet?

------------------
essentitia preter non sans multiplicandum

Suveränt. Nu lägger den in sökvägen till bilden. Men när jag sedan hämtar id nummret ur databasen med request querystring så visar den sökvägen till bilden. Den öppnar alltså inte bilden.
Jag hämtar med
=Rs("blob")

Hur gör jag istället så att den öppnar sökvägen. Alltså exikverar den. Istället för att visa sökvägen?

Sökvägen som kommer upp är

d:\ftp\webservers\www.domän.se\xxxx\steve\test\bild.gif

  <IMG src=<%=rs("Blob")%>>

Något sådant kanske?

------------------
essentitia preter non sans multiplicandum

Den verkar inte kunna öppna en fil med en sån sökväg.

<IMG src="d:\ftp\webservers\www.domän.se\xxxx\steve\test\bilden.gif">

Jag måste ju kunna ändra så den inte skriver in hela sökvägen i databasen utan bara filnamnet.
Går det?

[Redigerat av Steveking den 21 aug 2001]

Japp! :)
http://script.webforum.nu/wf/Forum1/HTML/000078.html

------------------
Peter D

Ja, skippa server.mappath-delen

RS("blob") = "test/" & filename

Emission. Du äger! Tack =8)