CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

oyderke Nybegynder

23. september 2004 - 22:15 Der er 10 kommentarer og
1 løsning

upload og sql

Hej

Jeg har en side hvor jeg skal bruge aspuload til at uploade en fil og samtidig submitte noget data fra nogle textboxes.

Hvorfor lader det sig ikke gøre?

Mvh
oyderke

Synes godt om

oyderke Nybegynder

23. september 2004 - 22:17 #1

dataen skal forresten gemmes i en db med sql

Synes godt om

eagleeye Praktikant

23. september 2004 - 22:17 #2

Du kan havde alle de form felter du vil samme med fil upload når du bruger ASPupload. Du skal bare bruge nanvet på upload objectet når du henter form data:
upload.form("xxx") og ikke rewquest.form("xxx")

Synes godt om

eagleeye Praktikant

23. september 2004 - 22:27 #3

Eks, 1 fil og 2 input felter:

<%
if Request.ServerVariables("REQUEST_METHOD") = "POST" then

Set Upload = Server.CreateObject("Persits.Upload.1")

'ret denne hvor filen skal gemmes:
str = "/images/"
Count = Upload.Save (server.mappath(sti))

if Count>0 then
set file1=Upload.Files("file1")
end if

navn = Upload.form("navn")
email = Upload.form("email")

Set conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("db.mdb") & "; UID=Administrator; PWD="
conn.open DSN

sql = "insert into tabelnavn (billede, navn, email) values ('" & sti & file1.name & "', "
sql=sql & "'" & navn & "', "
sql=sql & "'" & email & "', "
sql=sql & ")"
Conn.Execute(sql)
Conn.Close
set conn=nothing
set upload=nothing

Response.write "Filen uploaded og data gemt i databasen"
end if
%>
<html>
<head></head>
<body>
<form action="<%=Request.ServerVariables("SCRIPT_NAME")%>" method="POST" ENCTYPE="multipart/form-data">
<br>Navn: <input type="text" name="navn">
<br>Email: <input type="text" name="email">
<br>Fil: <input type="file" name="file1">
<br><input type="submit" name="upload" value="upload">
</form>
</body>
</html>

Synes godt om

oyderke Nybegynder

23. september 2004 - 22:28 #4

Hvad så hvis jeg har noget validering som gør at indtaste-siden bliver reloaded hvis det forkerte er indtastet?

Synes godt om

eagleeye Praktikant

23. september 2004 - 22:34 #5

Man bliver nød til at kalde .Save før det virker så kan man skrive det lidt om:

<%
if Request.ServerVariables("REQUEST_METHOD") = "POST" then

Set Upload = Server.CreateObject("Persits.Upload.1")
Count = Upload.Save

'henter form input
navn = Upload.form("navn")
email = Upload.form("email")

'valider form input her
if navn = "admin" then response.redirect "fejlside.asp"

'Gem filen ret denne hvor filen skal gemmes:
sti = "/images/"
filnavn=""
for each file in upload.files
file.SaveAs Server.Mappath(sti & file.name)
filnavn = sti & file.name
next

'Gem i databasen
Set conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("db.mdb") & "; UID=Administrator; PWD="
conn.open DSN

sql = "insert into tabelnavn (billede, navn, email) values ('" & filnavn & "', "
sql=sql & "'" & navn & "', "
sql=sql & "'" & email & "', "
sql=sql & ")"
Conn.Execute(sql)
Conn.Close
set conn=nothing
set upload=nothing

Response.write "Filen uploaded og data gemt i databasen"
end if
%>

Synes godt om

oyderke Nybegynder

23. september 2004 - 22:43 #6

Jeg bruger dette. Den gemmer filen men gemmer ikke i databasen. Min textbox hedder TxtNavn.
------------------
Dim objUpload
Set objUpload = Server.CreateObject("Persits.Upload")
On Error Resume Next
Dim strUploadPath
strUploadPath = "Dokumenter/"
objUpload.Save(Server.MapPath(strUploadPath))

