你設(shè)計(jì)一個(gè)界面,讓別人來(lái)寫代碼,可能嗎?
目前成都創(chuàng)新互聯(lián)已為成百上千的企業(yè)提供了網(wǎng)站建設(shè)、域名、雅安服務(wù)器托管、網(wǎng)站托管、服務(wù)器租用、企業(yè)網(wǎng)站設(shè)計(jì)、信宜網(wǎng)站維護(hù)等服務(wù),公司將堅(jiān)持客戶導(dǎo)向、應(yīng)用為本的策略,正道將秉承"和諧、參與、激情"的文化,與客戶和合作伙伴齊心協(xié)力一起成長(zhǎng),共同發(fā)展。
另外根據(jù)你的想法,VB.NET沒(méi)法實(shí)現(xiàn),需要用C++寫DLL注入,還要破解QQ的加密函數(shù)!
1.創(chuàng)建用戶 create user 新建用戶 密碼
2.將登錄的權(quán)限分配給新建的用戶
grant login to 新建用戶
我這里寫的代碼沒(méi)有測(cè)試,需要具體測(cè)試修改一下,^_^
思路就是這樣,
呵呵,希望能有幫助,^_^
哈哈簡(jiǎn)單哪
第一步:登陸網(wǎng)頁(yè)代碼
第二步:登陸以后判斷是否登陸成功
有兩種方法:1.獲取網(wǎng)頁(yè)代碼,判斷網(wǎng)頁(yè)字符有無(wú)”登陸成功”字樣
源代碼:
2.就是判斷網(wǎng)頁(yè)是否跳轉(zhuǎn)到了某一頁(yè)
源代碼:
兩種方法結(jié)合起來(lái)用,可以判斷網(wǎng)頁(yè)是否無(wú)法連接
問(wèn)題應(yīng)該出在你的查詢語(yǔ)句的結(jié)果沒(méi)有值,你用你的查詢語(yǔ)句到SQL中是否有返回值?記得加上你的條件,另外,你語(yǔ)句里這一句是多余的.Dim s As Object = sComm.ExecuteScalar 以下語(yǔ)句測(cè)試正常 Dim myCn As New SqlClient.SqlConnection Try myCn.ConnectionString = sConnString myCn.Open() Dim mySQL As String = "SELECT * FROM ygzl" Dim sComm As New SqlClient.SqlCommand(mySQL, myCn) If sComm.ExecuteScalar Then Dim User_MainForm As New Form1 User_MainForm.Show() Else MsgBox("用戶名或密碼不正確,請(qǐng)重試!") End If Catch ex As Exception MsgBox(ex.Message) Finally myCn.Close() '關(guān)閉連接 End Try
分享標(biāo)題:vb.net登錄代碼 vb用戶登錄代碼
分享網(wǎng)址:http://muchs.cn/article0/dojhhoo.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供Google、App設(shè)計(jì)、App開(kāi)發(fā)、靜態(tài)網(wǎng)站、網(wǎng)站制作、
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)