Ønskeliste i ASP

som f.eks en ønskeliste over gaver til et bryllup.
Listen skal lægges ud på hjemmesiden hvor brugerne (gæster til festen) kan vælge hvilke gaver de gerne vil give. De gaver der bliver valgt skal naturligvis fjernes så man ikke får 2 af samme slags. Ved eftertanke er det ikke en checkbox, men valgknap der skal benyttes(kun et valg pr. gæst)

Kan følgende bruges. Du skal bare rette placeringen af tekstfilen. Der skal være skriveadgang til txt filen. Der skal stå et ønske pr linie:<%
filename="./onske.txt"
Set objFSO = CreateObject("Scripting.FileSystemObject")

if Request.QueryString("checkbox")<>"" then
    a=0
    strWrite=""
    onskeDel = ","&Request.QueryString("checkbox")&","
    Set myFile = objFSO.OpenTextFile(server.MapPath(filename),1,false)
    while not myFile.AtEndOfStream
    a=a+1
    tmpstr=myFile.readline
    if inStr(1,onskeDel,","&cstr(a)&",")=0 then
        strWrite=StrWrite&tmpStr&";"
    end if
    wend
    if len(strWrite)>0 then
        strWrite=Left(strWrite,len(strWrite)-1)
    end if
    Set myFile = objFSO.OpenTextFile(server.MapPath(filename),2,false)
    myFile.write replace(strWrite,";",vbcrlf)
end if

Set myFile = objFSO.OpenTextFile(server.MapPath(filename),1,false)
a=0
%>

Her kommer min ønskeseddel<BR>
<form action="" method="get">

<%

while not myFile.AtEndOfStream
a=a+1%>
<INPUT type="checkbox" name="checkbox" value="<%=a%>"><%=myFile.readline%><br>

<%wend
if a = 0 then Response.Write "Du kom for sent, ikke flere ønsker."
%><BR>
<input type="submit" name="Send" value="Send">
<input type="reset">
</form>

Og hvis man kun skal kunne vælge en, skal du bare skrive radio i stedet for checkboks under type

hej Tofte
Vil man kunne lave det med en database ? (og kan du lave scriptet ?)

ja, det kan man, det vil faktisk være nemmere. Men jeg har dårligt tid de næste par dage.

Du fik hvad du ønskede, havde du ikke skrevet det skulle være en tekstfil, havde du sikkert fået det i en database :-)