Set DBConn = Server.CreateObject("ADODB.Connection")
DBConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=D:\Inetpub\Dh\Data.mdb"
SQL = "INSERT INTO Test " &_
"VALUES ('" & objUpload.Form("TxtNavn") & "')"
DBConn.Execute(SQL)
DBConn.close
Set DBConn = Nothing

Set objUpload = Nothing

Synes godt om

eagleeye Praktikant

23. september 2004 - 22:45 #7

Prøv at udkommenter linjen: On Error Resume Next
'On Error Resume Next

Så skulle du få en fejl hvis der kommer en fejl på siden.

Men prøv at angive det kolonnenavn teskten skal lægges i:
SQL = "INSERT INTO Test " &_

Eks:
SQL = "INSERT INTO Test (navn) " &_

Synes godt om

oyderke Nybegynder

23. september 2004 - 23:03 #8

Kan det være at forskellen er om jeg putter: enctype="multipart/form-data" i <form>?
for den kan ikke uploade hvis den ikke er der, og den kan ikke gemme i db hvis den er der..

Synes godt om

eagleeye Praktikant

23. september 2004 - 23:08 #9

Ja det kan gøre en forskel.
enctype="multipart/form-data skal være i <form> tagen for det virker.

Synes godt om

oyderke Nybegynder

23. september 2004 - 23:21 #10

Skidegodt så virker det. Mange tak for hjælpen. Svar lige for point

Synes godt om

eagleeye Praktikant

23. september 2004 - 23:22 #11

Ok her et svar :)

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Lost focus Af bsn i ASP	0	07/11/202415:34	-
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02
Optimer MySql table med ASP Af poulmadsen i ASP	4	26/04/202417:16	26/04/202418:37
JSON Af ingeman i ASP	3	07/04/202417:53	08/04/202412:09

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS

23/12

Historisk million-bøde får Region Syddanmarks it-direktør til at efterlyse nye GDPR-retningslinjer

23/12

Til næste år kommer iPhone 17 – og ifølge rygtestrømmene vil den byde på tre nyheder

23/12

En af verdens største it-distributører dropper samarbejdet med Broadcom: Kunne ikke nå til enighed

23/12

Ser med 'stor alvor' på problemer med vand, varme og manglende kontrol i politiets datacenter

23/12

Brugere rammes af Microsoft-fejl: M365-produkter er på mystisk vis blevet deaktiveret

23/12

Her er dommen: Region Syddanmark skal betale historisk stor bøde for grove overtrædelser af GDPR

23/12

Vores vidensindsamling og demokratiske samtale påvirkes af helt lukkede beslutninger i en enkelt privat virksomhed

23/12

Overblik: Danske it-selskaber strømmer ind mod den centrale storby - og det handler ikke om penge

23/12

Banebrydende ChatGPT-opdatering er lige på trapperne: “Denne model vil være helt fantastisk til programmering”

23/12

Tivoli søger ny CIO: Kenneth Hartvig stopper efter tre år på posten

23/12

Vi ender med at bo i en taber-region, hvis ikke vi gør noget drastisk - her er digitaliseringsministerens plan

Vis flere artikler

IT-JOB

Hemmersbach Denmark ApS

IT Fieldservice Tekniker med fokus på hardware

Semler Gruppen

Business Analyst til Semler IT

KMD A/S

Senior Customer Success Project Lead

DSV

CSV Specialist for our IT Healthcare department

DSV

Data Mapping Analyst - Transform raw data to tangible output for new Data Platform

Vis flere jobs

Seneste spørgsmål Seneste aktivitet

I går 16:03	Fjern "Seneste" - "Hurtig adgang" Fra Windows 11 - Hvordan ? Af Ikke-ekspert i Windows
23/1214:43	html <Input.. Danske bogstaver Af pjotre i Andet software
23/1214:35	Brænde musik fra usb drev til cd Af Caso i Andet hardware
21/1222:16	Er "OneDrive" et "Must" ? Koster det penge ? Af Ikke-ekspert i Windows
21/1216:42	Windows Media Player - Hvilken version (Versioner) er gode til at afspille og kopiere ? Af Ikke-ekspert i Musik & videoafspillere