冰楓論壇
標題:
【VB.NET】管理端+客戶端源碼
[打印本頁]
作者:
台灣速龍
時間:
2015-7-22 01:59
標題:
【VB.NET】管理端+客戶端源碼
本帖最後由 台灣速龍 於 2015-7-29 13:11 編輯
說明:
在源碼Debug資料夾底下有個MySql.Data.dll,請在專案裡面加入參考,要給別人使用時要把執行檔與MySql.Data.dll放在同一個位置。
部分程式碼:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
connect()
Dim READER As MySqlDataReader
Try
MysqlConn.Open()
Dim Query As String
Query = "select * from sql684338.account where 帳號='" & TextBox1.Text & "' and 密碼='" & TextBox2.Text & "'"
'從資料庫中的資料表選擇所有欄位並找出符合帳號以及密碼的欄位
COMMAND = New MySqlCommand(Query, MysqlConn)
READER = COMMAND.ExecuteReader
Dim count As Integer = 0
While READER.Read() '每次比對增加一次,比對到帳號及密碼都符合為止
count += 1
End While
If count = 1 Then '比對完成
MsgBox("登入成功!", vbInformation, "分享於冰楓論壇")
Form2.Show()
Me.Hide()
Else
MsgBox("登入失敗", vbCritical, "分享於冰楓論壇")
End If
MysqlConn.Close()
Catch ex As MySqlException
MsgBox("無法連接資料庫", vbCritical, "分享於冰楓論壇")
Finally
MysqlConn.Dispose()
End Try
End Sub
複製代碼
客戶端介面:
2015-7-22 01:59 上傳
下載附件
(88.05 KB)
管理端介面:
2015-7-22 01:59 上傳
下載附件
(193.36 KB)
2015-7-22 15:59 上傳
下載附件
(149.38 KB)
SQL申請及設定部分:
請點我連接
載點:
作者:
aaa0986555377
時間:
2015-7-22 10:22
感謝
作者:
魚鬆哥
時間:
2015-7-23 17:25
讚啦 這偵得是太神拉
作者:
jjj80603
時間:
2015-8-10 19:27
謝謝 速龍大 我很想了解 ~
作者:
cpu66300
時間:
2015-8-25 20:35
本帖最後由 cpu66300 於 2015-8-25 20:37 編輯
我在學習VB 這個也來 學習看看^^
作者:
奶茶喔
時間:
2015-9-1 20:28
所以這類似卡號的工具?
作者:
周家家
時間:
2016-4-23 05:49
謝謝速龍哥分享 小弟我拿去學習囉^^
作者:
21278051
時間:
2016-6-28 05:38
提示:
作者被禁止或刪除 內容自動屏蔽
作者:
qwas963563
時間:
2016-7-14 23:25
目前我剛好需要 謝謝速龍大大的源碼
我測試看看有問題再問你
作者:
x6412645
時間:
2016-7-25 19:55
謝謝速龍 我最近在學VB
作者:
happy09033
時間:
2016-8-24 21:05
能有教學嗎?一直連線失敗~不知道該怎麼辦...
作者:
tickorabbit
時間:
2016-10-3 00:07
最近正在學這個,真是太神拉!
作者:
fucker
時間:
2017-7-29 20:09
隨風飄逸飄呀飄
作者:
ggaa123456
時間:
2020-1-30 20:08
感謝大大 感恩大大
歡迎光臨 冰楓論壇 (https://bingfong.com/)
Powered by 冰楓