<% Response.Buffer =true%> <% if session("AdminLogin")="" then Response.Redirect "default.asp" %> <% dim name name=Request.Form("name") 'if request.form.count=0 then if name="" then %> Janahitha Ads - New Registration

 

Home     Logout  

"> New Account

Name
Address
City
State
Pin
Phone
Fax
Email
Contact Person Name
<% 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 %>