vbnet连接mysql数据库登录_vb连接SQL数据库登录代码

烧录icvbnet连接mysql数据库登录_vb连接SQL数据库登录代码我的代码是连接到SQL数据库,输⼊⽤户密码,点登录,然后打开下⼀个界⾯,现在数据库是连上了,但IF语句⽆效,直接⾛ELSE,菜鸟⼀个,⾼⼿帮我改改~(这段代码原来连的是ACCESS数据源...
平面涡卷弹簧
加热膜我的代码是连接到SQL数据库,输⼊⽤户密码,点登录,然后打开下⼀个界⾯,现在数据库是连上了,但IF语句⽆效,直接⾛ELSE,菜鸟⼀个,⾼⼿帮我改改~(这段代码原来连的是ACCESS数据源库) Dim sConnString As String = _ "Data Source =(local);Initial Catalog =LiMin SuperMarket Manage System;Integrated Security=SSPI" Dim myCn As New SqlConnection Private Sub三维打印
OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK.Click Try myCn.ConnectionString = sConnString myCn.Open() Dim mySQL As String = "Select PersonnelID From Users Where Account='" & Me.boxname.Text & "' And Code='" & Me.PasswordTextBox.Text & "'" Dim sComm As New SqlCommand(mySQL, myCn) Dim s As Object = sComm.ExecuteScalar If sComm.ExecuteScalar Then Dim User_MainForm As New form1 User_MainForm.Show() Else MsgBox("⽤户名或密码不正确,请重试!") End If Catch ex As OleDbException MsgBox(ex.Message) Finally myCn.Close() '关闭连接 End Try End Sub教学扩音器
展开
停车场闸机

本文发布于:2024-09-24 17:19:57,感谢您对本站的认可!

本文链接:https://www.17tex.com/tex/1/171534.html

版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系,我们将在24小时内删除。

标签:数据库   登录   连接   代码   涡卷   教学
留言与评论(共有 0 条评论)
   
验证码:
Copyright ©2019-2024 Comsenz Inc.Powered by © 易纺专利技术学习网 豫ICP备2022007602号 豫公网安备41160202000603 站长QQ:729038198 关于我们 投诉建议