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

j-kay Nybegynder

03. maj 2001 - 13:22 Der er 9 kommentarer

Upload til database

Er det muligt at tage en fx. kommasepareret fil, og uploade den til en access database, som automatisk sætter den op i nogle predefinedere kolonner..

Database kolonner:

Filnavn - filstørrelse - sti - O.S.V

Synes godt om

stoffer Nybegynder

03. maj 2001 - 14:34 #1

ikke via ASP, du bliver nødt til at lave et såkaldt \"upload script\" som splitter din fil og indsætter / opdaterer databasen. Sådan gør jeg og det virker fint.

Synes godt om

j-kay Nybegynder

03. maj 2001 - 14:42 #2

Har du et eksempel på det?

Synes godt om

stoffer Nybegynder

03. maj 2001 - 14:46 #3

jeg kan desværre ikke vise mit eksempel.

men du skal først gemme din CSV med filesystem object

derefter tager du at splitter du for hver linje i din CSV fil, og derefter putter du i et array.

herefter kan du loope en masse update sætninger igennem.

/stoffer

Synes godt om

stoffer Nybegynder

03. maj 2001 - 14:46 #4

Synes godt om

sth Novice

03. maj 2001 - 22:23 #5

jeg fandt denne på activerserverpages

Eksempel der viser hvordan man ved hjælp af SA FileUp kan uploade forskellige filer til Access (f.eks. ZIP, JPG, GIF, DOC etc.). Dette eksempel er begænset til GIF og JPG (kan nemt ændres).

adressen er:
http://www.activeserverpages.dk/download/default.asp?mode=showdownload&id=104

Synes godt om

j-kay Nybegynder

04. maj 2001 - 20:44 #6

Hvis der er nogen der kan give et konkret eksembel, så vil jeg blive møj glad!!

Synes godt om

j-kay Nybegynder

04. maj 2001 - 20:44 #7

Hvis der er nogen der kan give et konkret eksembel, så vil jeg blive møj glad!!

Synes godt om

sth Novice

06. maj 2001 - 14:42 #8

jamen så ok da.
her er det

<%
Set myConn = Server.CreateObject(\"ADODB.Connection\")
myConn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"/aspdigital/db/images.mdb\")

intID = Request.QueryString(\"id\")

If Request.QueryString(\"mode\") = \"show\" Then
\' Denne kode fremviser den ønskede fil
strSQL = \"SELECT Image_Type, Image_Data FROM Images WHERE (ImageID = \" & intID & \");\"
Set rs = myConn.Execute(strSQL)
If Not rs.EOF Then
Response.ContentType = rs(\"Image_Type\")
Response.BinaryWrite rs(\"Image_Data\")
End If
\' Her frigives Connection objektet fra hukommelsen
myConn.Close
Set myConn = Nothing
Response.End
ElseIf intID > 0 Then
strMsg = \"Det valgte billede er: <img src=upload_access.asp?mode=show&id=\"& intID &\">\"
End If

\' Her skabes FileUp objektet
Set objUpl = Server.CreateObject(\"SoftArtisans.FileUp\")

\' Her sættes en begrænsning på 10 kb.
If objUpl.Form(\"upload\") <> \"\" Then
\' Hvis formen er blevet submitted
strFilename = objUpl.Form(\"f1\").UserFilename
strFileExt = Mid(strFilename, InstrRev(strFilename, \".\") + 1)
If objUpl.Form(\"f1\").IsEmpty Then
strMsg = \"Du skal vælge en fil\"
ElseIf LCase(strFileExt) <> \"gif\" AND LCase(strFileExt) <> \"jpg\" Then
strMsg = \"Du skal vælge enten et GIF eller JPG fil!\"
ElseIf objUpl.TotalBytes > 10000 Then
strMsg = \"Billedet fylder mere end 10 Kb., vælg venligst et andet!\"
Else
\' Her gemmes filen i databasen
Set rsBlob = Server.CreateObject(\"ADODB.RecordSet\")
rsBlob.Open \"Images\", myConn, 1, 3
rsBlob.AddNew
objUpl.Form(\"f1\").SaveAsBlob rsBlob.Fields(\"Image_Data\")
rsBlob.Fields(\"Image_Type\") = objUpl.Form(\"f1\").ContentType
rsBlob.Fields(\"Image_Name\") = Mid(strFilename, InstrRev(strFilename, \"\\\") + 1)
rsBlob.Update
intID = rsBlob(\"ImageID\")
rsBlob.Close
\' Her frigives vores recordset fra hukommelsen
Set rsBlob = Nothing
\' Tekst der viser hvad filnavnet er og hvor meget filen fylder
strMsg = \"Filen \" & strFilename & \" er uploaded til databasen, og fylder \" & objUpl.TotalBytes & \" bytes.\" &_
\"<img src=upload_access.asp?mode=show&id=\"& intID &\">\"
End If
End If

\' Her frigives FileUp objektet fra hukommelsen
Set objUpl = Nothing
%><html><head>
<title>Upload til Access</title>
</head><body>
<%=strMsg%>
<form method=\"POST\" enctype=\"multipart/form-data\" action=\"upload_access.asp\">
<input type=\"file\" size=\"20\" name=\"f1\">
<input type=\"submit\" name=\"upload\" value=\"Upload\">
Bemærk: I dette eksempel er der sat en maks. begrænsning på 10 kb.
</form>
<%
\' Her skrives der link til de eksisterende objekter i databasen
strSQL = \"SELECT ImageID, Image_Name FROM Images ORDER BY Image_Name\"
Set rs = myConn.Execute(strSQL)
If Not rs.EOF Then
Response.Write \"Objekter i databasen: <ul type=square>\"
Do While Not rs.EOF
Response.Write \"<li><a href=upload_access.asp?id=\" & rs(\"ImageID\") & \">\" & rs(\"Image_Name\") & \"</a></li>\"
rs.MoveNext
Loop
Response.Write \"</ul>\"
End If
\' Her frigives Connection objektet fra hukommelsen
myConn.Close
Set myConn = Nothing
%>
</body></html>

Synes godt om

stoffer Nybegynder

08. maj 2001 - 12:26 #9

Ja upload af en fil er basic.. du kan finde 500 eksempler her på eksperten.

Du siger du vil have eksempler, du skal kombinere flere ting.

lidt om fso:
http://www.eksperten.dk/spm/25543
http://www.eksperten.dk/spm/35671

lidt om split (split på \",\" i din CSV fil):
http://www.eksperten.dk/spm/44458
http://www.eksperten.dk/spm/59740

Andet:
http://www.eksperten.dk/spm/19094

prøv at søge lidt mere på eksperten.

/stoffer

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
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
Vis detaljeret fejlkoder Af poulmadsen i ASP	6	09/03/202418:16	10/03/202417:59
IIS virker ikke på asp sider... Af bsn i ASP	10	15/10/202313:12	18/10/202308:48

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