VB写入SQL
VB界面中有3个文本框:text1text2text3单击按钮command1,3个文本框内的数值写入SQL2005的数据库中,(数据库名:xsda表名:cj字段名分别是...
VB界面中有3个文本框:text1 text2 text3
单击按钮command1 ,3个文本框内的数值写入SQL2005的数据库中,
(数据库名:xsda 表名:cj 字段名分别是:yw sx wl ID(记录)号是005 数据库用户名:sa pass:123) 展开
单击按钮command1 ,3个文本框内的数值写入SQL2005的数据库中,
(数据库名:xsda 表名:cj 字段名分别是:yw sx wl ID(记录)号是005 数据库用户名:sa pass:123) 展开
展开全部
建立一个ADO数据库连接,然后用SQL语句插入数据...
如:
Private Sub Commmand1_Click()
Dim adoConn As New ADODB.Connection
Dim adoConStr AS String
Dim mySQL AS String
adoConStr="Provider=SQLOLEDB.1;Persist Security Info=True;User ID=sa; Password=123;
Data Source =服务器名;Initial Catalog=xsda;"
mySQL="INSERT INTO cj(yw,sx,wl,ID) Values ('"+Text1+"','"+Text2+"','"+text3+"',005)"
adoConn.Open adoConStr
adoConn.Execute mySQL
...
据我观察你录入是成绩数据,如果数据字段是“数值”型的话,那SQL语句就要变一下了...
一是数值转换,二是保留了2位小数
mySQL="INSERT INTO cj(yw,xs,wl,ID) Values ("
mySQL=mySQL + Format(text1,"#0.00")+","
mySQL=mySQL + Format(text2,"#0.00")+","
mySQL=mySQL + Format(text3,"#0.00")+",005)"
在执行插入的SQL 语句
adoConn.Execute mySQL
End Sub
如:
Private Sub Commmand1_Click()
Dim adoConn As New ADODB.Connection
Dim adoConStr AS String
Dim mySQL AS String
adoConStr="Provider=SQLOLEDB.1;Persist Security Info=True;User ID=sa; Password=123;
Data Source =服务器名;Initial Catalog=xsda;"
mySQL="INSERT INTO cj(yw,sx,wl,ID) Values ('"+Text1+"','"+Text2+"','"+text3+"',005)"
adoConn.Open adoConStr
adoConn.Execute mySQL
...
据我观察你录入是成绩数据,如果数据字段是“数值”型的话,那SQL语句就要变一下了...
一是数值转换,二是保留了2位小数
mySQL="INSERT INTO cj(yw,xs,wl,ID) Values ("
mySQL=mySQL + Format(text1,"#0.00")+","
mySQL=mySQL + Format(text2,"#0.00")+","
mySQL=mySQL + Format(text3,"#0.00")+",005)"
在执行插入的SQL 语句
adoConn.Execute mySQL
End Sub
展开全部
结构化查询语言(Structured Query Language)简称SQL(发音:/ˈes kjuː ˈel/ "S-Q-L"),是一种特殊目的的编程语言,是一种数据库查询和程序设计语言,用于存取数据以及查询、更新和管理关系数据库系统。
VB可将Sql查询语句赋值给Adodc数据控件的属性或提供给Ado数据对象,完成存取数据以及查询、更新和管理关系数据库系统。
VB可将Sql查询语句赋值给Adodc数据控件的属性或提供给Ado数据对象,完成存取数据以及查询、更新和管理关系数据库系统。
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |