Cn.ConnectionString = "Provider=VFPOLEDB.1;Data Source='c:/学生管理.dbc';"
Cn.Open
Cn.Execute "SET ENGINEBEHAVIOR 70" 'SQL Group by 在8.0中为向标准SQL
Rs.Open "Select * from sview", Cn, adOpenForwardOnly, adLockOptimistic, adCmdText
Cn.ConnectionString = "Provider=VFPOLEDB.1;Data Source='c:/学生管理.dbc';"
Cn.Open
Cn.Execute "SET ENGINEBEHAVIOR 70" 'SQL Group by 在8.0中为向标准SQL
Rs.Open "Select * from sview", Cn, adOpenForwardOnly, adLockOptimistic, adCmdText