01.
02.
Set
Conn = Server.CreateObject(
"ADODB.connection"
)
03.
ConnStr=
"Driver=Microsoft Visual Foxpro Driver; "
+ _
04.
"UID=;SourceType=DBC;SourceDB=C:\Data.DBC"
05.
Conn.Open ConnStr
06.
07.
08.
09.
strSQL =
"SELECT * FROM employee "
10.
Set
rs = Server.CreateObject(
"ADODB.Recordset"
)
11.
rs.Open strSQL, ConnStr, 1,3
12.
13.