03. november 2008 - 16:14Der er
21 kommentarer og 1 løsning
asp webshop
Hej jeg opretter lige dette spørgsmål igen, da jeg ikke helt fik løst det sidst. jeg har den her stump kode som jeg gerne vil have hjælp til.
Det der gerne skulle ske var, når brugeren indtaster deres telefon nr eller e-mail så skuller ders brugeroplysninger gerne komme frem i den nederste formular.
På forhånd tak for hjælpen.
Her er koden:
<!-- #include file="include/dbconnect.asp" --> Kunde-Info <br /><br /> Har du handlet før?<br /> Indtast dit Telfon/Mobilnummer og tryk 'Hent oplysninger' <br /><br />
<table width="328" border="0" cellspacing="0" cellpadding="0"> <form name="form1" method="post" action="kundeinfo.asp"><tr> <td width="132">Telfon/Mobilnummer.:</td> <td width="300"> <input type="text" name="kunde_opl"><br /> <input type="submit" name="soeg" value="Hent oplysninger"> </td> </tr></form> </table> <% if request("soeg") <> "" then strSoeg = request("soeg") strSoeg = replace(strSoeg,"'","") strSQL = "select * from kundeinfo where k_tele = '"&strSoeg&"' or k_email = '"&strSoeg&"'" set rs = conn.execute(strSQL) if not rs.eof then kunde_navn = rs("k_navn") kunde_adresse = rs("k_adresse") kunde_tlf = rs("k_tele") kunde_email = rs("k_email") retur_skriv = "" else retur_skriv = "Der er ingen oplysninger på det indtastede" end if end if %> <form name="form1" method="post" action="til næste side"> <table width="333" height="166" border="0" cellpadding="0" cellspacing="0"> <tr> <td> </td> <td> </td> </tr> <tr> <td>Navn:</td> <td> <input type="text" name="kunde_navn" value="<%=kunde_navn%>"></td> </tr> <tr> <td>Adresse</td> <td> <input type="text" name="kunde_adresse" value="<%=kunde_adresse%>"></td> </tr> <tr> <td>Tlf.nr.:</td> <td> <input type="text" name="kunde_tlf" value="<%=kunde_tlf%>"></td> </tr> <tr> <td>Email:</td> <td> <input type="text" name="kunde_email" value="<%=kunde_email%>"></td> </tr>
<tr> <td> </td> <td>osv</td> </tr> <tr> <td> </td> <td align="right">og så videre til næste side -></td> </tr> </table> </form>
if request("soeg") <> "" then strSoeg = request("soeg") strSoeg = replace(strSoeg,"'","") strSQL = "select * from kundeinfo where k_tele = '"&strSoeg&"'" set rs = conn.execute(strSQL) if not rs.eof then kunde_navn = rs("k_navn") kunde_adresse = rs("k_adresse") kunde_tlf = rs("k_tele") kunde_email = rs("k_email") retur_skriv = "" else retur_skriv = "Der er ingen oplysninger på det indtastede" end if end if
prøv lige at udskriv
response.write return_skriv
og så behøver du ikke at søge i email- da det jo er tlf. du beder folk skrive.
og så var det ikke response.write return_skriv - men
response.write retur_skriv
Synes godt om
Slettet bruger
03. november 2008 - 16:33#4
Her er der ændret de steder, hvor en linje er markeret med to stjerner **:
<table width="328" border="0" cellspacing="0" cellpadding="0"> ** <form name="form1" method="post" action="[samme side]"><tr> <td width="132">Telfon/Mobilnummer.:</td> <td width="300"> <input type="text" name="kunde_opl"><br /> <input type="submit" name="soeg" value="Hent oplysninger"> </td> </tr></form> </table> <% ** if Request.Form("kunde_opl") <> "" then ** strSoeg = request.Form("kunde_opl") strSoeg = replace(strSoeg,"'","") strSQL = "select * from kundeinfo where k_tele = '"&strSoeg&"' or k_email = '"&strSoeg&"'" set rs = conn.execute(strSQL) if not rs.eof then kunde_navn = rs("k_navn") kunde_adresse = rs("k_adresse") kunde_tlf = rs("k_tele") kunde_email = rs("k_email") ** [en linje er fjernet] else ** Response.Write "Der er ingen oplysninger på det indtastede" end if end if %> **<form name="form1" method="post" action="[næste side]"> <table width="333" height="166" border="0" cellpadding="0" cellspacing="0"> <tr> <td> </td> <td> </td> </tr> <tr> <td>Navn:</td> <td> <input type="text" name="kunde_navn" value="<%=kunde_navn%>"></td> </tr> <tr> <td>Adresse</td> <td> <input type="text" name="kunde_adresse" value="<%=kunde_adresse%>"></td> </tr> <tr> <td>Tlf.nr.:</td> <td> <input type="text" name="kunde_tlf" value="<%=kunde_tlf%>"></td> </tr> <tr> <td>Email:</td> <td> <input type="text" name="kunde_email" value="<%=kunde_email%>"></td> </tr>
<tr> <td> </td> <td>osv</td> </tr> <tr> <td> </td> ** <td align="right">[Link til næste side, eller hvad?]</td> </tr> </table> </form>
Jeg har bare kopieret din kode ovenfor og ændret lidt her og der.
// Steeven
Synes godt om
Slettet bruger
03. november 2008 - 16:41#5
Jeg var ikke sikker på, om du egentlig mente, at du ville have et link til næste side nederst (dér hvor den sidste linje er markeret med **).
Hvis du ønsker det, så er tekstfelterne vel kun til for at indeholde dataene? - ikke til at redigere og sende videre til en ny side. I så fald kan du ligeså godt fjerne method- og action-atributterne fra <form>-tagget. Og desuden behøver du så slet ikke at bruge input-felter, til at vise dataene, men du kunne derimod skrive dem på listeform i teksten i en tabel eller lignende.
Querystring har nu ikke nødvendigvis noget med a href at gøre, men henter blot en variable fra den pågældende sides URL, og Form henter - som du er inde på - fra en submittet form på forrige side.
Dem, som du synes har hjulpet dig med at få løst dit problem, skal du bede om at lægge nogle svar, som du derefter kan acceptere i bunden af denne side.
if request("soeg") <> "" then strSoeg = request("kunde_opl") strSoeg = replace(strSoeg,"'","") strSQL = "select * from kundeinfo where k_tele = '"&strSoeg&"'" set rs = conn.execute(strSQL) if not rs.eof then kunde_navn = rs("k_navn") kunde_adresse = rs("k_adresse") kunde_tlf = rs("k_tele") kunde_email = rs("k_email") else response.write "Der er ingen oplysninger på det indtastede" ' eller fang den i en variabel og brug den der hvor du ønsker retur_skriv = "Der er ingen oplysninger på det indtastede" end if end if
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.