VB6.0中用SQL语句想数据表中添加一条记录
我用VB6.0写个向数据库里其中一个数据表里添加一条记录,用的SQL语句是
strsql = "insert into 商品分类表 (商品分类码,商品分类名) values (" + bm + "," + mc + ")"其中bm=text1.text, mc=text2.text,数据类型都是string,但是运行的时候bm和mc只能数字,只要其中一个出现中文或者英文,就会出错"实时错误'-2147217904(80040e10:至少一个参数没有被指定值",请问是哪里出错
mycon.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:\aaa\db1.mdb"
mycon.Open
strsql = "insert into 商品分类表 (商品分类码,商品分类名) values (" + bm + "," + mc + ")"
Set mycmd.ActiveConnection = mycon
mycmd.CommandText = strsql
Set myrs = mycmd.Execute
请大侠指教
改成:
strsql = "insert into 商品分类表 (商品分类码,商品分类名) values ('" + bm + "','" + mc + "')"
VB6.0中用SQL语句想数据表中添加一条记录
strsql = "insert into 商品分类表 (商品分类码,商品分类名) values (" + bm + "," + mc + ")"改成:strsql = "insert into 商品分类表 (商品分类码,商品分类名) values ('" + bm + "','" + mc + "')"
vb6.0如何向已存在的数据库添加新记录
Public myc As ADODB.ConnectionSet myc = New ADODB.Connection myc.CursorLocation = adUseClient myc.Open "driver={microsoft access driver (*.mdb)};dbq=数据库名.mdb;defaultdir=数据库所在文件夹;uid=;pwd=;"myc.Execute "insert int 表名 (字段列表) values ('" & text1.text & "','...
请问vb6.0怎么SQL连接并对数据库中的数据进行操作
使用text1.text=rs.file(0)就可以把文本框于查询结果帮定起来 如果要对数据库进行修这时用以下代码：db.Execute （<SQL语句--如"insert into student(sno,sname) value("","")">)方法2，工程--部件--选择microsoft data bound grid control 5.0 然后在窗体中添加左边工具栏的 DATA 和DBGRID ...
vb6.0中如何使用sql语句(急,只要告诉我把代码放在哪就行)
首先的逻辑思维就不正确。比如我用mshflexgrid1显示你的数据 就可以这样写 set mshflexgrid.datasource=Adodc1.RecordSource 现在已经很少人用adodc控件了 一般用 adodb组件 我现在告诉你一种方法 你在vb的工程中 工程-引用 添加micfosoft activex data objects 2.5 library然后在你想要显示数据的某个过...
vb6.0如何用代码实现往access中添加字段的数据?请高手解答,代码要详 ...
'打开结果集。 注：此SQL语句查询出来的结果只可以有一条数据。rs.Open "select * from tbl_aa where id = 1 ", cn, adOpenDynamic, adLockOptimistic, adCmdText '为所要修改的字段赋值。（rs!姓名）中的“姓名”是数据表中的某个具体字段名 rs!姓名 = Trim(TextBox.text)'更新一下 rs....
用vb向已存在的数据库中添加记录
可以用一个字符串变量来实现：sqlText="INSERT INTO " & TableName &（字段名1，字段名2……） VALUES（数据1，数据2……）
VB6.0 怎么连接access已经建立好的表格?请在每条语句后面加上注解,小弟...
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=G:\\实验平台\\数据库\\留言板.mdb"End Sub '增加记录 Private Sub Command1_Click()Dim sql As String Set Recordset = Nothing sql = "select * from liuyan" 'SQL查询语句 Recordset.Open sql, Conn, 1, 3 Recordset.AddNew Recordset...
vb中如何调用Access数据表中的某一个记?
在VB6.0中调用Access数据表中的某个记录，可借助ADO控件实现。具体操作如下：1. 首先，确保在项目中添加ADO控件。在“工程”菜单下的“部件…”选项中，选择并添加Microsoft ActiveX Data Objects 2.5 到工具箱。2. 将ADO控件拖至窗体，然后在代码编辑器中编写代码，通过ADO对象连接Access数据库。例如...
VB6.0 操作SQL数据库(查询,修改,删除,添加)功能
你这里没有理解用VB拼接sql的方法 select * from jbxx where 编号='A-001'如果要将查询条件变为可变的，那么应该类似下面的方法进行编写：dim strSql as string strSql="select * from jbxx where 编号='" & "A-001" & "'"然后进行执行 ...
VB6.0连接SQL数据库,并读取某表格的数据出来???
Set Rst = New ADODB.Recordset '记录集对象的实例化 '二，连接数据库文件 '执行 ADODB.Connection对象的Open方法，完成数据库的连接 Conn.CursorLocation = adUseClient '连接SQL的字符串格式如下 '"Provider=SQLOLEDB.1;Password=登录SQL的密码;Persist Security Info=True;User ID=SQL数据库实例名;...
