Set Conn = Server.CreateObject("ADODB.Connection")
strConnect = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &
absDbPath
Conn.Open strconnect
SQLstmt = "INSERT INTO TBL_elev (Vaerbilled, Bbredde, Bhojde,
Aar, Husnr, Vaernr, Elevet, mailet, Elevto, mailto, Elevtre,
mailtre, Elevfire, mailfire)"
SQLstmt = SQLstmt & " VALUES ('" &File.Filename& "','"
&File.ImageWidth& "','" &File.ImageHeight& "','"
&Upload.Form("Aar")& "','" &Upload.Form("Husnr")& "','"
&Upload.Form("Vaernr")& "','" &Upload.Form("Elevet")& "','"
&Upload.Form("Mailet")& "','" &Upload.Form("Elevto")& "','"
&Upload.Form("Mailto")& "','" &Upload.Form("Elevtre")& "','"
&Upload.Form("mailtre")& "','" &Upload.Form("Elevfire")& "','"
&Upload.Form("Mailfire")& "')"
Conn.Execute (SQLstmt)
'executing
Conn.Execute (SQLstmt)
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! =>
http://www.html.dk/tutorials