vb6连接MS SQL2000数据库的问题
用Vb6新建一个窗体,然后用ADO控件打算连接本地机的SQL2000数据库,数据库名为AAA,请求详细的操作步骤和方法。数据库是在企业管理器中的sqlsrver组里新建的...
用Vb6新建一个窗体,然后用ADO控件打算连接本地机的SQL2000数据库,数据库名为AAA,请求详细的操作步骤和方法。
数据库是在企业管理器中的sql srver组里新建的,不知道做的对不对
追问:现在想设置一个语句:在文本框1中输入姓名文本框2中输入查询原因,点击按钮1,在a表查询姓名,如果不存在存在则弹出警示框,如果存在则检查文本框2输入是否为中文,不是中文则弹出警示框。如果都符合要求则把文本框1和文本框2的输入添加到b表。并且抓取本机IP、MAC、登录时间添加到b表。窗体隐藏不可见。程序后台运行。如果断电或者关机或者退出关闭本软件,则记录该时间并写入b表 展开
数据库是在企业管理器中的sql srver组里新建的,不知道做的对不对
追问:现在想设置一个语句:在文本框1中输入姓名文本框2中输入查询原因,点击按钮1,在a表查询姓名,如果不存在存在则弹出警示框,如果存在则检查文本框2输入是否为中文,不是中文则弹出警示框。如果都符合要求则把文本框1和文本框2的输入添加到b表。并且抓取本机IP、MAC、登录时间添加到b表。窗体隐藏不可见。程序后台运行。如果断电或者关机或者退出关闭本软件,则记录该时间并写入b表 展开
2个回答
展开全部
不要用ADO控件,不方便。
推荐使用ADO引用,即在引用中加入ADODB.DLL。
然后按如下步骤:
1、创建对象
dim cn as new connection
dim rs as new recordset
dim s as string
'打开数据库连接
s="driver=sql server;server=.;uid=你的登录ID;pwd=你的登录密码;database=AAAA;"
cn.connctionstring=s
cn.open
'接下来用recordset对象读取数据,示例代码,因不知道你的表及结构。
s="select 字段1,字段2 from 表名 where 字段1=条件"
rs.open s,cn,3,1 '3和1的意思,请看帮助文档,目的是使用recordset对象中的数据可灵活使用。
'关闭对象
rs.close
set rs=nothing
cn.close
set cn=nothing
推荐使用ADO引用,即在引用中加入ADODB.DLL。
然后按如下步骤:
1、创建对象
dim cn as new connection
dim rs as new recordset
dim s as string
'打开数据库连接
s="driver=sql server;server=.;uid=你的登录ID;pwd=你的登录密码;database=AAAA;"
cn.connctionstring=s
cn.open
'接下来用recordset对象读取数据,示例代码,因不知道你的表及结构。
s="select 字段1,字段2 from 表名 where 字段1=条件"
rs.open s,cn,3,1 '3和1的意思,请看帮助文档,目的是使用recordset对象中的数据可灵活使用。
'关闭对象
rs.close
set rs=nothing
cn.close
set cn=nothing
追问
已经连接,非常感谢
追问:现在想设置一个语句:在文本框1中输入姓名文本框2中输入查询原因,点击按钮1,在a表查询姓名,如果不存在存在则弹出警示框,如果存在则检查文本框2输入是否为中文,不是中文则弹出警示框。如果都符合要求则把文本框1和文本框2的输入添加到b表。并且抓取本机IP、MAC、登录时间添加到b表。窗体隐藏不可见。程序后台运行。如果断电或者关机或者退出关闭本软件,则记录该时间并写入b表
解答为您加分
追答
已经不是同一个问题了。
请先采纳这个问题的回答。
再开个新题,我来回答。
ZESTRON
2024-09-04 广告
2024-09-04 广告
在Dr. O.K. Wack Chemie GmbH,我们高度重视ZESTRON的表界面分析技术。该技术通过深入研究材料表面与界面的性质,为提升产品质量与可靠性提供了有力支持。ZESTRON的表界面分析不仅涵盖了相变化、化学反应、吸附与解吸...
点击进入详情页
本回答由ZESTRON提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询