La lectura de la base de datos no puede mostrar la página web

lt; @LANGUAGE="VBSCRIPT" CODEPAGE="936"gt;

lt

Dim ConnStr

ConnStr=" Proveedor=Microsoft.Jet.Oledb.4.0; Fuente de datos="amp; Server.MapPath("wsjk.mdb")

Establecer bb=Server.CreateObject("Adodb.Connection")

bb .Open ConnStr

gt;

lt;htmlgt

lt;headgt

lt;meta http- equiv="Tipo de contenido" content="text/html; charset=gb2312"gt;

lt; titlegt;/titlegt; /p>

lt; bodygt;

set rs =server.CreateObject("adodb.recordset")

rs.open "select * from sjkxx1", bb

if(rs.next){

gt;

lt; =rs("i_uid")gt; =rs("i_name")gt;

lt;=rs("i_sex")gt

lt;=rs("i_age")gt; p>lt;=rs("i_vip")gt;

lt;

}

gt;

lt;

lt;/htmlgt;