Avatar billede mark_j Nybegynder
20. maj 2002 - 02:34 Der er 24 kommentarer og
2 løsninger

Submit en record

Jeg generer en masse submit knapper ud for hver record jeg har i en database ved hjælp af response.write, når jeg trykker på en submitknap skal den sende den record videre som den står ud for. Det virker ikke den kan ikke finde ud af hvilken den skal sende?

Please hjælp det er et eksamens projekt
Avatar billede Slettet bruger
20. maj 2002 - 02:36 #1
kan vi se noget kode, ikke nemt at snakke om noget man ikke kan se &:-D
Avatar billede mark_j Nybegynder
20. maj 2002 - 02:39 #2
selvfølgelig :)
Dim objRS
    Set objRS = Server.CreateObject ("ADODB.Recordset")
    objRS.Open "tblVin",objConn,adOpenStatic,adLockReadOnly,adCmdTable
       
        Response.Write "<FORM action=""IndkobsVogn.asp?Vare=" & objRS("Navn") & """ method=""post"">"   
        Response.Write "<TABLE BORDER=0><TR><TD><B>Varenr</B></TD><TD><B>Varenavn</B></TD>" & _
                        "<TD><B>Beskrivelse</B></TD><TD><B>Pris</B></TD></TR>"
    While not objRS.EOF
        Response.Write "<TR><TD valign=top>" & objRS("IDnavn") & "</TD>" & _
                          "<TD valign=top><A HREF=""VisDetail.asp?Vin=" & objRS("Navn") & """>" & objRS("Navn") & "</A></TD>" & _
                          "<TD valign=top>" & objRS("Beskrivelse") & "</TD>" & _
                          "<TD valign=top><PNR>" & objRS("Pris") & "Kr.</PNR></TD>" 
    If Session("IDKunde")<>"" Then
        Response.Write "<TD valign=top><INPUT type=""text"" name=""antal"" size=""2"" value=""1""></TD>" & _
                      "<TD valign=top><INPUT type=""Submit"" value=""Bestil""></TD></TR>"
Avatar billede kimiwan Nybegynder
20. maj 2002 - 02:39 #3
Du skal lave en form for hvert "afsnit" af felter der skal sendes.
Avatar billede mark_j Nybegynder
20. maj 2002 - 02:39 #4
det ser lidt rodet ud når det bliver klemt
Mark
Avatar billede kimiwan Nybegynder
20. maj 2002 - 02:41 #5
mark: er det alt din kode?
Avatar billede mark_j Nybegynder
20. maj 2002 - 02:41 #6
det vil sige jeg skal ligge en form ind efter <TR>
Avatar billede mark_j Nybegynder
20. maj 2002 - 02:42 #7
nej der er mere vil du se det hele?
Avatar billede kimiwan Nybegynder
20. maj 2002 - 02:43 #8
der mangler f.eks. et WEND i din kode for at man rigtig kan se hvoran dine records bliver skrevet ud
Avatar billede mark_j Nybegynder
20. maj 2002 - 02:45 #9
<%@ Language=VBScript %>
<%Option Explicit%>
<!-- #include file="Clssfd.asp" -->
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<LINK rel="stylesheet" type="text/css" href="MainStyleSheet.css">
</HEAD>
<BODY>
<%
    If Session("IDKunde")<>"" Then
        Response.Write "<CENTER><H3>Valdemar's vinhandel</H3>" & _
                      "<H3>Byder dig meget velkommen</H3>" & _
                      "<H3>" & Session("fornavn") & Session("efternavn") & "</H3>" & _
                      "<P>Du har nu mulighed for at benytte dig af vores online system.</P>" & _
                      "<FORM action=""faktura.asp"" method=""post"">" & _
                      "<P><B>Varer:</B><INPUT type=text size=15 >" & _
                      "<B>Pris ialt:</B><INPUT type=""text"" name=""pris"">&nbsp" & _
                      "<INPUT type=""submit"" value=""Til Kassen""></P></FORM></CENTER>"
    Else
        Response.Write "<CENTER><H3>Valdemar's vinliste</H3>" & _
                      "<P>Hvis du er registreret kan du benytte vores online system</P></CENTER>"
    End if
    Dim objRS
    Set objRS = Server.CreateObject ("ADODB.Recordset")
    objRS.Open "tblVin",objConn,adOpenStatic,adLockReadOnly,adCmdTable
       
        Response.Write "<FORM action=""IndkobsVogn.asp?Vare=" & objRS("Navn") & """ method=""post"">"   
        Response.Write "<TABLE BORDER=0><TR><TD><B>Varenr</B></TD><TD><B>Varenavn</B></TD>" & _
                        "<TD><B>Beskrivelse</B></TD><TD><B>Pris</B></TD></TR>"
    While not objRS.EOF
        Response.Write "<TR><TD valign=top>" & objRS("IDnavn") & "</TD>" & _
                          "<TD valign=top><A HREF=""VisDetail.asp?Vin=" & objRS("Navn") & """>" & objRS("Navn") & "</A></TD>" & _
                          "<TD valign=top>" & objRS("Beskrivelse") & "</TD>" & _
                          "<TD valign=top><PNR>" & objRS("Pris") & "Kr.</PNR></TD>" 
    If Session("IDKunde")<>"" Then
        Response.Write "<TD valign=top><INPUT type=""text"" name=""antal"" size=""2"" value=""1""></TD>" & _
                      "<TD valign=top><INPUT type=""Submit"" value=""Bestil""></TD></TR>"
    Else
        Response.Write ""   
    End if              
        objRS.MoveNext
   
    Wend
    Response.Write "</TABLE>"
    Response.Write "</FORM>"
    objRS.Close
    Set objRS = Nothing
