% '----------connect to database------------------------------ Set conn = Server.CreateObject("ADODB.Connection") Conn.open Application ("DSN_bishaedu") 'Conn.open "DSN=DSN_bishaedu;uid=administrator;pwd=moe.com;database=bisha1" '-------------------- get the previous opinions ------------ selectsql="select * from students_details" set rs_select=Server.CreateObject("ADODB.Connection") set rs_select=conn.execute(selectsql) %>