Thursday, 12 December 2013

jQuery Ajax Submit Form without Page Refresh using JSON in Asp.Net jQuery Submit a form without postback
Name:
Subject:
Body:

Thursday, 5 December 2013

All process for client side processor in Json File filename.aspx <%@ Page Language="C#" AutoEventWireup="true" CodeFile="ajaxform.aspx.cs" Inherits="ajaxform" %> :: Ajax Form ::
Name :
filename.aspx.cs file using System; using System.Collections.Generic; using System.Linq; using System.Web; using System.Web.UI; using System.Web.UI.WebControls; using System.Web.Services; using System.Configuration; using System.Data.SqlClient; using System.Data; public partial class ajaxform : System.Web.UI.Page { protected void Page_Load(object sender, EventArgs e) { } [WebMethod] public static string GetName(string Username) { string xml; SqlConnection conn = new SqlConnection(ConfigurationManager.ConnectionStrings["Con"].ToString()); DataTable dt = new DataTable(); conn.Open(); SqlCommand cmd = new SqlCommand("json_process", conn); cmd.Parameters.AddWithValue("@name", Username); cmd.CommandType = CommandType.StoredProcedure; //cmd.ExecuteNonQuery(); //conn.Close(); //return code; //} SqlDataAdapter da = new SqlDataAdapter(cmd); da.Fill(dt); if (dt.Rows.Count > 0) { xml = ""; // xml += ""; foreach (DataRow row in dt.Rows) { xml += ""; } //xml += ""; xml += "
Name :
" + row["Names"] + "" + row["Mobile"] + "
"; } else { xml = "No records"; } conn.Close(); return xml; } }
Classic ASP Page and Database connection String <% //DECLARATION Dim strcon,sqry,StrGender,cmd //connection string strcon = "Provider=SQLOLEDB;Data Source=ServerName;User Id=DatabaseName;Password=Databasepassword" //Establish Connection set conn = server.CreateObject("ADODB.Connection") conn.ConnectionString = strcon conn.Open() %> Test Page
<% IF (REQUEST.QueryString("hid") = "Y") THEN RNAME = REQUEST.QueryString("NAM") REMAIL = REQUEST.QueryString("EM") Radd = REQUEST.QueryString("Radd") Rph = REQUEST.QueryString("Rph") Rdob = REQUEST.QueryString("Rdob") Rgen = REQUEST.QueryString("Rgen") Red = REQUEST.QueryString("Red") Rint = REQUEST.QueryString("Rint") 'SQL ="EXEC Reg_sample_Asp'Nagarajan','nagarajan@gmail.com','Nkl','9842946063','23/04/1996','Male','Bsc','DotNet'" 'response.write SQL 'Set rs= conn.execute(SQL) set cmd=SERVER.CreateObject("ADODB.Command") cmd.ActiveConnection = conn cmd.CommandText="Reg_sample_Asp" cmd.CommandType =4 cmd.Parameters.Append cmd.CreateParameter ("@RegName", 200, 1, 30,RNAME) cmd.Parameters.Append cmd.CreateParameter ("@RegEmail", 200, 1, 40,REMAIL) cmd.Parameters.Append cmd.CreateParameter ("@RegAddress", 200, 1, 100,Radd) cmd.Parameters.Append cmd.CreateParameter ("@RegPhno", 200, 1, 10,Rph) cmd.Parameters.Append cmd.CreateParameter ("@RegDOB", 200, 1, 12,Rdob) cmd.Parameters.Append cmd.CreateParameter ("@RegGender", 200, 1, 10,Rgen) cmd.Parameters.Append cmd.CreateParameter ("@RegEduction", 200, 1, 10,Red) cmd.Parameters.Append cmd.CreateParameter ("@RegFieldOfInt", 200, 1, 10,Rint) set rs=cmd.execute 'SQL ="EXEC Reg_sample_Asp'Nagarajan','nagarajan@gmail.com','Nkl','9842946063','23/04/1996','Male','Bsc','DotNet'" 'SQL = "INSERT into TblRegistration (RegName,RegEmail,RegAddress,RegPhno,RegDOB,RegGender,RegEduction," 'SQL = SQL & "RegFieldOfInt)" 'SQL = SQL & " VALUES " 'SQL = SQL & "('" & RNAME & "','" & REMAIL & "'," 'SQL = SQL & "'" & Radd & "','" & Rph & "'," 'SQL = SQL & "'" & Rdob & "','" & Rgen & "'," 'SQL = SQL & "'" & Red & "'," 'SQL = SQL & "'" & Rint & "')" 'response.write SQL 'Set rs= conn.execute(SQL) END IF %>
Online Registration
Name :
E-mail :
Address :
Phone No :
Date Of Birth :
Gender : Male Female
Eduction Qualification :
Field of Intrest : Dot Net Java C++
 
<% //CREATE RECORDSET set rs = SERVER.CreateObject("ADODB.RecordSet") sqry="exec Reg_sample_Selectquery" //SQL QUERY// 'sqry = "Select RegName,RegEmail,RegAddress,RegPhno,RegDOB,RegGender,RegEduction from TblRegistration" rs.Open sqry,conn if not rs.EOF then //Fetch data using recordset do while not rs.EOF %> <% if RS.Fields("RegGender") = "M" THEN StrGender = "MALE" ELSE StrGender = "FEMALE" end if %> <% rs.MoveNext loop end if %>
Name E-mail Address Phone No DOB Gender Eduction Qualification
<%= RS.Fields("RegName")%> <%= RS.Fields("RegEmail")%> <%= RS.Fields("RegAddress")%> <%= RS.Fields("RegPhno")%> <%= RS.Fields("RegDOB")%><%= StrGender%> <%= RS.Fields("RegEduction")%>