Avatar billede krusnof Nybegynder
26. januar 2002 - 14:20 Der er 14 kommentarer og
1 løsning

Skal være udfyldt

Jeg har et newsscript, og det virker fint, lige bortset fra 1 ting.
Hvis man ikke skriver noget i "News" og i "writer", så laver den bare fejl.. Kan jeg så ved hjælp af ASP, tjekke om der er skrevet noget i de to felter og melde tilbage hvis der ikke gør, eller skal det lavesi Javascript og så fald hvordan??

Kruse
Avatar billede cool_casper Nybegynder
26. januar 2002 - 14:25 #1
Du kan lave det i ASP:

if Request.form("news") = "" or Request.form("news") = "" then
Rewsponse.Write "Fejl! Du har ikke udfyldt alle felter!"
'Response.Redirect "default.asp"
End If

ellers kan du lave det i java script:



<!-- TWO STEPS TO INSTALL BASIC VALIDATION:

  1.  Copy the coding into the HEAD of your HTML document
  2.  Add the last code into the BODY of your HTML document  -->

<!-- STEP ONE: Paste this code into the HEAD of your HTML document  -->

<SCRIPT LANGUAGE="JavaScript">
<!-- Original: wsabstract.com -->

<!-- This script and many more are available free online at -->
<!-- The JavaScript Source!! http://javascript.internet.com -->

<!-- Begin
function checkrequired(which) {
var pass=true;
if (document.images) {
for (i=0;i<which.length;i++) {
var tempobj=which.elements[i];
if (tempobj.name.substring(0,8)=="required") {
if (((tempobj.type=="text"||tempobj.type=="textarea")&&
tempobj.value=='')||(tempobj.type.toString().charAt(0)=="s"&&
tempobj.selectedIndex==0)) {
pass=false;
break;
        }
      }
  }
}
if (!pass) {
shortFieldName=tempobj.name.substring(8,30).toUpperCase();
alert("Please make sure the "+shortFieldName+" field was properly completed.");
return false;
}
else
return true;
}
//  End -->
</script>

<!-- STEP TWO: Copy this code into the BODY of your HTML document  -->

<center>
<form onSubmit="return checkrequired(this)">

<input type="text" name="requiredname">
<br>
<input type="text" name="requiredemail">
<br>
<select name="requiredhobby">
<option selected>Pick an option!
<option>1
<option>2
<option>3
</select>
<br>
<textarea name="requiredcomments"></textarea>
<br>
<input type=submit value="Submit">
</form>
</center>

<!-- The first option in your pulldown menus must be set to 'selected' !! -->

<p><center>
<font face="arial, helvetica" size="-2">Free JavaScripts provided<br>
by <a href="http://javascriptsource.com">The JavaScript Source</a></font>
</center><p>

<!-- Script Size:  1.41 KB -->
Avatar billede webben Nybegynder
26. januar 2002 - 14:28 #2
en lidt nemmere måde er at skrive:

if request("form") = "" then
response.write("fejl, udfyld dine felter")
end if
Avatar billede webben Nybegynder
26. januar 2002 - 14:28 #3
ups... så ikke hele cool_caspers kode
Avatar billede coltau Juniormester
26. januar 2002 - 14:48 #4
Hvis du vil tillade opdatering af blanke felter kan du anvende en kontrol-funktion som denne:

function CheckField(strValue)
  if strValue = "" then
    CheckField = "null"
  else
    CheckField = "'" & strValue & "'"
  end if
end function

inden du laver sql-sætninger.

strNews = CheckField(Request.Form("News"))
SQL = "update tabelnavn set news=" & strNews & " where osv..."

Hvis feltet er tomt ser sql-sætningen sådan ud:
"update tabelnavn set news=null where osv..."

