Problemer med ASP smartupload, haster
Hej AlleJeg er begyndte at benytte ASP smartupload, således at jeg kan gemme mine filer i DB'en sammen med anden data.
Jeg sidder med deres sampels og arbejder videre, men jeg kan ikke komme til at hente filen fra DB'en. Når jeg benytter deres sampel (nr. 7)bliver jeg promptet for at gemme selve ASP siden og ikke nogle filer fra DB'en. Nogle gode forslag. Jeg vedhæfter koden her:
HTML>
<BODY BGCOLOR="white">
<H1>aspSmartUpload : Sample 7</H1>
<%
' Variables
' *********
Dim mySmartUpload
Dim oConn
Dim strSQL
Dim oRs
' Object creation
' ***************
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
' Connect to the DB
' *****************
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=c:\test_help_desk\fpdb\help_desk_be.mdb;" & _
"Jet OLEDB:System Database=c:\help_desk\fpdb\Sikret.mdw;", _
"mip","tulle5"
' Open a recordset
' ****************
strSQL = "SELECT FILENAME,FILE FROM TFILES"
Set oRs = Server.CreateObject("ADODB.recordset")
Set oRs.ActiveConnection = oConn
oRs.Source = strSQL
oRs.Open
' DownloadField
' *************
mySmartUpload.DownloadField(oRs("FILE"))
' samples with optionnals
' Call mySmartUpload.DownloadField(oRs("FILE"), "application/x-zip-compressed", "download.zip")
' Call mySmartUpload.DownloadField(oRs("FILE"), "application/x-zip-compressed", oRs("FILENAME").Value)
' Destruction
' ***********
oRs.Close
oConn.Close
Set oRs = Nothing
Set oConn = Nothing
%>
</BODY>
</HTML>
