problem med upload

ASP

5 svar · 218 visningar · startad av dahlgren 17 dec. 2001

dahlgrenMedlem sedan aug. 20011 946 inlägg

Trådstart17 dec. 2001 20:50#1

Hur får jag detta att funka jag får föjande felmedelande:
Request object error 'ASP 0207 : 80004005'

Cannot use Request.Form

/dweb/intern/dokument/Upload.asp, line 22

Cannot use Request.Form collection after calling BinaryRead.

<%Set Upload = Server.CreateObject("Persits.Upload.1")Upload.Save("e:\docs")Set File = Upload.Files(1)FILE2=Request.Form("FILE2")DESCRIPTION=Request.Form("DESCRIPTION")CATEGORY=Request.Form("CATEGORY")Set Connection = Server.CreateObject("ADODB.Connection")Connection.Open "driver={Microsoft Access Driver (*.mdb)};DBQ="& Server.MapPath("/dweb/db/database.mdb")SQLStmt = "Insert into docs "SQLStmt = SQLStmt &  " (namn, beskrivning, kategori) "SQLStmt = SQLStmt &  " Values('" & FILE2 & "', " & DESCRIPTION & ", '" & CATEGORY & "')"Connection.Execute(SQLStmt)SET SQLStmt = NothingSQLStmt = "Select Max(Id) as senasteid from fotogalleri"SET RS = Connection.Execute(SQLStmt)senasteid = RS("senasteid")RS.CloseSET SQLStmt = NothingIf file.ImageType = "DOC" ThenExtension = "doc"End Iffilnamn = "dokument" & senasteid & "." & ExtensionFor Each File in Upload.FilesFile.Copy "e:\docs" & senasteid & "." & ExtensionFile.Delete NextSQLStmt = "Update docs "SQLStmt = SQLStmt & " SET namn = '" & Filnamn & "'"SQLStmt = SQLStmt & " Where Id = " & senasteidConnection.Execute(SQLStmt)SET SQLStmt = NothingConnection.Close%>

LarsGMedlem sedan dec. 200012 464 inlägg

17 dec. 2001 20:59#2

Du får använda den form som skapas av uploadkomponenten, upload.form istället för request.form

dahlgrenMedlem sedan aug. 20011 946 inlägg

18 dec. 2001 07:58#3

då fick jag genaast ett nytt felmedelande.
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'Lilla Julafton 01'.

/dweb/intern/dokument/Upload.asp, line 41

SQLStmt = "Insert into docs "
SQLStmt = SQLStmt &  " (namn, beskrivning, kategori) "
SQLStmt = SQLStmt &  " Values('" & upload.Form("FILE2") & "', " & upload.Form("DESCRIPTION") & ", '" & upload.Form("CATEGORY") & "')"
[b]Connection.Execute(SQLStmt)[/b]
SET SQLStmt = Nothing

Rad 41 är i fetstil är det nån som har något förslag.

@ndersMedlem sedan juni 200032 967 inlägg

18 dec. 2001 08:01#4

Är inte beskrivning av typen text/pm?

SQLStmt = "Insert into docs "
SQLStmt = SQLStmt & " (namn, beskrivning, kategori) "
SQLStmt = SQLStmt & " Values('" & upload.Form("FILE2") & "', '" & upload.Form("DESCRIPTION") & "', '" & upload.Form("CATEGORY") & "')"

Apostrofer runt i så fall.

Mvh,

dahlgrenMedlem sedan aug. 20011 946 inlägg

18 dec. 2001 08:19#5

Menar du så här?

SQLStmt = "Insert into docs "
SQLStmt = SQLStmt & " (namn, 'beskrivning', kategori) "
SQLStmt = SQLStmt & " Values('" & upload.Form("FILE2") & "', " & upload.Form("DESCRIPTION") & ", '" & upload.Form("CATEGORY") & "')"
Connection.Execute(SQLStmt)
SET SQLStmt = Nothing

DEt ger i alla fall samma felmedelande.

@ndersMedlem sedan juni 200032 967 inlägg

18 dec. 2001 08:34#6

Nej, jag menar som den SQL-frågan jag postade.

Apostrofer runt värdet, inte fältnamnet.

Mvh,