<%response.buffer=true%> <% A=session ("n") B=session ("u") C=session ("p") Randomize RD = trim(Int((6 * Rnd) + 1)) bk=trim(Int((4 * Rnd) + 3)) m=trim(Int((5 * Rnd) + 2)) m1=trim(Int((2 * Rnd) + 7)) m2=trim(Int((7 * Rnd) + 1)) m3=trim(Int((10 * Rnd) + 4)) m4=trim(Int((9 * Rnd) + 1)) m5= trim(Int((100 * Rnd) + 100)) m6= Int((10 * Rnd) + 100) m7= Int((100 * Rnd) + 10) m8=trim(m6+m7) sqlstr="select *from admin where Administrator='"+B+"' and Password='"+C+"';" rs.open sqlstr,conn if rs.bof and rs.eof then session ("up")=false response.redirect "softaddnew2.asp" else session ("up")=true sqlthem="INSERT INTO theloaisoft VALUES('"+m8+""+RD+""+m+""+m1+""+m2+""+m3+""+m4+""+m5+""+bk+"','"+A+"')" conn.execute sqlthem response.redirect "softaddnext.asp" end if %>