<% Dim str1, str2 str1 = request.form("T1") str2 = request.form("T2") Dim mrpw_cn1 set mrpw_cn1 = Server.CreateObject("ADODB.Connection") mrpw_cn1.Provider = "Microsoft.Jet.OLEDB.4.0" mrpw_cn1.Open(Server.Mappath(".\database\mathyardRegn.mdb")) Dim mrpw_rs1 set mrpw_rs1 = Server.CreateObject("ADODB.Recordset") mrpw_rs1.Open "SELECT * FROM musrDet where munm = '" & str1 & "' AND mpwd = '" & str2 & "'", mrpw_cn1, adOpenKeyset, adLockoptimistic, adCmdText %>



Welcome to
Mathyards Individual page


www.MathYards.com

Login

User Name

Password

New Instructor Registration

Free Registration.

 

New Student Registration

Free Registration.

 
 

Copyright © eClasshome 2006