报错吗,这里是一个赋值的部分代码 -------------------------------- set rs=server.createobject("adodb.recordset") sql="SELECT * FROM table" rs.open sql,conn,1,1 '显示数据 text1.text=rs("filed1")
也不是报错 把Text1.Text="select max(序号) from 表1"写在一个按扭控件下 按这个控件是没反映
试试这样行不行: sqltxt="select 序号 from 表1 order by 序号 DESC" '降序排列 adodc1.recordset movefirst text1.text=adodc1.recordset.fields("序号")或者: sqltxt="select max(序号) as xh from 表1 group by 序号" text1.text=adodc1.recordset.fields("xh")
可以先参考一下ADO手册中的例子是如何访问数据库的。
放一个Adodc到窗体上form_load 里面写 Adodc1.ConnectionString = "Provider=microsoft.jet.oledb.4.0;data source=E:\Access DB\Database1.mdb;" Adodc1.RecordSource = "select max(序号) as 序号 from 表1" Adodc1.Refresh属性里设置text1的 datasource =adodc1 datafield="序号"
--------------------------------
set rs=server.createobject("adodb.recordset")
sql="SELECT * FROM table"
rs.open sql,conn,1,1
'显示数据
text1.text=rs("filed1")
sqltxt="select 序号 from 表1 order by 序号 DESC" '降序排列
adodc1.recordset movefirst
text1.text=adodc1.recordset.fields("序号")或者:
sqltxt="select max(序号) as xh from 表1 group by 序号"
text1.text=adodc1.recordset.fields("xh")
Adodc1.ConnectionString = "Provider=microsoft.jet.oledb.4.0;data source=E:\Access DB\Database1.mdb;"
Adodc1.RecordSource = "select max(序号) as 序号 from 表1"
Adodc1.Refresh属性里设置text1的
datasource =adodc1
datafield="序号"