det er jo nødvendigt hvis man skal bkanke et felt i DB.
Avatar billede coltau Juniormester
26. januar 2002 - 15:57 #5
Jeg glemte at trykke svar. :-(
Avatar billede krusnof Nybegynder
26. januar 2002 - 17:01 #6
Da jeg er total rookie i ASP, kan du (cool_casper) ikke gøre det for mig, da jeg ikke ved hvor det skal sidde osv..


<%
Response.Buffer = True

Function fixQuotes( theString )
    fixQuotes = Replace( theString, "'", "''" )
End Function

    news = Request( "news" )
    writer = Request( "writer" )

Set Con = Server.CreateObject( "ADODB.Connection" )
    DBPath = "DBQ=" & server.mappath("news/news.mdb")
    Con.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBPath

If Request.Servervariables("Content_Length") > 0 THEN
    Sql = "INSERT INTO news (Date1, News, Writer) VALUES('" & Date() & "','" & fixQuotes( News ) & "','" & fixQuotes( Writer ) & "')"
    Con.Execute Sql
End If
%>
<html>
<head>
<title> [ designforlife ] | graphic design </title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<meta name="keywords" content="kristian, kruse, lehn, web, internet, design, grafisk, logo, banner, adobe, photoshop, it">
<meta name="description" content=" [ designforlife ] is a site about graphic design.">
<meta name="author" content=" [ designforlife ] ">
<meta name="robots" content="all">
<link rel="shortcut icon" href="http://www.designforlife.dk/favicon.ico">
<link rel="stylesheet" href="../files/dfl.css" type="text/css">
<script language="JavaScript1.2" type="text/javascript" src="../files/dfl.js"></script>
<script language="JavaScript1.2">
function MM_openBrWindow(theURL,winName,features) {
  window.open(theURL,winName,features);
}
</script>
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<br>
<form action="news.asp" method="POST" target="_self">
  <table border="0" width="470" cellpadding="0" cellspacing="0">
    <tr>
      <td valign="top" width="227">News:</td>
      <td width="243">
        <textarea cols="30" rows="8" name="News"></textarea>
      </td>
    </tr>
    <tr>
      <td width="227">Writer:</td>
      <td width="243">
        <input type="text" name="Writer" class="bg2">
      </td>
    </tr>
    <tr>
      <td align="center" width="227"> <br>
        <br>
        <input type="submit" value="Add news" class="submit" name="submit" onClick="MM_openBrWindow('news/added.asp','thanks','width=150,height=10')">
        <input type="button" name="Submit" value="See news" class="button" onclick="location.href='news/shownews.asp'">
      </td>
    </tr>
  </table>
</form>
</body>
</html>

Kruse
Avatar billede cool_casper Nybegynder
27. januar 2002 - 01:55 #7
With pleasure.........

I ASP:
------------------------------------------------------------------

<%
Response.Buffer = True

Function fixQuotes( theString )
    fixQuotes = Replace( theString, "'", "''" )
End Function

    news = Request( "news" )
    writer = Request( "writer" )

if news = "" or writer = "" then
Rewsponse.Write "Fejl! Du har ikke udfyldt alle felter!<BR><A HREF="java script:history.go(-1)">Gå tilbage og ret det!</A>"
'Response.Redirect "default.asp"
End If


Set Con = Server.CreateObject( "ADODB.Connection" )
    DBPath = "DBQ=" & server.mappath("news/news.mdb")
    Con.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBPath

If Request.Servervariables("Content_Length") > 0 THEN
    Sql = "INSERT INTO news (Date1, News, Writer) VALUES('" & Date() & "','" & fixQuotes( News ) & "','" & fixQuotes( Writer ) & "')"
    Con.Execute Sql
End If
%>
<html>
<head>
<title> [ designforlife ] | graphic design </title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<meta name="keywords" content="kristian, kruse, lehn, web, internet, design, grafisk, logo, banner, adobe, photoshop, it">
<meta name="description" content=" [ designforlife ] is a site about graphic design.">
<meta name="author" content=" [ designforlife ] ">
<meta name="robots" content="all">
<link rel="shortcut icon" href="http://www.designforlife.dk/favicon.ico">
<link rel="stylesheet" href="../files/dfl.css" type="text/css">
<script language="JavaScript1.2" type="text/javascript" src="../files/dfl.js"></script>
<script language="JavaScript1.2">
function MM_openBrWindow(theURL,winName,features) {
  window.open(theURL,winName,features);
}
</script>
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<br>
<form action="news.asp" method="POST" target="_self">
  <table border="0" width="470" cellpadding="0" cellspacing="0">
    <tr>
      <td valign="top" width="227">News:</td>
      <td width="243">
        <textarea cols="30" rows="8" name="News"></textarea>
      </td>
    </tr>
    <tr>
      <td width="227">Writer:</td>
      <td width="243">
        <input type="text" name="Writer" class="bg2">
      </td>
    </tr>
    <tr>
      <td align="center" width="227"> <br>
        <br>
        <input type="submit" value="Add news" class="submit" name="submit" onClick="MM_openBrWindow('news/added.asp','thanks','width=150,height=10')">
        <input type="button" name="Submit" value="See news" class="button" onclick="location.href='news/shownews.asp'">
      </td>
    </tr>
  </table>
</form>
</body>
</html>


------------------------------------------------------------------



Eller i Javascript....

------------------------------------------------------------------

<%
Response.Buffer = True

Function fixQuotes( theString )
    fixQuotes = Replace( theString, "'", "''" )
End Function

    news = Request( "requirednews" )
    writer = Request( "requiredwriter" )


Set Con = Server.CreateObject( "ADODB.Connection" )
    DBPath = "DBQ=" & server.mappath("news/news.mdb")
    Con.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBPath

If Request.Servervariables("Content_Length") > 0 THEN
    Sql = "INSERT INTO news (Date1, News, Writer) VALUES('" & Date() & "','" & fixQuotes( News ) & "','" & fixQuotes( Writer ) & "')"
    Con.Execute Sql
End If
%>
<html>
<head>
<SCRIPT LANGUAGE="JavaScript">
<!-- Original: wsabstract.com -->

<!-- This script and many more are available free online at -->
<!-- The JavaScript Source!! http://javascript.internet.com -->

<!-- Begin
function checkrequired(which) {
var pass=true;
if (document.images) {
for (i=0;i<which.length;i++) {
var tempobj=which.elements[i];
if (tempobj.name.substring(0,8)=="required") {
if (((tempobj.type=="text"||tempobj.type=="textarea")&&
tempobj.value=='')||(tempobj.type.toString().charAt(0)=="s"&&
tempobj.selectedIndex==0)) {
pass=false;
break;
        }
      }
  }
}
if (!pass) {
shortFieldName=tempobj.name.substring(8,30).toUpperCase();
alert(""+shortFieldName+" feltet var ikke udfylt korrekt!");
return false;
}
else
return true;
}
//  End -->
</script>
<title> [ designforlife ] | graphic design </title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<meta name="keywords" content="kristian, kruse, lehn, web, internet, design, grafisk, logo, banner, adobe, photoshop, it">
<meta name="description" content=" [ designforlife ] is a site about graphic design.">
<meta name="author" content=" [ designforlife ] ">
<meta name="robots" content="all">
<link rel="shortcut icon" href="http://www.designforlife.dk/favicon.ico">
<link rel="stylesheet" href="../files/dfl.css" type="text/css">
<script language="JavaScript1.2" type="text/javascript" src="../files/dfl.js"></script>
<script language="JavaScript1.2">
function MM_openBrWindow(theURL,winName,features) {
  window.open(theURL,winName,features);
}
</script>
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<br>
<form action="news.asp" method="POST" target="_self" onSubmit="return checkrequired(this)">
  <table border="0" width="470" cellpadding="0" cellspacing="0">
    <tr>
      <td valign="top" width="227">News:</td>
      <td width="243">
        <textarea cols="30" rows="8" name="requiredNews"></textarea>
      </td>
    </tr>
    <tr>
      <td width="227">Writer:</td>
      <td width="243">
        <input type="text" name="requiredWriter" class="bg2">
      </td>
    </tr>
    <tr>
      <td align="center" width="227"> <br>
        <br>
        <input type="submit" value="Add news" class="submit" name="submit" onClick="MM_openBrWindow('news/added.asp','thanks','width=150,height=10')">
        <input type="button" name="Submit" value="See news" class="button" onclick="location.href='news/shownews.asp'">
      </td>
    </tr>
  </table>
</form>
</body>
</html>



------------------------------------------------------------------
Avatar billede krusnof Nybegynder
27. januar 2002 - 11:09 #8
http://designforlife.dk/pages/news.asp

det ser ikke rigtig ud..
Avatar billede krusnof Nybegynder
27. januar 2002 - 17:16 #9
cool_casper.. bliver det ikke til mere...
http://designforlife.dk/pages/news.asp
hvordan får man den til at melde fejl, når de tre felter ikke er udfyldt...
Avatar billede krusnof Nybegynder
02. februar 2002 - 18:17 #10
nevermind
Avatar billede cool_casper Nybegynder
04. februar 2002 - 17:01 #11
Huh??
Hvor har du afvist mit svar...???!! Hvad er det for noget??!!
I øvrigt for jeg en 404 på begge de links du har skrevet!!!
Avatar billede krusnof Nybegynder
04. februar 2002 - 17:36 #12
jeg har ændret det til http://designforlife.dk/pages/news/news.asp

grunden til jeg har afvist dig er... java virker med forkert.. hvis man siger add, selvom alt ikke erindtastet, så siger den fejl. Så lang så godt, men når man så endelig har udfyldt alle felterne og siger see the news, så er nyheden tilføjet flere gange, som du kan se på min side...

ASP-> jeg har prøvet at sætte f Request.form("news") = "" or Request.form("news") = "" then
Rewsponse.Write "Fejl! Du har ikke udfyldt alle felter!"
'Response.Redirect "default.asp"
End IF
in flere forskellige steder, mne jeg kan åbenbart ikke finde ud af hvor, for når jeg sår går ind på side, så skriver den (uden at have gjort noget) Fejl! Du har ikke udfyldt alle felter!...

håber du forstår..
hvis du dog stadig kan hjælpe, så får du nogle point..
Avatar billede cool_casper Nybegynder
04. februar 2002 - 17:40 #13
Fixer lige no'et.....!
Avatar billede cool_casper Nybegynder
04. februar 2002 - 17:46 #14
Prøv lige med den her:

<%
Response.Buffer = True

Function fixQuotes( theString )
    fixQuotes = Replace( theString, "'", "''" )
End Function

    news = Request.form( "news" )
    writer = Request.form( "writer" )

if news = "" or writer = "" then
Rewsponse.Write "Fejl! Du har ikke udfyldt alle felter!<BR><A HREF=""java script:history.go(-1)"">Gå tilbage og ret det!</A>"
'Response.Redirect "default.asp"
End If


Set Con = Server.CreateObject( "ADODB.Connection" )
    DBPath = "DBQ=" & server.mappath("news/news.mdb")
    Con.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBPath

If Request.Servervariables("Content_Length") > 0 THEN
    Sql = "INSERT INTO news (Date1, News, Writer) VALUES('" & Date() & "','" & fixQuotes( News ) & "','" & fixQuotes( Writer ) & "')"
    Con.Execute Sql
End If
%>
<html>
<head>
<title> [ designforlife ] | graphic design </title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<meta name="keywords" content="kristian, kruse, lehn, web, internet, design, grafisk, logo, banner, adobe, photoshop, it">
<meta name="description" content=" [ designforlife ] is a site about graphic design.">
<meta name="author" content=" [ designforlife ] ">
<meta name="robots" content="all">
<link rel="shortcut icon" href="http://www.designforlife.dk/favicon.ico">
<link rel="stylesheet" href="../files/dfl.css" type="text/css">
<script language="JavaScript1.2" type="text/javascript" src="../files/dfl.js"></script>
<script language="JavaScript1.2">
function MM_openBrWindow(theURL,winName,features) {
  window.open(theURL,winName,features);
}
</script>
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<br>
<form action="news.asp" method="POST" target="_self">
  <table border="0" width="470" cellpadding="0" cellspacing="0">
    <tr>
      <td valign="top" width="227">News:</td>
      <td width="243">
        <textarea cols="30" rows="8" name="News"></textarea>
      </td>
    </tr>
    <tr>
      <td width="227">Writer:</td>
      <td width="243">
        <input type="text" name="Writer" class="bg2">
      </td>
    </tr>
    <tr>
      <td align="center" width="227"> <br>
        <br>
        <input type="submit" value="Add news" class="submit" name="submit" onClick="MM_openBrWindow('news/added.asp','thanks','width=150,height=10')">
        <input type="button" name="Submit" value="See news" class="button" onclick="location.href='news/shownews.asp'">
      </td>
    </tr>
  </table>
</form>
</body>
</html>


------------------------------------------------------------------



Eller i Javascript....

------------------------------------------------------------------

<%
Response.Buffer = True

Function fixQuotes( theString )
    fixQuotes = Replace( theString, "'", "''" )
End Function

    news = Request.form("requirednews")
    writer = Request.form("requiredwriter")


Set Con = Server.CreateObject( "ADODB.Connection" )
    DBPath = "DBQ=" & server.mappath("news/news.mdb")
    Con.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBPath

If Request.Servervariables("Content_Length") > 0 THEN
    Sql = "INSERT INTO news (Date1, News, Writer) VALUES('" & Date() & "','" & fixQuotes( News ) & "','" & fixQuotes( Writer ) & "')"
    Con.Execute Sql
End If
%>
<html>
<head>
<SCRIPT LANGUAGE="JavaScript">
<!-- Original: wsabstract.com -->

<!-- This script and many more are available free online at -->
<!-- The JavaScript Source!! http://javascript.internet.com -->

<!-- Begin
function checkrequired(which) {
var pass=true;
if (document.images) {
for (i=0;i<which.length;i++) {
var tempobj=which.elements[i];
if (tempobj.name.substring(0,8)=="required") {
if (((tempobj.type=="text"||tempobj.type=="textarea")&&
tempobj.value=='')||(tempobj.type.toString().charAt(0)=="s"&&
tempobj.selectedIndex==0)) {
pass=false;
break;
        }
      }
  }
}
if (!pass) {
shortFieldName=tempobj.name.substring(8,30).toUpperCase();
alert(""+shortFieldName+" feltet var ikke udfylt korrekt!");
return false;
}
else
return true;
}
//  End -->
</script>
<title> [ designforlife ] | graphic design </title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<meta name="keywords" content="kristian, kruse, lehn, web, internet, design, grafisk, logo, banner, adobe, photoshop, it">
<meta name="description" content=" [ designforlife ] is a site about graphic design.">
<meta name="author" content=" [ designforlife ] ">
<meta name="robots" content="all">
<link rel="shortcut icon" href="http://www.designforlife.dk/favicon.ico">
<link rel="stylesheet" href="../files/dfl.css" type="text/css">
<script language="JavaScript1.2" type="text/javascript" src="../files/dfl.js"></script>
<script language="JavaScript1.2">
function MM_openBrWindow(theURL,winName,features) {
  window.open(theURL,winName,features);
}
</script>
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<br>
<form action="news.asp" method="POST" target="_self" onSubmit="return checkrequired(this)">
  <table border="0" width="470" cellpadding="0" cellspacing="0">
    <tr>
      <td valign="top" width="227">News:</td>
      <td width="243">
        <textarea cols="30" rows="8" name="requiredNews"></textarea>
      </td>
    </tr>
    <tr>
      <td width="227">Writer:</td>
      <td width="243">
        <input type="text" name="requiredWriter" class="bg2">
      </td>
    </tr>
    <tr>
      <td align="center" width="227"> <br>
        <br>
        <input type="submit" value="Add news" class="submit" name="submit" onClick="MM_openBrWindow('news/added.asp','thanks','width=150,height=10')">
        <input type="button" name="Submit" value="See news" class="button" onclick="location.href='news/shownews.asp'">
      </td>
    </tr>
  </table>
</form>
</body>
</html>



------------------------------------------------------------------
Avatar billede krusnof Nybegynder
04. februar 2002 - 19:21 #15
nu har jeg sat din ASP code ind, men prøv at se www.designforlife.dk/pages/news/news.asp
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