Editing: info4stu/register_action.asp

<!--#INCLUDE FILE="ConnectDB.asp"--> <% nregister = Request.Form("txtregister") txtusername=request.form("txtun") txtpassword1=request.form("txtpw1") txtpassword2=request.form("txtpw2") date_mo=now if txtpassword1=txtpassword2 then sql = "select * from student where id_stu = '" & nregister & "' " response.write "stu" Set ors = Server.CreateObject("ADODB.Recordset") ors.Open sql, Conn, 1, 3 ' login_name_l=ors("login_name_l") 'response.write login_name_l if not ors.eof then result = ors(0) end if ors.Close set ors = nothing if result > 0 then sqls="insert into info_member(id_member,id_status,username,password,datetimestamp) values('"&nregister&"','1','"&txtusername&"','"&txtpassword1&"','"&date_mo&"')" set orss=server.createobject("adodb.recordset") orss.open sql,conn,1,3 Session("id_member1") = txtusername 'response.write (sqls) Response.redirect "login_form.asp" else Session.abandon %> <script language="javascript"> { alert('����ժ���㹰ҹ�����ŹШ�� '); window.location.href='login_form.asp'; } </script> <% end if else%> <script language="javascript"> { alert('Password1 �Ѻ Password2 ���ç�ѹ�Ш�� '); window.location.href='login_form.asp'; } </script> <% 'Response.redirect "login_form.asp" end if %>