"Henrik" <he@nr.ik> wrote in message
news:3d367d79$0$426$ba624c82@nntp01.dk.telia.net...
> Hvem kan hjælpe mig her? Jeg forsøger at uploade billede-URL til min
> database. Er der evt. nogen, der har en anden kodestump? Jeg har adgang
til
> ASPsmartupload...
>
> _____________________________
> upload.asp:
>
> <form action="saveimage.asp" method="post" enctype="multipart/form-data">
> <input type="file" name="blob">
> <input type=submit>
> </form>
>
> _____________________________
> saveimage.asp:
>
> <%
> Set Conn = Server.CreateObject("ADODB.Connection")
> DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
> DSN = DSN & "DBQ=" & Server.MapPath("../../db/database.mdb")
> Conn.Open DSN
>
> sRequest = Server.CreateObject("aspSmartUpload.SmartUpload")
> sRequest.AllowedFilesList = "gif,jpg,jpeg,png" 'Jeg vil kun have billeder
> sRequest.MaxFileSize = 300000 ' der ikke er for store
> sRequest.Upload ' Hent data fra formular
> sRequest.Save("db") 'Gem billeder
>
> strSQL = "Insert into Billeder ("
>
> strSQL = strSQL & "URL" & ")"
>
> strSQL = strSQL & "values( "
>
> strSQL = strSQL & "'" & sRequest.Files.Item(0).FileName & "')"
>
> Conn.Execute(strSQL)
>
> Conn.Close
> Set Conn = Nothing
> %>
>
> _____________________________
> Saveimage.asp kan ikke vises
Det ville hjælpe hvis du kunne skrive hvilken fejl du fik, men her er et
gæt:
Det ser ud til at du mangler mellemrum i din strSQL-sætning før
"values"-delen. Prøv i stedet denne:
strSQL = "Insert into Billeder (" & "URL" & ") "
strSQL = strSQL & "values('"" & sRequest.Files.Item(0).FileName & "')"
Generelt synes jeg du har delt din strSQL-variabel lidt for meget op - du
mister overblikket, men det er jo bare smag og behag.
Håber det kunne hjælpe.
Kasper