Dim strs As String
strs = "insert into stocks(name,Desc,catcode,quan,unitcost,pdate) values('" & Text1(0).Text & "','" & Text1(1).Text & "','" & Combo1.Text & "','" & Text1(3).Text & "','" & Text1(4).Text & "','" & Format(DTPicker1.Value, "yyyy-mm-dd") & "')"
myDB.Execute (strs)
strs = "insert into stocks(name,Desc,catcode,quan,unitcost,pdate) values('" & Text1(0).Text & "','" & Text1(1).Text & "','" & Combo1.Text & "','" & Text1(3).Text & "','" & Text1(4).Text & "','" & Format(DTPicker1.Value, "yyyy-mm-dd") & "')"
myDB.Execute (strs)
解决方案 »
- VB当鼠标指向“label”时,如何显示提示信息?
- 用inet 控件无法下载网站上文件的问题
- 用vb如何建立树形链表结构?
- 请教补丁问题,如何做的?
- 如何判断动态数组是否已经分配空间(马上结贴)?
- 请教ActiveX DLL ,ActiveX Control ,ActiveX Document DLL 他们3者 有什么关系和区别?
- 如何获得控件名
- 散分需要理由么?200!
- 请问:listbox怎样实现与数据库的梆定!?谢谢!
- ADO访问中文表名的时候出错(ACCESS数据库),帮忙啊!!!!
- 请教关于MODEM拨号连服务器 看基础类的贴子(内有连接地址) 100分 问题解决即给分
- 系统错误&H80004005(-2147467259). 未指定的错误?(急人啊)
我感觉是后面"Text1(0).Text "之类的错误,因为我如果把这些东西改成所要插入的内容就没有错误提示了