Form1.Adodc1.CommandType = adCmdUnknown
Form1.Adodc1.RecordSource = "select * from 管理员 where id='"& Trim(Text1.Text) & "'" & " and password='" & Trim(Text2.Text) & "'"
Form1.Adodc1.Refresh
If Form1.Adodc1.Recordset.RecordCount > 0 Then
Form1.Adodc1.Recordset.Fields(1) = Form2.Text3.Text
Form1.Adodc1.Refresh
怎么不能更新PASSWORD的数据,是不是哪里写错了?????
Form1.Adodc1.RecordSource = "select * from 管理员 where id='"& Trim(Text1.Text) & "'" & " and password='" & Trim(Text2.Text) & "'"
Form1.Adodc1.Refresh
If Form1.Adodc1.Recordset.RecordCount > 0 Then
Form1.Adodc1.Recordset.Fields(1) = Form2.Text3.Text
Form1.Adodc1.Refresh
怎么不能更新PASSWORD的数据,是不是哪里写错了?????
解决方案 »
- vb ICO透明在线请教!!!!!
- 窗体刷新问题
- datagrid控件的难题!!!
- MSHFlexGrid怎末设列宽呀?
- 一个VB调用WebService的问题
- 200大赠送!关于多国语言之输入问题。有请各位大虾!!
- 为何所编写的应用程序,在WIN2000底下可以登录而在98底下不能登录!
- HTTP 请求发送器(ActiveX Dll)源程序,要者跟贴!
- ▲高分求助::::::::::::::::::::::::::我在使用datacombo控件地时候发现一个问题,当不改变其它的值,datacombo的值无法改变!RecordSource是一个查询语句(▲大侠们,救我啊!!!!!!!)
- 帮忙找找
- 在vb中怎樣打開Pdf文檔。
- 我这样向数据库添加新记录为什么会错?该如何添加新记录呢?(求助Addnew用法)
Form1.Adodc1.RecordSource = "select * from 管理员 where id='"& Trim(Text1.Text) & "'" & " and password='" & Trim(Text2.Text) & "'"
Form1.Adodc1.Refresh
If Form1.Adodc1.Recordset.RecordCount > 0 Then
Form1.Adodc1.Recordset.Fields(1) = Form2.Text3.Text
Form1.Adodc1.Recordset.update
Form1.Adodc1.Refresh