home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
202.53.64.216
/
202.53.64.216.tar
/
202.53.64.216
/
janahitha
/
Admin
/
AdsAdminNewAccount.asp
< prev
next >
Wrap
Text File
|
2004-11-26
|
5KB
|
131 lines
<% Response.Buffer =true%>
<!-- #include file="../AdsOpenConn.asp" -->
<%
if session("AdminLogin")="" then Response.Redirect "default.asp"
%>
<%
dim name
name=Request.Form("name")
'if request.form.count=0 then
if name="" then
%>
<html>
<head>
<title> Janahitha Ads - New Registration </title>
<meta name="author" content="Jagadish,Gopi">
<script language="javascript" src="../func.js"></script>
<script language="javascript">
function check()
{
validateform = document.registrationform;
if(isempty(validateform.name))
validateform.name.focus();
else
if(isempty(validateform.address))
validateform.address.focus();
else
if(isempty(validateform.city))
validateform.city.focus();
else
if(isempty(validateform.state))
validateform.state.focus();
else
if(isempty(validateform.pincode))
validateform.pincode.focus();
else
if(!(ispin(validateform.pincode)))
validateform.pincode.focus();
else
if(isempty(validateform.phone))
validateform.phone.focus();
else
if(!(isemail(validateform.email)))
validateform.email.focus();
else
validateform.submit();
}
</script>
</head>
<body bottommargin=0 topmargin=0 leftmargin=0 rightmargin=0 marginheight=0 marginwidth=0 bgcolor=#ffffff>
<p> </p>
<p align=right><font face=verdana size=2> <a href="AdsAdminHome.asp"><font color="<%=TopLinksColor%>">Home</font></a> <a href="AdsAdminHome.asp?lo"><font color="<%=TopLinksColor%>">Logout</font></a> </font></p>
<center>
<form name="registrationform" method=post action="<%=request.servervariables("script_name")%>">
<font face="verdana" color="#99603E"> <b> New Account </b> </font> <br> <br>
<table cellpadding=0 cellspacing=0 border=0>
<tr> <td bgcolor="#f2D197">
<table cellspacing=1 cellpadding=3 border=0 width=300>
<tr bgcolor="#ffffff">
<td> <font face="verdana" size=2> Name </font> </td>
<td> <input type=text name="name" size="15" maxlength=50> </td>
</tr>
<tr bgcolor="#ffffff">
<td> <font face="verdana" size=2> Address </font> </td>
<td> <input type=text name="address" size="15" maxlength=200> </td>
</tr>
<tr bgcolor="#ffffff">
<td> <font face="verdana" size=2> City </font> </td>
<td> <input type=text name="city" size="15" maxlength=50> </td>
</tr>
<tr bgcolor="#ffffff">
<td> <font face="verdana" size=2> State </font> </td>
<td> <input type=text name="state" size="15" maxlength=50> </td>
</tr>
<tr bgcolor="#ffffff">
<td> <font face="verdana" size=2> Pin </font> </td>
<td> <input type=text name="pincode" size="15" maxlength=6> </td>
</tr>
<tr bgcolor="#ffffff">
<td> <font face="verdana" size=2> Phone </font> </td>
<td> <input type=text name="phone" size="15" maxlength=30> </td>
</tr>
<tr bgcolor="#ffffff">
<td> <font face="verdana" size=2> Fax </font> </td>
<td> <input type=text name="fax" size="15" maxlength=30> </td>
</tr>
<tr bgcolor="#ffffff">
<td> <font face="verdana" size=2> Email </font> </td>
<td> <input type=text name="email" size="15" maxlength=50> </td>
</tr>
<tr bgcolor="#ffffff">
<td> <font face="verdana" size=2> Contact Person Name </font> </td>
<td> <input type=text name="contactperson" size="15" maxlength=50> </td>
</tr>
<tr bgcolor="#ffffff"><td><input type=button onclick="javascript:check()" value=" Create " id=button1 name=button1></td><td></td></tr>
</table>
</table>
</form>
</center>
</body>
</html>
<%
else
name = replace(trim(request.form("name")), "'", "''")
address = replace(trim(request.form("address")), "'", "''")
city = replace(trim(request.form("city")), "'", "''")
state = replace(trim(request.form("state")), "'", "''")
pincode = replace(trim(request.form("pincode")), "'", "''")
phone = replace(trim(request.form("phone")), "'", "''")
fax = replace(trim(request.form("fax")), "'", "''")
email = replace(trim(request.form("email")), "'", "''")
contactperson = replace(trim(request.form("contactperson")), "'", "''")
sql1 = "insert into AccClientDetails(ClientName, ClientAddress, ClientCity, ClientState, ClientPincode, ClientPhone, ClientEmail"
sql2 = ") values('" + name + "', '" + address + "', '" + city + "', '" + state + "', '" + pincode + "', '" + phone + "', '" + email + "'"
if fax<>"" then
sql1 = sql1 + ", ClientFax"
sql2 = sql2 + ", '" + fax + "'"
end if
if contactperson<>"" then
sql1 = sql1 + ", ClientContactPerson"
sql2 = sql2 + ", '" + contactperson + "'"
end if
sql = sql1 + sql2 + ")"
Response.Write sql
con.execute sql
response.redirect "AdsAdminNewAccount.asp"
end if
%>
<!-- #include file="../AdsCloseConn.asp" -->