%>

</BODY>
</HTML>
det er det hele, det er fordi jeg tester om personen er logget ind at jeg har session("IDKunde") med
Når man trykker på submit vil jeg have det i en indkøbsvogn ved hjælp at et dictionary
Avatar billede mark_j Nybegynder
20. maj 2002 - 02:51 #10
kan ikke lige få det til at virke
Avatar billede mark_j Nybegynder
20. maj 2002 - 02:54 #11
forsvandt i helt :-(
Avatar billede kimiwan Nybegynder
20. maj 2002 - 02:55 #12
Så skulle den gerne lave dine forms som du gerne vil ha' dem :o)

<%@ Language=VBScript %>
<%Option Explicit%>
<!-- #include file="Clssfd.asp" -->
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<LINK rel="stylesheet" type="text/css" href="MainStyleSheet.css">
</HEAD>
<BODY>
<%
    If Session("IDKunde")<>"" Then
        Response.Write "<CENTER><H3>Valdemar's vinhandel</H3>" & _
                      "<H3>Byder dig meget velkommen</H3>" & _
                      "<H3>" & Session("fornavn") & Session("efternavn") & "</H3>" & _
                      "<P>Du har nu mulighed for at benytte dig af vores online system.</P>" & _
                      "<FORM action=""faktura.asp"" method=""post"">" & _
                      "<P><B>Varer:</B><INPUT type=text size=15 >" & _
                      "<B>Pris ialt:</B><INPUT type=""text"" name=""pris"">&nbsp" & _
                      "<INPUT type=""submit"" value=""Til Kassen""></P></FORM></CENTER>"
    Else
        Response.Write "<CENTER><H3>Valdemar's vinliste</H3>" & _
                      "<P>Hvis du er registreret kan du benytte vores online system</P></CENTER>"
    End if
    Dim objRS
    Set objRS = Server.CreateObject ("ADODB.Recordset")
    objRS.Open "tblVin",objConn,adOpenStatic,adLockReadOnly,adCmdTable
       
        Response.Write "<TABLE BORDER=0><TR><TD><B>Varenr</B></TD><TD><B>Varenavn</B></TD>" & _
                        "<TD><B>Beskrivelse</B></TD><TD><B>Pris</B></TD></TR>"
    While not objRS.EOF
        Response.Write "<FORM action=""IndkobsVogn.asp?Vare=" & objRS("Navn") & """ method=""post"">"   
        Response.Write "<TR><TD valign=top>" & objRS("IDnavn") & "</TD>" & _
                          "<TD valign=top><A HREF=""VisDetail.asp?Vin=" & objRS("Navn") & """>" & objRS("Navn") & "</A></TD>" & _
                          "<TD valign=top>" & objRS("Beskrivelse") & "</TD>" & _
                          "<TD valign=top><PNR>" & objRS("Pris") & "Kr.</PNR></TD>" 
    If Session("IDKunde")<>"" Then
        Response.Write "<TD valign=top><INPUT type=""text"" name=""antal"" size=""2"" value=""1""></TD>" & _
                      "<TD valign=top><INPUT type=""Submit"" value=""Bestil""></TD></TR>"
    Else
                Response.Write "<td colspan=""2"">&nbsp;</td></tr>"
            Response.Write "</FORM>"
    End if
        objRS.MoveNext
   
    Wend
    Response.Write "</TABLE>"
    objRS.Close
    Set objRS = Nothing
%>

</BODY>
</HTML>
det er det hele, det er fordi jeg tester om personen er logget ind at jeg har session("IDKunde") med
Når man trykker på submit vil jeg have det i en indkøbsvogn ved hjælp at et dictionary
Avatar billede tmceu Praktikant
20. maj 2002 - 03:01 #13
Jeg ville lave denne, som jeg mener er lidt mere elegant end at blandet querystring og post.

Response.Write "<FORM action=""IndkobsVogn.asp"" method=""post"">"   

Response.Write "<INPUT TYPE=""HIDDEN"" VALUE=""" & objRS("Navn") & """ NAME=""Vare"">"
Avatar billede mark_j Nybegynder
20. maj 2002 - 03:09 #14
istedet for min submit sejt
Avatar billede mark_j Nybegynder
20. maj 2002 - 03:15 #15
jeg er lige lidt lost med den "HIDDEN" hvordan virker det og hvor skal den placeres
Avatar billede tmceu Praktikant
20. maj 2002 - 03:15 #16
Nej, ikke i stedet for din submit, men istedet for denne linie:

Response.Write "<FORM action=""IndkobsVogn.asp?Vare=" & objRS("Navn") & """ method=""post"">"

Du skal stadig have en submit som det er foreslået, men med et skjult felt gør du tingene mere diskret.
Avatar billede mark_j Nybegynder
20. maj 2002 - 03:22 #17
hvis jeg ikke har "form action" hvordan sender jeg så objRS("Navn") videre
Avatar billede kimiwan Nybegynder
20. maj 2002 - 03:24 #18
det er netop det dit hidden field gør - det er ligesom f.eks. at du skriver det i et tekstfelt:

<input type="text" name="navn" value="<%=objRS("navn")%>"> ..blot, hvis du bruger et hidden field kan du ikke se det.
Avatar billede mark_j Nybegynder
20. maj 2002 - 03:39 #19
Tak nu virker det det var kanont
men hvordan vil i have point i hjalp begge to men tmceu har ikke lavet et svar
MARK : -)
Avatar billede kimiwan Nybegynder
20. maj 2002 - 03:41 #20
Hvad med at dele fifty-fifty?

tmceu: læg et svar så du ka' få points :o)
Avatar billede tmceu Praktikant
20. maj 2002 - 03:42 #21
Point er ikke det vigtigste og kimiwan kom med det væsentligste, så giv du ham/hende de fleste :-)
Avatar billede mark_j Nybegynder
20. maj 2002 - 03:45 #22
Endnu engang tak, det bliver nok ikke sidste gang jeg kigger forbi
Mark
Avatar billede kimiwan Nybegynder
20. maj 2002 - 03:46 #23
jeg er en ham ;o)  og takker for point.
Avatar billede medions Nybegynder
20. maj 2002 - 04:14 #24
hey kimiwan har du ICQ?
//>Rune
Avatar billede kimiwan Nybegynder
20. maj 2002 - 04:19 #25
det har jeg, hvad er dit #?
Avatar billede medions Nybegynder
20. maj 2002 - 04:21 #26
hehe, du vil heller ik' ha' dit ICQ nr. smidt ud her på E!?
well, søg under Nickname under medions, der er kun 2 der hedder det, og den ene er en tysker.... -og det er jo ik' mig.. ;-)

//>Rune
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester