Avatar billede okay Nybegynder
26. maj 2001 - 00:25 Der er 10 kommentarer og
1 løsning

Tjekker Felt !!

Jeg har en database med en række personer, og har lavet en funktion til at oprette nye personer.
Men hvordan tjekker jeg om personen har fyldt alle felter ??

Scripten:
        <%
If Trim(Request(\"navn\")) > \"\" Then
  Set Conn = Server.CreateObject(\"ADODB.Connection\")
  DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
  DSN = DSN & \"DBQ=\" & Server.MapPath (\"database.mdb\")
  Conn.Open DSN

  Conn.Execute \"INSERT INTO jwringetoner (navn,email,tonenavn,tempo,rnokia,rsiemens,rericsson) VALUES (\'\" & Request(\"navn\") & \"\',\'\" & Request(\"email\") & \"\',\'\" & Request(\"tonenavn\") & \"\',\'\" & Request(\"tempo\") & \"\',\'\" & Request(\"rnokia\") & \"\',\'\" & Request(\"rsiemens\") & \"\',\'\" & Request(\"rericsson\") & \"\')\"

  Conn.Close: Set Conn = Nothing

  Response.Write \"<h1>Tak for din ringetone, din ringetone er blevet
          sat til at blive accept hos webmasteren!</h1>\"
End IF
%>
Avatar billede no_doubt Nybegynder
26. maj 2001 - 00:29 #1
if request.form(\"felt\") = \"\" OR request.form(\"felt2\") =\"\" OR request.form(\"felt3\") =\"\" OR request.form(\"felt4\") =\"\" then
response.write(\"Du mangler at indtaste en oplysning\")


Udskift Felt1/2/3/4/5 med dine tekstbokses navne.
Avatar billede tdaugaard Nybegynder
26. maj 2001 - 00:30 #2
Og fjern da de OVERFLØDIGE .form\'s .. de gør ingen gavn
Avatar billede okay Nybegynder
26. maj 2001 - 00:30 #3
no_doubt > kan du ik indsætte det i min script..fordi jeg ved ik helt hvor jeg skal ligge det henne i min script...
Avatar billede okay Nybegynder
26. maj 2001 - 00:32 #4
hvilken form´s tdaugaard ??
Avatar billede tdaugaard Nybegynder
26. maj 2001 - 00:34 #5
okay:>

Request.Form(\"felt\") vil jeg skrive som:

Request(\"felt\")

.Form fylder bare
Avatar billede okay Nybegynder
26. maj 2001 - 00:35 #6
hvor kan du se noget med Request.Form(\"felt\") i min script **Gg**
Avatar billede no_doubt Nybegynder
26. maj 2001 - 00:35 #7
prøv at sende det til : mark.mikkelsen@mail.dk
Avatar billede tdaugaard Nybegynder
26. maj 2001 - 00:35 #8
okay:> det var til no_doubt ;-) Sorry...
Avatar billede okay Nybegynder
26. maj 2001 - 00:38 #9
tdaugaard > nå ok...

no_doubt > her er scripten :o)

<html>
<head>
<title>JWRingetoner 1.0 ASP</title>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=iso-8859-1\">
<link rel=\"stylesheet\" href=\"styles.css\" type=\"text/css\">
</head>
<body bgcolor=\"#FFFFFF\" text=\"#000000\" link=\"#006699\" vlink=\"#006699\" alink=\"#006699\">
<br>
<form action=\"indsaet.asp\" method=\"post\">
  <table width=\"400\" border=\"0\" cellspacing=\"1\" cellpadding=\"3\" class=\"bottom\" align=\"center\" bgcolor=\"#f7f7f7\">
    <tr>
      <td width=\"134\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">Dit
        Navn <span class=\"rot\"> <font color=\"#FF0000\">*</font></span></font><br>
        <input type=\"text\" name=\"navn\" class=\"bottom\">
      </td>
      <td width=\"251\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">Email:</font><span class=\"rot\"><br>
        <input type=\"text\" name=\"email\" class=\"bottom\">
        </span></td>
    </tr>
    <tr>
      <td width=\"134\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">Ringetonens
        Navn <span class=\"rot\"> <font color=\"#FF0000\">*</font></span></font><br>
        <input type=\"text\" name=\"tonenavn\" class=\"bottom\">
      </td>
      <td width=\"251\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">Tempo:</font><span class=\"rot\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\"><span class=\"rot\"><font color=\"#FF0000\">*</font></span></font><br>
        <select size=\"1\" name=\"tempo\" class=\"ramme\" style=\"border: 1 solid #000000\">
          <option value=\"V&aelig;lge Selv\" selected><span class=\"rot\">For Nokia</span></option>
          <option value=\"40 BPM\"><span class=\"rot\">40 BPM</span></option>
          <option value=\"45 BPM\"><span class=\"rot\">45 BPM</span></option>
          <option value=\"50 BPM\"><span class=\"rot\">50 BPM</span></option>
          <option value=\"56 BPM\"><span class=\"rot\">56 BPM</span></option>
          <option value=\"63 BPM\"><span class=\"rot\">63 BPM</span></option>
          <option value=\"70 BPM\"><span class=\"rot\">70 BPM</span></option>
          <option value=\"80 BPM\"><span class=\"rot\">80 BPM</span></option>
          <option value=\"90 BPM\"><span class=\"rot\">90 BPM</span></option>
          <option value=\"100 BPM\"><span class=\"rot\">100 BPM</span></option>
          <option value=\"112 BPM\"><span class=\"rot\">112 BPM</span></option>
          <option value=\"125 BPM\"><span class=\"rot\">125 BPM</span></option>
          <option value=\"140 BPM\"><span class=\"rot\">140 BPM</span></option>
          <option value=\"160 BPM\"><span class=\"rot\">160 BPM</span></option>
          <option value=\"180 BPM\"><span class=\"rot\">180 BPM</span></option>
          <option value=\"200 BPM\"><span class=\"rot\">200 BPM</span></option>
          <option value=\"225 BPM\"><span class=\"rot\">225 BPM</span></option>
        </select>
        </span></td>
    </tr>
    <tr>
      <td colspan=\"2\" height=\"167\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">
        Nokia<span class=\"rot\"><font color=\"#FFFFFF\"> <font color=\"#FF0000\">*</font></font></span><font color=\"#FF0000\">
        </font></font><font color=\"#FF0000\"><br>
        </font>
        <textarea name=\"rnokia\" cols=\"50\" rows=\"8\" class=\"bottom\"></textarea>
      </td>
    </tr>
    <tr>
      <td colspan=\"2\" height=\"167\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">
        Siemens<span class=\"rot\"><font color=\"#FFFFFF\"> <font color=\"#FF0000\">*</font></font></span><font color=\"#FF0000\">
        </font></font><font color=\"#FF0000\"><br>
        </font>
        <textarea name=\"rsiemens\" cols=\"50\" rows=\"8\" class=\"bottom\"></textarea>
      </td>
    </tr>
    <tr>
      <td colspan=\"2\" height=\"167\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">
        Ericsson<span class=\"rot\"><font color=\"#FFFFFF\"> <font color=\"#FF0000\">*</font></font></span><font color=\"#FF0000\">
        </font></font><font color=\"#FF0000\"><br>
        </font>
        <textarea name=\"rericsson\" cols=\"50\" rows=\"8\" class=\"bottom\"></textarea>
      </td>
    </tr>
    <tr>
      <td colspan=\"2\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\"><span class=\"rot\">
        </span></font>
        <table border=\"0\" cellspacing=\"0\" cellpadding=\"0\" width=\"200\">
          <tr>
            <td align=\"left\">
              <div align=\"left\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\"><span class=\"rot\">
                <font color=\"#FF0000\">*</font></span><font color=\"#666666\"> =
                Skal indtastes</font></font></div>
            </td>
          </tr>
        </table>
      </td>
    </tr>
  </table>
  <br>
  <table border=\"0\" cellspacing=\"0\" cellpadding=\"0\" width=\"400\">
    <tr>
      <td>
        <div align=\"center\"><font face=\"Verdana, Arial, Helvetica, sans-serif\"><b>
          <input type=\"Submit\" value=\"Tilf&oslash;j\" name=\"Submit\">
          <input type=\"Reset\" value=\"Slet Alt\" name=\"Reset\">
          </b></font></div>
      </td>
    </tr>
  </table>
</form>
<%
If Trim(Request(\"navn\")) > \"\" Then
  Set Conn = Server.CreateObject(\"ADODB.Connection\")
  DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
  DSN = DSN & \"DBQ=\" & Server.MapPath (\"database.mdb\")
  Conn.Open DSN

Conn.Execute \"INSERT INTO jwringetoner (navn,email,tonenavn,tempo,rnokia,rsiemens,rericsson,hits,ip) VALUES (\'\" & Request(\"navn\") & \"\',\'\" & Request(\"email\") & \"\',\'\" & Request(\"tonenavn\") & \"\',\'\" & Request(\"tempo\") & \"\',\'\" & Request(\"rnokia\") & \"\',\'\" & Request(\"rsiemens\") & \"\',\'\" & Request(\"rericsson\") & \"\',\'\" & Request(\"0\") & \"\',\'\" & Request(\"REMOTE_ADDR\") & \"\')\"

  Conn.Close: Set Conn = Nothing

  Response.Write \"<h1>Tak for din ringetone - din ringetone er blevet sat til at blive accept hos webmasteren!</h1>\"
End IF
%>
<p>

Avatar billede no_doubt Nybegynder
26. maj 2001 - 00:51 #10
Sådan :


<html>
<head>
<title>JWRingetoner 1.0 ASP</title>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=iso-8859-1\">
<link rel=\"stylesheet\" href=\"styles.css\" type=\"text/css\">
</head>
<body bgcolor=\"#FFFFFF\" text=\"#000000\" link=\"#006699\" vlink=\"#006699\" alink=\"#006699\">
<br>
<form action=\"indsaet.asp\" method=\"post\">
<table width=\"400\" border=\"0\" cellspacing=\"1\" cellpadding=\"3\" class=\"bottom\" align=\"center\" bgcolor=\"#f7f7f7\">
<tr>
<td width=\"134\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">Dit
Navn <span class=\"rot\"> <font color=\"#FF0000\">*</font></span></font><br>
<input type=\"text\" name=\"navn\" class=\"bottom\">
</td>
<td width=\"251\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">Email:</font><span class=\"rot\"><br>
<input type=\"text\" name=\"email\" class=\"bottom\">
</span></td>
</tr>
<tr>
<td width=\"134\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">Ringetonens
Navn <span class=\"rot\"> <font color=\"#FF0000\">*</font></span></font><br>
<input type=\"text\" name=\"tonenavn\" class=\"bottom\">
</td>
<td width=\"251\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">Tempo:</font><span class=\"rot\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\"><span class=\"rot\"><font color=\"#FF0000\">*</font></span></font><br>
<select size=\"1\" name=\"tempo\" class=\"ramme\" style=\"border: 1 solid #000000\">
<option value=\"V&aelig;lge Selv\" selected><span class=\"rot\">For Nokia</span></option>
<option value=\"40 BPM\"><span class=\"rot\">40 BPM</span></option>
<option value=\"45 BPM\"><span class=\"rot\">45 BPM</span></option>
<option value=\"50 BPM\"><span class=\"rot\">50 BPM</span></option>
<option value=\"56 BPM\"><span class=\"rot\">56 BPM</span></option>
<option value=\"63 BPM\"><span class=\"rot\">63 BPM</span></option>
<option value=\"70 BPM\"><span class=\"rot\">70 BPM</span></option>
<option value=\"80 BPM\"><span class=\"rot\">80 BPM</span></option>
<option value=\"90 BPM\"><span class=\"rot\">90 BPM</span></option>
<option value=\"100 BPM\"><span class=\"rot\">100 BPM</span></option>
<option value=\"112 BPM\"><span class=\"rot\">112 BPM</span></option>
<option value=\"125 BPM\"><span class=\"rot\">125 BPM</span></option>
<option value=\"140 BPM\"><span class=\"rot\">140 BPM</span></option>
<option value=\"160 BPM\"><span class=\"rot\">160 BPM</span></option>
<option value=\"180 BPM\"><span class=\"rot\">180 BPM</span></option>
<option value=\"200 BPM\"><span class=\"rot\">200 BPM</span></option>
<option value=\"225 BPM\"><span class=\"rot\">225 BPM</span></option>
</select>
</span></td>
</tr>
<tr>
<td colspan=\"2\" height=\"167\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">
Nokia<span class=\"rot\"><font color=\"#FFFFFF\"> <font color=\"#FF0000\">*</font></font></span><font color=\"#FF0000\">
</font></font><font color=\"#FF0000\"><br>
</font>
<textarea name=\"rnokia\" cols=\"50\" rows=\"8\" class=\"bottom\"></textarea>
</td>
</tr>
<tr>
<td colspan=\"2\" height=\"167\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">
Siemens<span class=\"rot\"><font color=\"#FFFFFF\"> <font color=\"#FF0000\">*</font></font></span><font color=\"#FF0000\">
</font></font><font color=\"#FF0000\"><br>
</font>
<textarea name=\"rsiemens\" cols=\"50\" rows=\"8\" class=\"bottom\"></textarea>
</td>
</tr>
<tr>
<td colspan=\"2\" height=\"167\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\">
Ericsson<span class=\"rot\"><font color=\"#FFFFFF\"> <font color=\"#FF0000\">*</font></font></span><font color=\"#FF0000\">
</font></font><font color=\"#FF0000\"><br>
</font>
<textarea name=\"rericsson\" cols=\"50\" rows=\"8\" class=\"bottom\"></textarea>
</td>
</tr>
<tr>
<td colspan=\"2\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\"><span class=\"rot\">
</span></font>
<table border=\"0\" cellspacing=\"0\" cellpadding=\"0\" width=\"200\">
<tr>
<td align=\"left\">
<div align=\"left\"><font size=\"1\" face=\"Verdana, Arial, Helvetica, sans-serif\"><span class=\"rot\">
<font color=\"#FF0000\">*</font></span><font color=\"#666666\"> =
Skal indtastes</font></font></div>
</td>
</tr>
</table>
</td>
</tr>
</table>
<br>
<table border=\"0\" cellspacing=\"0\" cellpadding=\"0\" width=\"400\">
<tr>
<td>
<div align=\"center\"><font face=\"Verdana, Arial, Helvetica, sans-serif\"><b>
<input type=\"Submit\" value=\"Tilf&oslash;j\" name=\"Submit\">
<input type=\"Reset\" value=\"Slet Alt\" name=\"Reset\">
</b></font></div>
</td>
</tr>
</table>
</form>
<%
If Trim(Request(\"navn\")) > \"\" Then
Set Conn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
DSN = DSN & \"DBQ=\" & Server.MapPath (\"database.mdb\")
Conn.Open DSN
if request(\"navn\") = \"\" OR request(\"email\") =\"\" OR request(\"tonenavn\") =\"\" OR request(\"tempo\") =\"\" OR request(\"rsiemens\")=\"\" OR request(\"rericsson\")=\"\" OR request(\"hits\") =\"\" then
response.write(\"Du mangler at indtaste en oplysning\")
else
Conn.Execute \"INSERT INTO jwringetoner (navn,email,tonenavn,tempo,rnokia,rsiemens,rericsson,hits,ip) VALUES (\'\" & Request(\"navn\") & \"\',\'\" & Request(\"email\") & \"\',\'\" & Request(\"tonenavn\") & \"\',\'\" & Request(\"tempo\") & \"\',\'\" & Request(\"rnokia\") & \"\',\'\" & Request(\"rsiemens\") & \"\',\'\" & Request(\"rericsson\") & \"\',\'\" & Request(\"0\") & \"\',\'\" & Request(\"REMOTE_ADDR\") & \"\')\"

Conn.Close: Set Conn = Nothing

Response.Write \"<h1>Tak for din ringetone - din ringetone er blevet sat til at blive accept hos webmasteren!</h1>\"
%>
<% End If %>
<% end if %>

<p>


Avatar billede okay Nybegynder
26. maj 2001 - 00:59 #11
Fino > alt virker som det skal...har bare skiftet lidt på scripten :o) tak for hjælpen
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