<% set con=server.createobject("adodb.connection") set ors=server.createobject("adodb.recordset") set rs1=server.createobject("adodb.recordset") Con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/") & "\data\astrology.mdb;" if request("mode")="add" then If Request("hiddenWord")=Session("VeriFyWord") then Session("__RCOUNT") = Clng(0 & Session("__RCOUNT")) + 1 Session("VeriFyWord") = Fix(Rnd(Session.SessionID) * 10) & Fix(Rnd(Session.SessionID) * 10)& Fix(Rnd(Session.SessionID) * 10)& Fix(Rnd(Session.SessionID) * 10) 'rs1.open "select * from careers where inname='"&trim(request("inname"))&"'",con,3,2 rs1.open "select * from careers",con,3,2 'if rs1.eof<>true then 'for i=1 to 10 'if request("course1")=rs1("course"&(i)) then 'response.write "Course Name already Exists" 'elseif request("course2")=rs1("course"&(i)) then 'response.write "Course Name already Exists" 'elseif request("course3")=rs1("course"&(i)) then 'response.write "Course Name already Exists" 'elseif request("course4")=rs1("course"&(i)) then 'response.write "Course Name already Exists" 'elseif request("course5")=rs1("course"&(i)) then 'response.write "Course Name already Exists" 'elseif request("course6")=rs1("course"&(i)) then 'response.write "Course Name already Exists" 'elseif request("course7")=rs1("course"&(i)) then 'response.write "Course Name already Exists" 'elseif request("course8")=rs1("course"&(i)) then 'response.write "Course Name already Exists" 'elseif request("course9")=rs1("course"&(i)) then 'response.write "Course Name already Exists" 'elseif request("course10")=rs1("course"&(i)) then 'response.write "Course Name already Exists" 'end if 'next 'else rs1.addnew rs1("inname")=request("inname") rs1("address")=request("address") rs1("city")=request("city") rs1("country")=request("country") rs1("phoneno")=request("phoneno") rs1("email")=request("email") rs1("website")=request("website") rs1("regdate")=now() rs1("course1")=request("course1") rs1("course2")=request("course2") rs1("course3")=request("course3") rs1("course4")=request("course4") rs1("course5")=request("course5") rs1("course6")=request("course6") rs1("course7")=request("course7") rs1("course8")=request("course8") rs1("course9")=request("course9") rs1("course10")=request("course10") rs1("item1")=request("comments") rs1.update response.Redirect "careerhome.asp" 'end if Else Session("MemberErrMessage") = "Enter the Verification Letters Correctly." 'response.write Session("MemberErrMessage") ' response.redirect "addnewconference.asp" ReSubmit("vWord") End If end if ?>

Add New Institutions / Courses

Institution Name
Course1	<% Response.Write "-Any-" Do until RSs.EOF Response.Write ""& Rss("careerheading") &"" RSs.MoveNext Loop %>
Course2	<% Response.Write "-Any-" Do until RSs1.EOF Response.Write ""& Rss1("careerheading") &"" RSs1.MoveNext Loop %>
Course3	<% Response.Write "-Any-" Do until RSs2.EOF Response.Write ""& Rss2("careerheading") &"" RSs2.MoveNext Loop %>
Course4	<% Response.Write "-Any-" Do until RSs3.EOF Response.Write ""& Rss3("careerheading") &"" RSs3.MoveNext Loop %>
Course5	<% Response.Write "-Any-" Do until RSs4.EOF Response.Write ""& Rss4("careerheading") &"" RSs4.MoveNext Loop %>
Course6	<% Response.Write "-Any-" Do until RSs5.EOF Response.Write ""& Rss5("careerheading") &"" RSs5.MoveNext Loop %>
Course7	<% Response.Write "-Any-" Do until RSs6.EOF Response.Write ""& Rss6("careerheading") &"" RSs6.MoveNext Loop %>
Course8	<% Response.Write "-Any-" Do until RSs7.EOF Response.Write ""& Rss7("careerheading") &"" RSs7.MoveNext Loop %>
Course9	<% Response.Write "-Any-" Do until RSs8.EOF Response.Write ""& Rss8("careerheading") &"" RSs8.MoveNext Loop %>
Course10	<% Response.Write "-Any-" Do until RSs9.EOF Response.Write ""& Rss9("careerheading") &"" RSs9.MoveNext Loop %>
Address
City
Country
Email
Phoneno
Website http://
Comments
Enter the numbers as it is shown in the box below.
	.gif">.gif">.gif">.gif">

Back 

<% Else%>

Due to some security reasons we discourage using the same session for registering more than one user. Please close this window and open a new session for registering yourself. Thank you very much for your co-operation.

<%End If%>

View the entire list of institution If you want to include any Institution or give suggestion use this link