Uploadscript av PatrikB och Override.. rörigt! hehe

crisse6Medlem sedan dec. 20002 526 inlägg

Frågan12 maj 2004 17:08#1

Hej!

Försöker använda mig av uploadskriptet ni killar satte ihop.... Vill nu veta hur och var man sätter in db-koppling så bildnamnet förs in i databasen osv..
Sen så har jag två fält som man ska kunna döpa "titel" på bilden, alltså för info i databasen och sen vart bilden togs samt sätta in datum då den laddades upp....

help me!

crisse6Medlem sedan dec. 20002 526 inlägg

12 maj 2004 17:23#2

Kör orginalet nu... behöver ju bara ladda upp och föra in lite i db...

Men får Operation not allowed
Kolla koden jag har gjort:

[red]
<%
option explicit

Dim objUpload
Dim strFullPath

	Set objUpload = New overrUpload
	
		With objUpload
			.InputFormName		= "UploadFile"
			.UploadPath 		= "uppladdat/"
			'.NewFileName		= "myFileName"
			.NewFileName 		= .GetRandomName(10) 	'# Random filename
			.UploadFile
			
			strFullPath 		= .UploadedFilePath
		End With
		
	

Set objConn = Server.CreateObject("ADODB.Connection") 
	objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("bilder.mdb")

strTitel = objUpload.Form("titel")
strVart = objUpload.form("vart")
strDatum = Date()

strSQL = "Insert into pics (titel, vart, sokvag, datum) "&_
	"Values ('"&strTitel&"','"&strVart&"','"&strFullPath&"','"&strDatum&"')"
objConn.execute strSQL,,128
Set objUpload = nothing

response.redirect "default.asp?success=1&path=" & strFullPath
%>
<!--#include file="clsOverrUpload.asp"-->

och då är line 47 i clsOverrUpload.asp:

RequestBin = Request.BinaryRead(byteCount)

Va i liksom?