alert or message box?

monika · Sep 25, 2003

I am not clear ... whether to use alert of JavaScript or messagebox of
VBScript in ASP. But what I want is that when a user has some error I want
to display a pop-up kind of a thing saying "you have not entered all the
values" ... and when he click "ok" then he should be directed to the same
page where he was entering the values. I tried this but in my case I am just
being redirected to the page ..and my message box in not being popped up!

here is my code:
<%
DIM RSA
DIM QUERY1
DIM RSA2
DIM QUERY2
DIM Conn
dim adCmdText
dim stAge

session("newStdId") = Request.form("stdID")
session("newStdName") = Request.form("stdName")
session("newStdUserName") = Request.form("stdUserName")
session("newStdPassword") = Request.form("stdPassword")
session("newStdAge") = Request.form("stdAge")

StAge = Request.form("stdAge")
adCmdText = 1
'create and open database connection
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "dsn=school"

'create commad object
set objCmd = server.createobject("adodb.command")

If Request.form("newStudent") = "Click to save details of new student" then
If Request.form("stdname") <>"" and Request.form("stdUsername") <> "" and
Request.form("stdpassword")<> "" and Request.form("stdAge")<> "" then
Set RSA2 = Server.CreateObject("ADODB.Recordset")
QUERY2 = "SELECT student_name from student_info where
student_username='"&Request.form("stdUsername")&"'"
RSA2.open QUERY2, "dsn=school"
if RSA2.EOF then
QUERY1 = "INSERT INTO student_info (student_name,student_username,
student_password,student_age) VALUES
('"&Session("newStdName")&"','"&Session("newStdUserName")&"','"&Session("New
StdPassword")&"',"&Request.form("stdAge")&")"
set objCmd.ActiveConnection = Conn
objCmd.CommandText = Query1
objCmd.CommandType = adCmdText
'execute the command
objCmd.Execute
response.write "<font color=#000080 size=6>" & "Student details have
been saved!"
else
response.write "<font color=#000080 size=6>" & "A student by the same
username exists! Please create another username."
end if
'response.write session("newStdName") "ID is: "
else
%>
<SCRIPT language="vbscript">
msgbox("YOUR HAVE NOT ENTERED ALL THE VALUES")
</SCRIPT>
<%
Response.Redirect("createStudUser.asp")
End If
end if
'close and dereference database objects
set objCmd = nothing
conn.close
set conn = nothing

%>
<html>
<head>

<link rel="stylesheet" href="style.css" type="text/css" />
</head>
<body BGCOLOR="pink">
</body>
<html>

Adrienne · Sep 25, 2003

I am not clear ... whether to use alert of JavaScript or messagebox of
VBScript in ASP. But what I want is that when a user has some error I
want to display a pop-up kind of a thing saying "you have not entered
all the values" ... and when he click "ok" then he should be directed
to the same page where he was entering the values. I tried this but in
my case I am just being redirected to the page ..and my message box in
not being popped up!

That's because you're doing something server side that needs to be done
client side.

This is what I do:

Form.asp:
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="en">
<head>
<title>Fill out form</title>
<%
dim required
dim message
dim name
dim email

required = request.querystring("required")
name = request.querystring("name")
email = request.querystring("email")

if required <> "" then
select case required
case "name"
message = "Name is required"
case "email"
message = "Email is required"
end select

if message <> "" then
message = "<div style='font-weight:bold; color:red'>" & message &
"</div>"
<script type="text/javascript">

</script>
end if
end if
%>
</head>
<body>
<%=message%>
<form id="form" method="post" action="form2.asp">
<fieldset><legend>* Indicates Required</legend>
<label for="name">Name: * </label> <input type="text" name="name"
id="name" value="<%=name%>" /><br />
<label for="email">Email: *</label> <input type="text" name="email"
id="email" value="<%email%>" /><br />
<input type="submit" value="Submit">
</fieldset>
</form>
</body>

On form2.asp -

<% dim name
dim email
dim required

name = request.form("name")
email = request.form("email")

if name = "" then
required = "name"
elseif email = "" then
requried = "email"
end if

if required <> "" then
response.redirect "form.asp?required=" & required & "&name=" & name &
"&email=" & email
response.end
else
'do whatever your script is supposed to do
end if
%>

Obviously you can do a lot more error checking, loop through request
objects, etc.

Tim · Sep 25, 2003

if it is in the asp code, it will run on the server and the client wont see
it.

if it is in the html code that is sent to the client, then 'msgbox' will
only run on IE, 'alert' will run on anything.

Tim

error handling-duplicate key	1	Sep 16, 2003
username and password validation	10	Jun 16, 2006
DataAdd Error: Arguments are wrong type or are out of acceptable r	1	Dec 14, 2004
a very simple problem!	9	Aug 20, 2003
asp vbscript textbox paste from word problem	5	Oct 9, 2008
want to open a new window on button click!-jscript or javasript	2	Sep 4, 2003
SQL statement error fixed, now wrong data appending	1	Aug 9, 2004
Item cannot be found in the collection corresponding to the requested name or ordinal	2	Nov 9, 2004

alert or message box?

monika

Adrienne

Tim

Ask a Question

Similar Threads

Members online

Forum statistics

Latest Threads