Newbee kan ikke få aspUpload til at virke...måske fordi jeg
bruger DNSless?
------------------------------------------------------
<!-- #include file="constring.inc"-->
<%
Set Upload = Server.CreateObject("Persits.Upload.1")
' Upload files
Upload.OverwriteFiles = False ' Generate unique names
Upload.SetMaxSize 1048576 ' Truncate files above 1MB
Upload.Save "d:\home\xxxxxxxx\db\upload"
' Process all files received
For Each File in Upload.Files
' Save in the database as blob
File.ToDatabase strConnect =
"Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=d:\home\xxxxxxx\db\xxxx.mdb;", _
"insert into TBL_billed.Filnavn"
' Move to a different location
File.Copy "d:\home\xxxxxxx\www\xxxx\billedbase" &
File.ExtractFileName
File.Delete
End If
%>
<html>
<head>
<title>tester</title>
</head>
<body bgcolor="#ffffff">
</body>
</html>
<%
' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>
--
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