如何通过VB 表修改SQL 数据库中某个的某个字段?
1个回答
展开全部
连接 srv 数据库语句略
strSQL = "Select * From card"
RS.Open strSQL, db, 3, 3
Do While Not RS.EOF '使历遍整数据表
RS("字段名")=Int(RS("字段名")) '用 Int 取整函数取整
'
RS("字段名")=Round(RS("字段名"),0) '使用 Round 函数四舍五入取掉数部
RS.UpDate
RS.MoveNext
Loop
RS.Close
Set RS = Nothing
strSQL = "Select * From card"
RS.Open strSQL, db, 3, 3
Do While Not RS.EOF '使历遍整数据表
RS("字段名")=Int(RS("字段名")) '用 Int 取整函数取整
'
RS("字段名")=Round(RS("字段名"),0) '使用 Round 函数四舍五入取掉数部
RS.UpDate
RS.MoveNext
Loop
RS.Close
Set RS = Nothing
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
|
广告 您可能关注的内容 |
