਍ഀ ਍ഀ View ASP Source code਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ
ASP Source Code਍ഀ

ASP File: ਍ഀ vbscript/ado/studentreg/register.asp

਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ
      ਍ഀ  ASP Script
      ਍ഀ  Comments or Client-side ਍ഀ Script
        HTML and Text ਍ഀ
਍ഀ
਍ഀ <html>

<head>
<meta NAME="GENERATOR" ਍ഀ Content="Microsoft FrontPage ਍ഀ 3.0">
<title></title>
</head>

<body ਍ഀ BGCOLOR="#eadfdf">
<font face="Verdana, arial, helvetica">
<%
      Dim ਍ഀ lastname
      Dim ਍ഀ firstname
      Dim ਍ഀ email
      Dim ਍ഀ company
      Dim ਍ഀ coursee
      Dim ਍ഀ courseexpectations
      Dim courselocation ਍ഀ
      Dim ਍ഀ courseTitle
      Dim ਍ഀ coursestartdate

      Set conn = ਍ഀ Server.CreateObject("ADODB.CONNECTION")
      ਍ഀ conn.Open "DSN=studentdatabase;UID=;PWD=;"

      ਍ഀ lastname = Request.Form("LastName")
      firstname ਍ഀ = Request.Form("FirstName")
      email = ਍ഀ Request.Form("Email")
      company = ਍ഀ Request.Form("Company")
      courseexpectations = ਍ഀ Request.Form("TEXTAREA1")
      courselocation = ਍ഀ Request.Form("CourseLocation")
      courseTitle = ਍ഀ Request.Form("CourseTitle")
      coursestartdate = ਍ഀ Request.Form("courstStartDate")

      Set rset = ਍ഀ Server.CreateObject("ADODB.RECORDSET")
      ਍ഀ 'conn.execute("select * from Students")
      ਍ഀ rset.CursorType = 2
      rset.LockType = ਍ഀ 2
      rset.Open "Students", ਍ഀ conn
      ਍ഀ rset.MoveLast

      Set stufields = ਍ഀ rset.Fields

      ਍ഀ rset.AddNew

      stufields.Item(1).Value = ਍ഀ lastname
      stufields.Item(2).Value = ਍ഀ firstname
      stufields.Item(3).Value = ਍ഀ email
      stufields.Item(4).Value = ਍ഀ company
      stufields.Item(5).Value = ਍ഀ courseTitle
      stufields.Item(6).Value = ਍ഀ courselocation
      stufields.Item(7).Value = ਍ഀ coursestartdate
      stufields.Item(8).Value = ਍ഀ courseexpectations
      ਍ഀ rset.Update
      ਍ഀ rset.Close()
      ਍ഀ conn.Close

      ਍ഀ response.write("<html><head><title>Confirmation ਍ഀ Page</title></head>")
      ਍ഀ response.write("    ")
      ਍ഀ response.write("<font face=1,2,3 size=4>The Following Information Was ਍ഀ Entered Successfully</font>")
      ਍ഀ response.write("<p>")
      ਍ഀ response.write("<li><B>Name:</B> " + lastName + ", " + ਍ഀ firstName)
      ਍ഀ response.write("<li><B>E-mail:</B> " + ਍ഀ email)
      ਍ഀ response.write("<li><B>Company:</B> " + company ਍ഀ )
      response.write("<li><B>Course ਍ഀ Expectations:</B> " + ਍ഀ CourseExpectations)
      ਍ഀ response.write("<li><B>Course Title:</B> " + ਍ഀ courseTitle)
      ਍ഀ response.write("<li><B>Course Location:</B> " + ਍ഀ courseLocation)
      ਍ഀ response.write("<li><B>Course Start Date:</B> " + ਍ഀ CourseStartDate)
%>

<p>        ਍ഀ <a href="studentindex.html"><font size="3" ਍ഀ color="#0000ff">-----Return Main Web-----</font> ਍ഀ </p>
</a></font>
</body>
</html>
਍ഀ
਍ഀ
਍ഀ

 

਍ഀ