27. marts 2002 - 10:47
Der er
27 kommentarer og 1 løsning
upload
Jeg har en fil der uploader et billede til en acces-db. Jeg bruger aspupload! 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") 'save = dbShop_path = ".mdb" Upload.Save "\img" Set File = Upload.Files("billede") If Not File Is Nothing Then connect = "Data Source="& dbShop_path &";Provider=Microsoft.Jet.OLEDB.4.0;" 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.
Annonceindlæg tema
Cloud & AI
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
27. marts 2002 - 10:48
#1
Hvis der er en der har en anden kode, så er den selvfølgelig velkommen!
27. marts 2002 - 10:49
#2
måske understøtter dit webhotel ikke den komponet!.
27. marts 2002 - 10:50
#3
kommer der nogen fejl??
27. marts 2002 - 10:51
#4
de skriver at de understøtter aspupload!
27. marts 2002 - 10:53
#5
hmm.. fejl??
27. marts 2002 - 10:54
#6
object doesn't support this method "SQL Filename"
27. marts 2002 - 11:06
#7
Come on! Anybody!!
27. marts 2002 - 13:39
#8
Prøv at ændre denne linie: File.ToDatabase Connect, SQL til Connect.Execute(sql)
27. marts 2002 - 13:41
#9
Eller placer din File.Filename i en variabel Filnavn = File.Filename Og lav så følgende: SQL = "INSERT INTO sko (image_blob, billede, merke, model, tekst, farve, storrelse, pris,tilbudspris) VALUES(?, '" SQL = SQL & Filnavn & "', '" 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 Connect.Execute(SQL) Response.Write "File saved." Else Response.Write "File not selected." End If
27. marts 2002 - 13:46
#10
nu får jeg: "Object required"
27. marts 2002 - 13:46
#11
Hvilken linie?
27. marts 2002 - 13:47
#12
linie 10 som er (Filnavn = File.Filename)
27. marts 2002 - 13:49
#13
Poster lige det script jeg selv bruger: Set Connect = Server.CreateObject("ADODB.Connection") Connect.Open "wolfpack" Set Upload = Server.CreateObject("Persits.Upload.1") Upload.OverWriteFiles = False Upload.Save Server.MapPath("./../../../images/billeder") & "\" Kategori = Upload.Form("kategori") Navn = replace(replace(Upload.Form("navn"),"'","´"),"""","´´") Beskrivelse = replace(replace(Upload.Form("beskrivelse"),"'","´"),"""","´´") Pic = Upload.Form("pic") Set Pic = Upload.Files("pic") If Pic is nothing Then Pic1 = "" Else Pic1 = Pic.ExtractFileName End if sql = "INSERT INTO Billeder (Kategori,Navn,Beskrivelse,Billede) VALUES ("&"'"&Kategori&"', '"&Navn&"', '"&Beskrivelse&"', '"&Pic1&"')" Connect.Execute(sql) Response.Redirect("download_pics.asp") Denne metode virker i hvert fald!
27. marts 2002 - 13:49
#14
lokalt var det nemt nok, fordi det bare var en acces db, problemet er at på serveren skal jeg bruge Provider=Microsoft.Jet.OLEDB.4.0;"
27. marts 2002 - 13:52
#15
hvad er Wolfpack?
27. marts 2002 - 13:54
#16
Det er bare min DSN-connection - den skal du bare rette til: Set Connect = Server.CreateObject("ADODB.Connection") dsn = "Data Source="& dbShop_path &";Provider=Microsoft.Jet.OLEDB.4.0;" Connect.Open "dsn" Set Upload = Server.CreateObject("Persits.Upload.1") Upload.OverWriteFiles = False Upload.Save Server.MapPath("./../../../images/billeder") & "\" Kategori = Upload.Form("kategori") Navn = replace(replace(Upload.Form("navn"),"'","´"),"""","´´") Beskrivelse = replace(replace(Upload.Form("beskrivelse"),"'","´"),"""","´´") Pic = Upload.Form("pic") Set Pic = Upload.Files("pic") If Pic is nothing Then Pic1 = "" Else Pic1 = Pic.ExtractFileName End if sql = "INSERT INTO Billeder (Kategori,Navn,Beskrivelse,Billede) VALUES ("&"'"&Kategori&"', '"&Navn&"', '"&Beskrivelse&"', '"&Pic1&"')" Connect.Execute(sql) Response.Redirect("download_pics.asp") Så skulle den være der!
27. marts 2002 - 13:58
#17
hvad er det: Pic = Upload.Form("pic")
27. marts 2002 - 13:59
#18
Det er en variabel der defineres som indholdet af formularfeltet "Pic" - den behøver du ikke, da Pic valideres længere nede i scriptet!
27. marts 2002 - 14:12
#19
Den kan ikke finde min DSN Den ser således ud: dbShop_path = "d:\butik.mdb"
27. marts 2002 - 14:18
#20
Set Connect = Server.CreateObject("ADODB.Connection") dbShop_path = ".mdb" dsn = "Data Source="& dbShop_path &";Provider=Microsoft.Jet.OLEDB.4.0;" Connect.Open "dsn" Set Upload = Server.CreateObject("Persits.Upload.1") Upload.OverWriteFiles = False Upload.Save Server.MapPath("./../../../images/billeder") & "\" Kategori = Upload.Form("kategori") Navn = replace(replace(Upload.Form("navn"),"'","´"),"""","´´") Beskrivelse = replace(replace(Upload.Form("beskrivelse"),"'","´"),"""","´´") Pic = Upload.Form("pic") Set Pic = Upload.Files("pic") If Pic is nothing Then Pic1 = "" Else Pic1 = Pic.ExtractFileName End if sql = "INSERT INTO Billeder (Kategori,Navn,Beskrivelse,Billede) VALUES ("&"'"&Kategori&"', '"&Navn&"', '"&Beskrivelse&"', '"&Pic1&"')" Connect.Execute(sql) Response.Redirect("download_pics.asp") Så skulle den være der!
27. marts 2002 - 14:25
#21
min kode ser såleds ud nu? Min den kan ikke finde min path: Upload.Save Server.MapPath("../nee/eshop/img")& "\" <% dbShop_path = "d:\skobutik.mdb" Set Connect = Server.CreateObject("ADODB.Connection") dsn = "Data Source="& dbShop_path &";Provider=Microsoft.Jet.OLEDB.4.0;" Connect.Open dsn Set Upload = Server.CreateObject("Persits.Upload.1") Upload.OverWriteFiles = False Upload.Save Server.MapPath("../nee/eshop/img")& "\" Set Pic = Upload.Files("billede") If Pic is nothing Then Pic1 = "" Else Pic1 = Pic.ExtractFileName End if SQL = "INSERT INTO sko (image_blob, billede, merke, model, tekst, farve, storrelse, pris,tilbudspris) VALUES(?, '" SQL = SQL & Filnavn & "', '" 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"), "'", "''") & "')" Connect.Execute(sql) %>
27. marts 2002 - 14:26
#22
Hvad siger fejlen?
27. marts 2002 - 14:27
#23
cannot find the path. og det er Upload.Save Server.MapPath("../nee/eshop/img")& "\"
27. marts 2002 - 14:28
#24
Så er det ikke din database den ikke kan finde...har du oprettet de mapper på serveren? Eller tester du det lokalt?
27. marts 2002 - 14:29
#25
jaja, resten af sitet fungerer, men kan det være at min db_path skal være virtuel?
27. marts 2002 - 14:38
#26
Ja - prøv det!
27. marts 2002 - 14:41
#27
Du får point, jeg stoler på at det nok skal lykkes på et tidspunkt. thx
27. marts 2002 - 14:53
#28
Okay - takker!
Kurser inden for grundlæggende programmering