sub page_load(S As Object, E As EventArgs)
dim conusers as sqlconnection
dim sql as string
dim rs as sqlcommand
conusers=new sqlconnection("server=localhost;uid=sa;database=TDDB")
sql="insert users(user_id,user_pw) values(@user_id,@user_pw)"
rs=new sqlcommand(sql,concargo)
rs.parameters.add("@user_id",user_id)
rs.parameters.add("@user_pw",user_pw)
conusers.open()
rs.executenonquery()
conusers.close()
end sub