upload

Fungerar för mig om jag tar bort

filename = Request.Form("FileName") 
Kommun = Request.Form("kommun") 
Namn = Request.Form("namn") 
Epost = Request.Form("epost") 
Telefon = Request.Form("telefon") 
Kategori = Request.Form("kategori") 
Anno = Request.Form("anno") 
Rubrik = Request.Form("rubrik") 
Beskrivning = Request.Form("beskriv")

Iofs säter jag int in något i en databas, men utskriften av sql-frågan blir ok.

Sorry @nders! Jag ändrat nu. Det blev faktist bättre!
Tack

Fungerar det om du tar bort raderna enligt solbulles senaste inlägg?

nej det gör det inte tror jag och han kunde inte testa med databas Nu tetstar jag igen! Kanske jag missta något

Ja nu funkar om jag tar väck som solbulle Jag gjorde ett miss för att jag tat väck datumet också därför funkade inte här.
problem 2:
om jag laddar inte upp bild då får jag fel meddelande:
-->Error Type:
Microsoft VBScript runtime (0x800A0005)
Invalid procedure call or argument: 'MidB'
/asp/n4/zzzz/real/re/Loader.asp, line 183

raden-->midValue = MidB(value, begPos, endPos - begPos)

problem 3:

Jag testat solbulles förslag när det gäller att döpa om filer med det här:
Dim pathToFile
newfilename = fileName
extension = right(newfilename,len(newfilename) - instr(newfilename,".") +1)
newtotalfilename = nameInput & extension
pathToFile = Server.mapPath("uploaded/") & "\" & newtotalfilename
' Uploading file data
Dim fileUploaded
fileUploaded = load.saveToFile ("file", pathToFile)

Den döper om bara en gång men då får man inget namn eller ändelse, så den funkar inte heller .

/cupy

request.form kan man inte använda vid multipart/form-data

man får använda .Item().Item("Value")

/T

Aha, såg att jag missade en del av koden.

Vad vill du ge din fil för namn, ska man skriva in det själv i formuläret?
I så fall, med eller utan filändelse?

nej det får man inte skriva in själv!
Kan man göra så här???
bild1.jpg
bild1.jpg(1)
bild1.jpg(2)
...osv
fast det spelar inget roll bara den funkar på något sätt!
/cupy

Solbulle,
Vad är det som du missade?

Nattugglor är vi allihopa... :)

Nja vad var det nu då... men hur som helst:

Den döper om bara en gång men då får man inget namn eller ändelse

Vad menar du med att den döper om en gång?
Men får inget namn?

Jag menar att När man laddar upp en bild då bilden hamnar i en mapp Jag körde din exempel och laddat upp en bild och fått en fil utan namn Jag laddat upp igen samma fil men den döper inte om den Resultatet blev samma (Förresten jag såg nu att ändelsen finns !!!! men inget namn)
/cupy

Dim pathToFile
	newfilename = fileName
	extension = right(newfilename,len(newfilename) - instr(newfilename,".") +1)
	newtotalfilename =  nameInput & extension 
		pathToFile = Server.mapPath("uploaded/") & "\" & newtotalfilename 
	' Uploading file data
	Dim fileUploaded
		fileUploaded = load.saveToFile ("file", pathToFile)

I dettalilla script skall det nya namnet på filen, utan filändlse vara i variabeln: nameInput , som jag har för mig var namnet på ett inmatningsfält i orginalscriptet.

Du kan ju testa att byta ut det namnet mot ett annat namn som tar emot data från ditt formulär, tex namn .
Detta BORDE ge din fil du laddar upp namnet som du datar in i formuläret, typ Anders samt ändelsen som det är på orginalfilen.

bild.gif --> Anders.gif

Testa!

Nej det funkar inte .
Ska vi ge upp? ......:-(