- <%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
- <%
- 'option explicit
- response.buffer=true
- dim conn,connstr
- Set Conn=Server.CreateObject("ADODB.Connection")
- connstr ="Provider=Microsoft.jet.OLEDB.4.0; Data Source ="& Server.MapPath("gbook.mdb")
- Conn.Open connstr
- %>