如何使用vb6.0将数据从文本框插入到sql表

Posted 2023-04-19

【中文标题】如何使用vb6.0将数据从文本框插入到sql表

【英文标题】：How to insert datas from textbox to sqltable using vb6.0

【发布时间】：2015-10-27 06:44:21

【问题描述】：

vb 新手并尝试了以下代码。在谷歌搜索解决方案。但我对结果感到困惑。所以我在 SO 中发帖。

Dim con As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim cmd As ADODB.Command
Dim statement As String


Private Sub cmd_update_Click()
con.Open "Provider=SQLOLEDB;Data Source=STPLSVR06.syrmatech.local;Initial Catalog=BVM;Database=Bluestar;uid=sa;pwd=STPLadmin098;"
rs.Open = "insert into Test_Duct values(txt_Board_SrNo.Text,txt_Test_DateTime.Text,txt_User_Name.Text,txt_Communication_status.Text,txt_WatchDog_Status.Text,txt_VoltMes.Text,txt_VoltStatus.Text)"

rs.Close
con.Close
End Sub

我使用了视频中的这段代码，但在“rs.open”语句中出现编译器错误。 如果你们中的任何人能给出一个好的插入命令或帮助找出错误，我将不胜感激。

【问题讨论】：

我知道。它错了但我没有办法得到一本书。现在。我需要尽快完成它。这是我老板的命令。对不起。但是请帮助如何插入表格..

为什么要预订？在线 ADO 有帮助，例如这里 - msdn.microsoft.com/en-us/library/ms678086(v=vs.85).aspx ；有许多带有解释的好示例（不是视频！）。如果您需要“尽快完成”，但对代码一无所知，那么请聘请一些知识渊博的开发人员。

谢谢@Arvo。但我只需要知道如何使用插入命令。并且需要知道我尝试的是浪费吗？

搜索ADO连接方式，允许执行任何SQL命令。您尝试过的并没有浪费 - 但通常最好先了解您需要什么以及任何框架/API 为您提供的选项，然后才开始使用（或复制粘贴）这些方法。

VBA, ADO.Connection and query parameters的可能重复项？

【参考方案1】：

Val 只保存数字。 试试这个：

Dim usrname As String 'declare as a string

brdSrNo = txt_Board_SrNo.Text
usrname = txt_User_Name.Text
rs.Open "insert into vbtest values(" & brdSrNo & ",'" & usrname & "')", con,adOpenDynamic, adLockBatchOptimistic

'string should be given in single quotes

记得添加“adOpenDynamic, adLockBatchOptimistic” 据我所知，这只是一个小小的帮助。但是在继续之前尝试学习。

【讨论】：

非常感谢@kopika 我会试试这个。

只保存数字。输入名称时，值会自动存储为 0