Burde denne være forkert

Hej

Jeg kan se at du ikke lukker dine objekter igen - det skal man helst gøre for så er det mindre ressource-krævende.

Altså sådan her:

<%
if request.form("B1X") <> "" then

Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("../db.mdb")

Dim mySmartUpload 'declare the component
Dim File 'declare the file to upload
Dim filename 'Temp filename

Set mySmartUpload= Server.CreateObject("aspSmartUpload.SmartUpload")

mySmartUpload.Upload

For each file in mySmartUpload.Files
    file.SaveAs(Server.MapPath("doks/" &file.Filename))
set mySmartUpload=nothing
    sql = "Insert into filer (menu, undermenu, underundermenu, link, linktekst) values('" & Replace(request.querystring("menu"), "'", "''") & "','" & Replace(request.querystring("undermenu"), "'", "''") & "','" & Replace(request.querystring("underundermenu"), "'", "''") & "','" & Replace(request.form("linktekst"), "'", "''") & "','" & FileName & "')"
    Conn.Execute(sql)
Next

Conn.close
set Conn=nothing
response.redirect "default.asp?opret=fil"
end if
%>

- og sidst men ikke mindt. Hvad er "filename"? Hvor henne sættes denne variabel? Om ikke andet skal den vel sættes rigtigt ind i din sql-sætning som alle de andre variabler du sætter derind...?

- ellers ser det da ok ud...

\Dan

filename skulle gerne være navnet på den fil man uploader...jeg har ikke arbejdet med aspsmartupload før så er lidt på bar bund...

Lyder det helt forkert....

Hej no_doubt

som jeg også sagde i mit tidligere indlæg i denne her tråd så skal du huske at lukke dine objekter igen når du har brugt dem! Så JA! Det bud du har her er forkert... helt forkert.

- ellers ser det da ok ud...

\Dan

ha points ?

Ingen svar i 5 år = luk ?