Nogen der gidder lave en ASP fil for mig?

Send mig koden og databasen, så skal jeg nok kigge på det.

og hvis det kræver at i skal bruge databasen, så send mig en mail på dark-angel@12mail.dk

Husk at zippe databasen. Jeg mener selvfølgelig at jeg nok skal kode det for dig

Jeg har noget kode som kan det du skal bruge... men du kan nok ikke helt bruge den... da den køre med PHP og mysql db.

Netsrac har lavet noget genialt til mig, måske du også kan bruge det?:
ww.eksperten.dk/spm/50836

nej, det kan jeg desværre ikke.. har du en tagwall i PHP eller ASP som ikke bruger nogen form for database??

Jeg har modtaget databasen

næi... hehe men det sku\' ikke være vildt svært at lave hehe

en kode jeg engang fandt, men jeg har ikke selv lavet den, for så havde den også være MEGET bedre :) (øverst i koden skal du skrive tabellen...
<%
tabel = \"dintabel\"
mode = request(\"mode\")
strDSN = \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"&Server.MapPath(\"db.mdb\")
Set myConn = Server.CreateObject(\"ADODB.Connection\")
myConn.Open strDSN

if mode = \"\" then
    strSQL = \"SELECT * FROM \" & tabel & \"\"
    Set rs = myConn.Execute(strSQL)
    If Not (rs.BOF Or rs.EOF) Then
%>
<table border=\'1\'>
<tr><td><b>Slet:</b></td>
<td><b>Felt 1:</b></td>
<td><b>Felt 2:</b></td>
<td><b>Felt 3:</b></td>
<td><b>Felt 4:</b></td>
<td><b>Felt 5:</b></td>
<td><b>Felt 6:</b></td>
<td><b>Felt 7:</b></td>
<td><b>Felt 8:</b></td></tr>
<form action=\"?mode=slet\" method=\"POST\">
<% Do While Not rs.EOF %>
<tr>
<td valign=\"top\"><input type=\"Checkbox\" name=\"delet\" value=\"<%= rs(\"id\") %>\"></td>
<td valign=\"top\"><%=rs(\"felt1\")%></td>
<td valign=\"top\"><%=rs(\"felt2\")%></td>
<td valign=\"top\"><%=rs(\"felt3\")%></td>
<td valign=\"top\"><%=rs(\"felt4\")%></td>
<td valign=\"top\"><%=rs(\"felt5\")%></td>
<td valign=\"top\"><%=rs(\"felt6\")%></td>
<td valign=\"top\"><%=rs(\"felt7\")%></td>
<td valign=\"top\"><%=rs(\"felt8\")%></td>
</tr>
<%
rs.movenext
loop
%>
<tr><td><input type=\'Submit\' value=\'Slet\'></td></tr></form>
</table>
<%
    else
        response.write \"<b>Der er ingen data i databasen</b>\"
    end if
else
    end if

if mode = \"slet\" then
    id = request(\"delet\")
    if id = \"\" then
        response.write \"<b>Du skal vælge en</b><p>\"
        fejl = 1
else
    end if
    if fejl = 1 then
        call sletbruger
else
    end if
    if not fejl = 1 then
        str = request(\"delet\") & \", \"
   
        lPos = 1
        Do While lPos <= Len(str)
            If InStr(lPos, str, \", \") = 0 Then Exit do
            aItem = Mid(str, lPos, InStr(lPos, str, \", \") - lPos)
            lPos = lPos + InStr(lPos, str, \", \") - lPos + 2
            aItem2 = aItem
            strSQL = \"SELECT * FROM \" & tabel & \" WHERE ID = \" & aItem2 & \"\"
            Set rs = myConn.Execute(strSQL)
            strSQL = \"Delete * FROM \" & tabel & \" WHERE ID=\" & aItem
            Set rs = myConn.Execute(strSQL)
            response.write \"<b>Slettet</b><p>\"
        loop
else
    end if
else
end if
%>

Har sendt filen