Link i db til billeder

Har jeg formuleret mig uklart? Det kan ikke passe at ingen kender løsningen på mit lille problem. Jeg har set det foreslået flere steder, bare ikke hvordan.

Kom med det script du bruger til at uploade...

ok, her kommer det

<%

Response.Expires = 0

Set fbase = Server.CreateObject("Chili.Upload.1")

fbase.SizeLimit = 10000

fbase.SaveToFile("/opt/datafiles/test.dat")

%>

Done writing <%=fbase.FileSize%> bytes from user file <%=fbase.SourceFileName%> (of type <%=fbase.SourceFileExtension%>)

nowoe> Hjalp det ikke at se mit script?
Er der andre, som kan hjælpe?

Jeg har lidt svært ved at se hvad dit problem er...
Jeg går ud fra at du i din asp side allerede har oprettet connection og command objecter til databasen.
Ligeledes har du også oprettet en passende tabel i databasen til at indeholde dine fil-stier

Set fbase = Server.CreateObject("Chili.Upload.1")
fbase.SizeLimit = 10000

FILSTI = Server.mapPath("/") & "/" & "test.dat"

fbase.SaveToFile( FILSTI )

cnn.execute("INSERT INTO FilStiTabel (filstier) VALUES (" & FILSTI & ")")

hvor cnn er dit connection object til databasen.

Mit problem er blandt andet at min database ligger på en anden server end mit website og er forbundet med dette med en DSN forbindelse.
Det eneste jeg har er ovennævnte script som uploader filer til en mappe på serveren.

Når du laver en forbindelse til database fra asp, gør du normalt noget lignende det her:
Dim objConn
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.ConnectionString = **********************
objConn.Open

Stjernerne ovenfor skal så erstattes med en connectionstring hvor du bla. angiver hvilken database driver, database og server du vil forbinde til.
Mere hjælp til at lave din connectionstring kan findes her: http://www.connectionstrings.com/

Jeg tror jeg er ved at fatte en smule. Jeg har check på, hvordan jeg laver databaseforbindelsen. Hvad skal der stå i parantesen (filstier).

Hvis det nu lykkes at få db'en til at virke, hvordan henter jeg så billederne igen.

Feltnavnet i en tabel i databasen hvor du vil gemme linket

Mit script ser nu sådan ud. Desværre skriver det intet til databasen!

<%


Response.Expires = 0

Set fbase = Server.CreateObject("Chili.Upload.1")

fbase.SizeLimit = 100000



FILSTI = Server.mapPath("/") & "/" & "test.dat"

fbase.SaveToFile( FILSTI )

' Databaseforbindelse
ConnString = "DSN=riishojwebsoftdkdsn"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ConnString



strSQL ="INSERT INTO biler (Filstier) VALUES (" & FILSTI & ")"
conn.execute(strSQL)

' Rydder op efter os
Conn.Close
Set Conn = Nothing

%>

Done writing <%=fbase.FileSize%> bytes from user file <%=fbase.SourceFileName%> (of type <%=fbase.SourceFileExtension%>)

Giver den ingen fejlbesked?

prøv at lave en
response.write strSQL
lige efter du har sat en værdi i den, hvad står der?

Nej, jeg får ingen fejlmeddelelse. Hvor skal jeg indsætte

response.write strSQL

lige efter
strSQL ="INSERT INTO biler (Filstier) VALUES (" & FILSTI & ")"
conn.execute(strSQL)

Det eneste den skriver er

Du har succesfuldt uploadet pic3.jpg

Sorry. Jeg har brugt det forkerte script. Her er det rigtige. Hvordan laver jeg det om, så jeg også får uploadet et link til databasen?

<html>
    <body bgcolor="#ffffff">
        <p>
<%
Response.Expires = 0

Set fbase = Server.CreateObject("Chili.Upload.1")
dim strSentence, arrWords, strOneWord, element
strSentence = fbase.SourceFileName
strSentence = Trim(strSentence)
arrWords = Split (strSentence, "\", -1, 1)
element = UBound(arrWords)
' Response.Write("Element = ")
' Response.Write(element)
Response.Write("<BR> Du har succesfuldt uploadet ")
Response.Write(arrWords(element))
Response.Write("<BR>")

fbase.SizeLimit = 100000

fbase.SaveToFile ("/home/sites/site122/web/upload/filer/" & arrWords(element))
%>

        </p>
    </body>

</html>

Samme som tidligere bare med en anden FILSTI
FILSTI = Server.mapPath("/") & "/" & arrWords(element)

Får en fejl som siger

Chili.Upload.1 error '80020009'

Cannot access file outside of application root.

/upload/upload.asp, line 37

hvad står der i linie 37?

fbase.SaveToFile ("/home/sites/site122/web/upload/filer/" & arrWords(element))??

Ja, linie 37 er ganske rigtig det du skriver. Her er hele scriptet.

<%
Response.Expires = 0

' Databaseforbindelse
ConnString = "DSN=riishojwebsoftdkdsn"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ConnString



Set fbase = Server.CreateObject("Chili.Upload.1")
dim strSentence, arrWords, strOneWord, element
strSentence = fbase.SourceFileName
strSentence = Trim(strSentence)
arrWords = Split (strSentence, "\", -1, 1)
element = UBound(arrWords)
' Response.Write("Element = ")
' Response.Write(element)
Response.Write("<BR> Du har succesfuldt uploadet ")
Response.Write(arrWords(element))
Response.Write("<BR>")

fbase.SizeLimit = 100000
FILSTI = ("home/sites/site122/web/upload/filer/" & arrWords(element))
fbase.SaveToFile ("home/sites/site122/web/upload/filer/" & arrWords(element))


strSQL ="INSERT INTO biler (Filstier) VALUES (" & FILSTI & ")"
conn.execute(strSQL)
response.write strSQL

' Rydder op efter os
Conn.Close
Set Conn = Nothing

%>

Så har jeg fået det til at virke! Jeg havde glemt at sætte / foran home i
fbase.SaveToFile ("home/sites/site122/web/upload/filer/" & arrWords(element))

Desuden skal

strSQL ="INSERT INTO biler (Filstier) VALUES (" & FILSTI & ")"
laves om til

strSQL ="INSERT INTO biler (Filstier) VALUES ('" & FILSTI & "')"

Hvad nu? Hvordan henter jeg billedet via linket i databasen. Den sti som bliver skrevet i db er jo en relativ sti.

Hmm, måske skulle du bare sætte
strSQL ="INSERT INTO biler (Filstier) VALUES ('" & arrWords(element) & "')"

..ind i DBen, så står der bare filnavnet.
Du ved jo allerede at den ligger i /home/sites/site122/web/upload/filer/

OK, kan du ikke lige sende et svar, da du jo har besvaret og løst mit problem. Jeg vil da gerne af med nogle point.

takker :)

Selv tak. Det du har hjulpet med er en del af et større projekt, som jeg forsøger at få til at hænge sammen, så det kan være, at du kan hjælpe med det, men det vil jeg oprette som et nyt spørgsmål.