/ Forside / Teknologi / Udvikling / ASP / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
ASP
#NavnPoint
smorch 9259
Harlekin 1866
molokyle 1040
Steffanst.. 758
gandalf 657
smilly 564
gibson 560
cumano 530
MouseKeep.. 480
10  Random 410
Afkrydsning af flere felter i en formular
Fra : Tom Jensen


Dato : 28-02-02 15:01

Howdy
Jeg har en .asp side hvor jeg viser alle kursister på et hold.
Så er det meningen at man i feltet "Fremmødt", kan ændre
den defaulte værdi som er "Nej" til "Ja" for dem der er fremmødt.

Det vil sige at jeg laver en dynamisk tabel:

<znipp>
rst.movefirst
do until rst.EOF
response.write "<td>" & rst(0) & "&nbsp;</td>"
response.write "<td>" & rst(1) & "&nbsp;</td>"
response.write "<td>" & rst(2) & "&nbsp;</td>"
response.write "<td><input type='text' name='t3' size='8' value=" & rst(3)
& ">&nbsp;</td>"
response.write "<td><input type='text' name='t4' size='8' value=" & rst(4)
& ">&nbsp;</td></tr>"
rst.MoveNext
loop
<znapp>

så får jeg en dejlig tabel. Men feltet som der bliver ændret, hedder jo "t3"
i samtlige
rækker, så hvordan får jeg opsamlet de ændrede data fra hele tabellen og
lagt
dem ned i databasen igen??
Det her duer vel ikke ??

<znipp>
If Request.ServerVariables("CONTENT_LENGTH") > 0 Then
rst("fremmoedt") = trim(Request.form("t3"))
<znapp>

Hidtil har jeg klaret mig ved at trække en enkelt post fra en tabel
over på en særskilt side og der lave ændringer i data, men det går
ikke her. Samtlige deltagere skal kunne "afkrydses" på en og samme
side.
T:I:A:

Tom F: Jensen



 
 
Jørn Andersen (28-02-2002)
Kommentar
Fra : Jørn Andersen


Dato : 28-02-02 15:47

On Thu, 28 Feb 2002 15:01:27 +0100, "Tom Jensen" <tje@ffsoft.dk>
wrote:

>Howdy
>Jeg har en .asp side hvor jeg viser alle kursister på et hold.
>Så er det meningen at man i feltet "Fremmødt", kan ændre
>den defaulte værdi som er "Nej" til "Ja" for dem der er fremmødt.
>
>Det vil sige at jeg laver en dynamisk tabel:

<znipp>
>så får jeg en dejlig tabel. Men feltet som der bliver ændret, hedder jo "t3"
>i samtlige
>rækker, så hvordan får jeg opsamlet de ændrede data fra hele tabellen og
>lagt
>dem ned i databasen igen??

Jeg kan ikke finde din checkbox??

Du er nødt til at finde en unik identifikation, som du kæder sammen
med feltet - fx blot en tæller eller en id fra databasen el.lign.

Her har jeg blot anvendt en tæller, som jeg så bagefter bruger til at
loope gennem værdierne.

Response.Write "<td><p><input type=""checkbox"" name=""tidnr" & _
      antal & """ value=""" & myvalue & """></p></td>" & vbcrlf

Blev brugt til at opdatere et vagtskema for en måned ad gangen ...


Good luck,
Jørn

--
Jørn Andersen,
Brønshøj

Tom Jensen (28-02-2002)
Kommentar
Fra : Tom Jensen


Dato : 28-02-02 20:35

"Jørn Andersen"
> Jeg kan ikke finde din checkbox??

Det er et tekstfelt, fordi jeg er lidt usikker på hvilken
værdi en checkbox afleverer.

> Du er nødt til at finde en unik identifikation, som du kæder sammen
> med feltet - fx blot en tæller eller en id fra databasen el.lign.

Guldkorn, simpelthen guldkorn

> Response.Write "<td><p><input type=""checkbox"" name=""tidnr" & _
> antal & """ value=""" & myvalue & """></p></td>" & vbcrlf

Jeg gjorde sådan:
For at skrive data:

<znipp>
do until rst.EOF
response.write "<td>" & rst(0) & "&nbsp;</td>"
response.write "<td>" & rst(1) & "&nbsp;</td>"
response.write "<td>" & rst(2) & "&nbsp;</td>"
response.write "<td><input type='text' name=""moedt" & ix & """ size='8'
value=" & rst(3) & ">&nbsp;</td>"
response.write "<td><input type='text' name=""bestaaet" & ix & """
size='8' value=" & rst(4) & ">&nbsp;</td></tr>"
ix = ix +1
rst.MoveNext
loop
<znipp>

For at høste og gemme data:

<znipp>
' Hent data fra formularen og skriv dem til
' databasen
do until rst.eof
' Når tabellen skrives får felterne nye navne
rst(3) = trim(Request.form("Moedt" & ix & ""))
rst(4) = trim(Request.form("Bestaaet" & ix & ""))
ix = ix + 1
rst.movenext
loop
<znipp>

Jeg havde aldrig klaret det uden hjælp fra dig. Jeg
havde flakket hvileløst rundt i gaderne og generet
fremmede mennesker, så jeg er dig stor tak skyldig.

TAK

Tom F: Jensen



Jørn Andersen (28-02-2002)
Kommentar
Fra : Jørn Andersen


Dato : 28-02-02 21:24

On Thu, 28 Feb 2002 20:34:39 +0100, "Tom Jensen" <tje@ffsoft.dk>
wrote:

>"Jørn Andersen"
>> Jeg kan ikke finde din checkbox??
>
>Det er et tekstfelt, fordi jeg er lidt usikker på hvilken
>værdi en checkbox afleverer.

Jamen, så prøv dig frem :)
Du bliver lige min lejlighed til at lufte en almindelig frustration:
Hvorfor er folk tit tilbageholdende med at afprøve deres egne ideer?

Det er trods alt det man lærer noget af + at det er fuldstændig
gratis. Tænk hvis man var hobby-snedker - så ville det koste træ, hver
gang man eksperimenterede forkert ... (Hvis det var mig, ville der
ryge adskillige skove!)
Her er det bare at prøve og prøve og ...

Nå, nok om det - du skal ikke tage det personligt - jeg skulle blot
have det ud :)

En checkbox afleverer en variabel af typen String med den værdi, der
står i "value", hvis den er afkrydset - ellers afleverer den en Empty
værdi.

Hvis du vil teste, så er funktionen TypeName uundværlig:

Lav en formular, der indeholder bl.a.:
<input type="checkbox" name="checkbox01" value="myvalue">

Fang så værdierne med:
checkbox01 = Request.form("checkbox01")
Response.Write checkbox01 & "<br>" & vbcrlf
Response.Write TypeName(checkbox01) & "<br>" & vbcrlf

Hvis checkboxen er afkrydset, vil den vise:
myvalue
String
Hvis ikke den er afkrydset, vil den vise:
(ingenting)
Empty


>Jeg havde aldrig klaret det uden hjælp fra dig. Jeg
>havde flakket hvileløst rundt i gaderne og generet
>fremmede mennesker, så jeg er dig stor tak skyldig.

Måske man kan få støtte fra Det kriminalpræventive Råd


Good luck,
Jørn

--
Jørn Andersen,
Brønshøj

Søg
Reklame
Statistik
Spørgsmål : 177559
Tips : 31968
Nyheder : 719565
Indlæg : 6408938
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste