正文
vb.net密码更改 vb设置密码登录界面
提示：扫一扫查出行【扫一扫了解最新限行尾号】
复制提示
vb.net修改登录密码，帮忙看看这个哪里错了呢，该怎么写？
Dim sql As String = "Update userTable Set 密码='" TextBox2.Text " ' where 用户名='" ursename "'"
相关问答
Q1: vb.net中怎么修改用户密码？ds1.Tables.Item(0).Rows.Item(0).Item(1) = userpassword提示无法找到表0
你可以debug将sql语句截出来放到数据里运行一下试试sql语句有没有问题
再有将ds1.Tables.Item(0)改为ds.Tables[0]试试
Q2: vb.net中修改用户密码
以下这里有错误vb.net密码更改：
Dim mysqlstr As String = "SELECT * FROM 登录表 WHERE users='" username " 'AND password='" userpassword " '"
修改为vb.net密码更改：
Dim mysqlstr As String = "SELECT * FROM 登录表 WHERE users='" username "' AND password='" userpassword "'"
Q3: VB.NET修改密码代码，只要写更改按钮即可，谢谢。。
汗等等 我最近也在做 我贴代码吧，这些什么原始密码和新密码不是要用户输入嘛，我连接的是SQLstring userID = textBox1.Text; //用户名
string passWorld = textBox2.Text; //密码
string newpwd = textBox3.Text; //新密码
Login login1=new Login(); //登陆窗口实例
if (mima() == 1)
{
SqlConnection mySqlconnection = new SqlConnection(login1.connectionString);
SqlCommand myCommand = new SqlCommand("update Table1 set 密码='" + newpwd.Trim() + "'where 账号='" + userID.Trim() + "'and 密码='" + passWorld.Trim() + "'", mySqlconnection);
mySqlconnection.Open();
int command = myCommand.ExecuteNonQuery();
if (command = 1)
{
if (MessageBox.Show("密码修改成功，现在马上去登陆？", "确定", MessageBoxButtons.OKCancel, MessageBoxIcon.Question) == DialogResult.OK)
{
mySqlconnection.Close();
this.Close();
login1.Show();
}
}
else
{
mySqlconnection.Close();
MessageBox.Show("用户不存在或密码错误");
}
}
else
{
MessageBox.Show("新密码不能与旧密码相同!!");
textBox2.Text = "";
textBox3.Text = "";
textBox2.Focus();
}
Q4: vb.net 绑定数据源后，给数据库文件设置了密码，怎么修改程序？
constr= "Driver={Microsoft Access Driver (*.mdb)};Dbq=c:\aaa.mdb;Uid=admin;Pwd=**********;"
'其中 **********就是你数据库的密码
Q5: vb.net 如何修改access数据库文件的密码
If Trim(ypsw.Text) = "" Then
MsgBox("原密码不能为空vb.net密码更改！", MsgBoxStyle.Critical)
ElseIf Trim(xpsw.Text) = "" Then
MsgBox("新密码不能为空！", MsgBoxStyle.Critical)
ElseIf Trim(qpsw.Text) Trim(xpsw.Text) Then
MsgBox("确认密码与新密码不一致！", MsgBoxStyle.Critical)
Else
Dim mycon As New OleDbConnection
mycon.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" Application.StartupPath "\data\Datas.mdb"
mycon.Open()
Dim mycmd As New OleDbCommand
mycmd.CommandText = "select * from 管理员 where 用户名='admin' and 密码='" ypsw.Text " '"
mycmd.Connection = mycon
Dim myada As New OleDbDataAdapter
myada.SelectCommand = mycmd
Dim myda As New DataSet
myada.Fill(myda, "yh")
If myda.Tables("yh").Rows.Count 1 Then
MsgBox("您输入的原密码不正确vb.net密码更改，请重新输入！", MsgBoxStyle.Critical)
ypsw.Focus()
Else
mycmd.CommandText = "update 管理员 set 密码='" Trim(ypsw.Text) " '"
mycmd.ExecuteNonQuery()
MsgBox("密码修改成功！", MsgBoxStyle.Information)
End If
End If
关于vb.net密码更改和vb设置密码登录界面的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。
