求简单联接数据库代码

Question

看了很多的项目例子，可还是无从下手。所以请教高手
比如我现在只有一个普通的窗体，已有ODBC数据源（如：MyDB,UID=sa,PWD=""）,如何将窗体上的文本框控件里的数据添加入数据库中？谢谢！

Answer 1

1你连接数据库的方式，adodc控件可以，adodb也可以
2.连接字符串www.connectionstring.com基本全了，你选择你需要的
3.insert into得sql语句写好了完成
你既然看了很多的项目，这些一定没问题的
最差最差，你到csdn搜索adodb也可以找到

Answer 2

Private Sub Command1_Click()
Dim conn As New ADODB.Connection   '创建一个 Connection 实例，在这里使用New等于将Dim和Set合并为一段代码执行
Dim rs As ADODB.Recordset    '创建一个 Recordset 实例，不使用New 是因为，经常需要重复使用Set，因此没必要在这里使用
Dim CnStr As String, Sql As String  '创建两个字符串变量分别存放两个集合的SQL语句代码段'也可以使用这段简易代码
'CnStr = "Provider=SQLOLEDB;Data Source=" & DbIp & ";DATABASE=" & DbName & ";UID=sa" & DbUser & ";pwd=" & DbPw
CnStr = "PROVIDER=MSDASQL;dsn=zxg007;uid=sa;pwd=;"
conn.Open CnStr '使用 Connection 集合的 Open 方法 与数据库建立连接Sql = "select * from clk" 'SQL查询语句
Set rs = New ADODB.Recordset '新建一个实例
'rs.Open Sql, conn '使用 Open 方法打开数据库中的一个表
rs.Open Sql, conn, 1, 3  '后面的3是确定读写权限的
rs.AddNewrs.Fields("CL_ID") = Trim(Text1.Text)
rs.Fields("CL_NAME") = Trim(Text2.Text)rs.Update
rs.Close
Unload Me

Answer 3

Sql = "select * from clk where cl_id=' " & " '9999999"想查cl_id为9999999的记录提出来应该怎么写？谢谢！

Answer 4

Sql = "select * from clk where cl_id='9999999'"

Answer 5

Sql = "select * from clk where cl_id=9999999"