upload af billede
Jeg har en fil der uploader et billede til en acces-db.Den kører fint lokalt, men når jeg ligger den på serveren virker den ikke.
filen ser således ud:
<%
Set Upload = Server.CreateObject("Persits.Upload")
' Capture files
'save =
dbShop_path = ".mdb"
Upload.Save "\img"
' Obtain file object
Set File = Upload.Files("billede")
If Not File Is Nothing Then
' Build ODBC connection string
connect = "Data Source="& dbShop_path &";Provider=Microsoft.Jet.OLEDB.4.0;"
' If you use SQL Server, the connecton string must look something like this:
' Connect = "Driver=SQL Server;Server=MYSRV;Database=master;UID=sa;PWD=xxx"
' Build SQL INSERT statement
SQL = "INSERT INTO sko (image_blob, billede, merke, model, tekst, farve, storrelse, pris,tilbudspris) VALUES(?, '"
SQL = SQL & File.Filename & "', '"
SQL = SQL & Replace(Upload.Form("merke"), "'", "''") & "','"
SQL = SQL & Replace(Upload.Form("model"), "'", "''") & "','"
SQL = SQL & Replace(Upload.Form("tekst"), "'", "''") & "','"
SQL = SQL & Replace(Upload.Form("farve"), "'", "''") & "','"
SQL = SQL & Replace(Upload.Form("storrelser"), "'", "''") & "','"
SQL = SQL & Replace(Upload.Form("pris"), "'", "''") & "')"
'SQL = SQL & Replace(Upload.Form("billede"), "'", "''") & "')"
' Save to database
File.ToDatabase Connect, SQL
Response.Write "File saved."
Else
Response.Write "File not selected."
End If
%>
Jeg får fejlen: object doesn't support this method "SQL Filename"
T.
