<% dim conn dim rs dim sql set conn= Server.CreateObject ("ADODB.Connection") set rs= Server.CreateObject ("ADODB.Recordset") conn.open "driver={Microsoft access driver (*.mdb)}; dbq="& Server.MapPath ("database/db_welcome.mdb") sql="select * from java_eng where id_java=1" rs.open sql , conn testo1=rs("testo1") testo2=rs("testo2") testo3=rs("testo3") %>




   







 

 
<% rs.close conn.close set rs=nothing set conn=nothing %>