第一篇：管理員登錄系統(tǒng)

第一?。。?，（index.asp 用戶登陸頁面）

第二篇：VB用戶登錄管理系統(tǒng)

軟件開發(fā)環(huán)境與工具

實(shí)驗(yàn)報(bào)告

實(shí)驗(yàn)二

實(shí)驗(yàn)題目：用戶登錄及管理系統(tǒng) 實(shí)驗(yàn)地點(diǎn)：軟件實(shí)驗(yàn)室一 指導(dǎo)老師：王琦 實(shí)驗(yàn)類型：設(shè)計(jì)型

系 班：計(jì)算機(jī)科學(xué)與技術(shù)系1103班 姓 名：秦芳芳（2011100316）

2013年11月22日

一．實(shí)驗(yàn)項(xiàng)目名稱：用戶登錄及管理系統(tǒng) 二.實(shí)驗(yàn)?zāi)康暮腿蝿?wù)：

1、掌握系統(tǒng)登錄界面設(shè)計(jì)基本流程

2、了解用戶管理所要實(shí)現(xiàn)的基本功能

3、要求利用三層架構(gòu)思想機(jī)ado.Net相關(guān)技術(shù)實(shí)現(xiàn)程序

三.實(shí)驗(yàn)內(nèi)容及要求：

1、能夠進(jìn)行登錄驗(yàn)證

2、能夠?qū)崿F(xiàn)對用戶的基本管理,管理員能夠進(jìn)行查詢添加修改刪除

3、利用ado.net數(shù)據(jù)庫連接訪問數(shù)據(jù)庫,提高安全性

四．實(shí)驗(yàn)步驟：

1、class1.vb的代碼：

Imports System.Data.SqlClient Public Class Class1

Dim strconn As String = Me.getstrconn()Public Function yanzheng(ByVal str1 As String)As Integer

Dim conn As New SqlConnection conn.ConnectionString = strconn conn.Open()Dim cmd As New SqlCommand

cmd.CommandText = “select * from student where sname ='” & str1 & “'” cmd.Connection = conn 'cmd.CommandType = CommandType.Text

Dim dr As SqlDataReader dr = cmd.ExecuteReader If dr.Read Then dr.Close()conn.Close()Return 1 Else

dr.Close()conn.Close()Return 0 End If

End Function

Public Function pwdyanzheng(ByVal str As String)As SqlDataReader

Dim conn As New SqlConnection conn.ConnectionString = strconn conn.Open()

Dim cmd As New SqlCommand

cmd.CommandText = “select * from student where sname = '” & str & “'” cmd.Connection = conn Dim dr As SqlDataReader = cmd.ExecuteReader Return dr End Function

Public Function getstrconn()As String

Dim str As String str = “server=” & System.Configuration.ConfigurationManager.AppSettings(“server”)& “;” str &= “uid=” & System.Configuration.ConfigurationManager.AppSettings(“uid”)& “;” str &= “pwd=” & System.Configuration.ConfigurationManager.AppSettings(“pwd”)& “;” str &= “database=” & System.Configuration.ConfigurationManager.AppSettings(“database”)Return str End Function

Public Function getalldata()As DataSet

Dim conn As New SqlConnection conn.ConnectionString = strconn conn.Open()Dim da As New SqlDataAdapter(“select * from student”, conn)Dim ds As New DataSet da.Fill(ds, “student”)conn.Close()Return ds End Function

Public Function insdata(ByVal str1 As String, ByVal str2 As String)As String

Dim conn As New SqlConnection conn.ConnectionString = strconn Dim cmd As New SqlCommand cmd.Connection = conn cmd.CommandText = “insert into student(sname,sno)values('” & str1 & “','” & str2 & “')”

Try

conn.Open()cmd.ExecuteNonQuery()Return “1”

Catch ex As Exception

Return “-1” & ex.Message End Try

conn.Close()

End Function

Public Function upd(ByVal str1 As String, ByVal str2 As String)As String

Dim conn As New SqlConnection conn.ConnectionString = strconn Dim cmd As New SqlCommand cmd.Connection = conn cmd.CommandText = “update student set sno ='” & str2 & “'where sname ='” & str1 & “'”

Try

conn.Open()cmd.ExecuteNonQuery()Return “1”

Catch ex As Exception

Return “-1” & ex.Message End Try

conn.Close()End Function

Public Function deldata(ByVal str As String)As String

Dim conn As New SqlConnection conn.ConnectionString = strconn Dim cmd As New SqlCommand cmd.Connection = conn cmd.CommandText = “delete from student where sname ='” & str & “'”

Try

conn.Open()cmd.ExecuteNonQuery()Return “1”

Catch ex As Exception

Return “-1” & ex.Message End Try

conn.Close()End Function

Public Function search(ByVal str1 As String)As String

Dim conn As New SqlConnection conn.ConnectionString = strconn Dim cmd As New SqlCommand cmd.Connection = conn cmd.CommandText = “select * from student”

Try

conn.Open()cmd.ExecuteNonQuery()Return “1”

Catch ex As Exception

Return “-1” & ex.Message End Try

conn.Close()End Function

End Class

2、進(jìn)入界面功能的代碼：

Imports System.Data.SqlClient Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles Button1.Click Dim o As New Class

1Dim f As Integer

f = o.yanzheng(Me.TextBox1.Text)If f = 0 Then

MsgBox(“不存在該用戶，請重新輸入！”)Me.TextBox1.Text = “"

Me.TextBox1.Focus()Else

If f = 1 Then

Dim dr As SqlDataReader

dr = o.pwdyanzheng(Me.TextBox1.Text)dr.Read()If RTrim(dr!sno)<> Me.TextBox2.Text Then MsgBox(”密碼錯(cuò)誤，請重新輸入！“)Me.TextBox2.Text = ”“

Me.TextBox2.Focus()Else

Dim strpwd As String

strpwd = Me.TextBox2.Text strpwd = System.Web.Security.FormsAuthentication.HashPasswordForStoringInConfigFile(strpwd, ”md5“)Dim frm As New Form2

frm.loginname = Me.TextBox1.Text frm.logintime = TimeOfDay frm.Show()Me.Hide()End If

End If

End If

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles Button2.Click MyBase.Dispose()

End Sub End Class

3、用戶管理和瀏覽信息界面的代碼： Public Class Form2

Public loginname As String

Public logintime As String

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles Button1.Click Me.Hide()Form3.Show()End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles Button2.Click Me.Hide()Form4.Show()End Sub

Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles MyBase.Load Me.loginstatusname.Text = ”用戶名：“ & loginname Me.loginstatustime.Text = ”登錄時(shí)間：“ & logintime End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles Timer1.Tick Me.ToolStripStatusLabel1.Text = Now End Sub End Class

4、增，刪，改，查功能頁面的代碼： Public Class Form3

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles Button3.Click Me.Hide()del.Show()End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles Button1.Click Me.Hide()ins.Show()End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles Button2.Click Me.Hide()upda.Show()End Sub

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As

System.EventArgs)Handles Button4.Click Me.Close()search.Show()End Sub End Class

5、顯示信息界面的代碼： Public Class Form4

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles Button1.Click Me.Close()Form2.Show()End Sub

Private Sub Form4_Load(ByVal sender As Object, ByVal e As System.EventArgs)Handles Me.Load Dim o As New Class

1Dim ds As New DataSet ds = o.getalldata()Me.DataGridView1.Refresh()Me.DataGridView1.DataSource = ds.Tables(”student“)End Sub End Class

6、插入信息界面的代碼： Public Class ins

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles Button1.Click Dim o As New Class1

o.insdata(Me.TextBox1.Text, Me.TextBox2.Text)Me.Close()Form2.Show()End Sub End Class

7、查詢信息界面的代碼： Public Class search

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As

System.EventArgs)Handles Button1.Click Dim o As New Class

1Dim ds As New DataSet

o.search(Me.TextBox1.Text)ds = o.getalldata()Me.DataGridView1.Refresh()Me.DataGridView1.DataSource = ds.Tables(”student")End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As

System.EventArgs)Handles Button2.Click

Me.Close()Form2.Show()End Sub

Private Sub DataGridView1_CellClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs)Handles DataGridView1.CellClick Me.TextBox1.Text = DataGridView1.CurrentRow.Cells.Item(0).Value.ToString Me.TextBox2.Text = DataGridView1.CurrentRow.Cells.Item(1).Value.ToString Me.TextBox3.Text = DataGridView1.CurrentRow.Cells.Item(2).Value.ToString Me.TextBox4.Text = DataGridView1.CurrentRow.Cells.Item(3).Value.ToString Me.TextBox5.Text = DataGridView1.CurrentRow.Cells.Item(4).Value.ToString End Sub End Class

8、修改信息界面的代碼： Public Class upda

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles Button1.Click Dim o As New Class1

o.upd(Me.TextBox1.Text, Me.TextBox2.Text)Me.Close()Form2.Show()End Sub End Class

9、刪除信息界面的代碼： Public Class del

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As

System.EventArgs)Handles Button1.Click Dim o As New Class1

'o.deldata(Me.TextBox1.Text)o.deldata(Me.TextBox1.Text)Me.Close()Form2.Show()End Sub

End Class

五、運(yùn)行結(jié)果及截圖：

（1）建立數(shù)據(jù)庫

（2）運(yùn)行截圖

六、實(shí)驗(yàn)總結(jié)：

通過本次實(shí)驗(yàn)，我大致掌握了一個(gè)登錄系統(tǒng)界面設(shè)計(jì)的基本流程，同時(shí)了解了用戶管理所要實(shí)現(xiàn)的基本功能，而且能夠利用三層架構(gòu)思想機(jī)ado.Net相關(guān)技術(shù)實(shí)現(xiàn)程序，能夠進(jìn)行登錄驗(yàn)證，實(shí)現(xiàn)了對用戶的基本管理,在系統(tǒng)中實(shí)現(xiàn)了增刪查改的功能，利用ado.net數(shù)據(jù)庫連接訪問數(shù)據(jù)庫,提高了安全性，為以后的學(xué)習(xí)打下了很好的基礎(chǔ)。

第三篇：管理員帳戶設(shè)置了密碼,但系統(tǒng)還是自動(dòng)登錄的解決方法

管理員帳戶設(shè)置了密碼,但系統(tǒng)還是自動(dòng)登錄的解決方法

基于種種原因，人們會(huì)對Win XP/2003登錄帳戶設(shè)置登錄密碼，這樣每次登錄系統(tǒng)都要輸入密，比較麻煩。

于是，有人想既給帳戶設(shè)置登錄密碼，又希望系統(tǒng)能夠自動(dòng)登錄，不用輸入密碼。這能否辦得到呢？答案是肯定的。然而，好多網(wǎng)友不知道怎么去設(shè)置自動(dòng)登錄，于是乎論壇上就常有問如何設(shè)置自動(dòng)登錄的求助帖子。

為此，我特意發(fā)這個(gè)教程，講述如何實(shí)現(xiàn)系統(tǒng)自動(dòng)登錄的圖解設(shè)置過程，希望對那些網(wǎng)友有所幫助。下面是自動(dòng)登錄設(shè)置的詳細(xì)過程：

1、運(yùn)行命令“control userpasswords2”

點(diǎn)擊“開始”→運(yùn)行→輸入control userpasswords2→確定

2、先點(diǎn)選要設(shè)置自動(dòng)登錄的帳戶名，然后點(diǎn)“要使用本機(jī)，必須輸入用戶名和密碼”前面的方框，去掉里面的√，然后點(diǎn)“確定”。

3、在“自動(dòng)登錄”設(shè)置窗口中，“密碼”和“確認(rèn)密碼”框里輸入該帳戶的登錄密碼，最后點(diǎn)“確定”。重啟系統(tǒng)試試，是不是能夠自動(dòng)登錄了。

日后，你如果改變了注意，不想用“自動(dòng)登錄”了，則可在上述第2步“用戶帳戶”窗口中，點(diǎn)“要使用本機(jī)，必須輸入用戶名和密碼”前面的方框，出現(xiàn)個(gè)√，之后點(diǎn)“確定”即可。

第四篇：登錄系統(tǒng)設(shè)計(jì)個(gè)人小結(jié)

項(xiàng)目實(shí)訓(xùn)總結(jié)

通過本次課程設(shè)計(jì)，我感受頗多，盡管上課時(shí)也認(rèn)真聽了老師的講課，但是已開始面對自己的題目時(shí)，還真是有些不知所措，都不知道如何下手，后來鼓起勇氣著手實(shí)訓(xùn)，縱然前面會(huì)很多挫折，硬著頭皮開始了。

本次實(shí)訓(xùn)是分工合作形式，我負(fù)責(zé)JSP頁面設(shè)計(jì)，在這過程中，要設(shè)計(jì)登錄界面，管理員，教師和學(xué)生的相關(guān)功能。我負(fù)責(zé)了部分代碼的完成，對于第一次合作完成一個(gè)完整教務(wù)登錄管理系統(tǒng)確實(shí)有些摸不著頭腦。然而，經(jīng)過這差不多四個(gè)星期來的學(xué)習(xí)與編碼，總算還是收獲不少，對JavaEE的認(rèn)識也更加的深刻了。JSP是一門新技術(shù)，他基于Java Servlet以及整個(gè)JavaEE框架體系的Web開發(fā)技術(shù)。從網(wǎng)上得知JavaEE的中文問題歷史悠久，連綿不絕，至今也沒有完全解決，但是上有政策下有對策，我們總是有辦法搞定它的。跟JavaEE相關(guān)的中文問題主要有兩類，一類是編程的問題，涉及到I/O，內(nèi)碼轉(zhuǎn)換等。第二類是JavaEE運(yùn)行環(huán)境的配置，涉及字體，屬性配置等。覺得很有必要給自己寫個(gè)備忘錄之類的。學(xué)習(xí)了JavaEE，感觸很深，這一技術(shù)是需要有一定基礎(chǔ)、而且動(dòng)手能力強(qiáng)的學(xué)科。書上也強(qiáng)調(diào)一點(diǎn)是：要想真正地掌握J(rèn)avaEE技術(shù)，必須有較好的java語言基礎(chǔ)，以及HTML語言方面的知識。想想的確對啊。

在這個(gè)過程中，我感覺就像人生的一個(gè)縮影，充滿了酸甜苦辣。當(dāng)一個(gè)問題想了好久也無法解決時(shí)，我感到沮喪與無助。當(dāng)經(jīng)過努力解決了一個(gè)程序上的難題時(shí)，我感到無比的喜悅。當(dāng)經(jīng)過每天為了編寫代碼一坐就是四五個(gè)小時(shí)，晚上還要寫到凌晨一兩點(diǎn)鐘的時(shí)候，我感到無比的痛苦。但艱難痛苦已成往事，燦爛的明天向我走來，今天我總算迎接了勝利的果實(shí)，以前的辛酸與痛苦化作我堅(jiān)強(qiáng)的力量，將在我將來的人生歷程中，為我的美好明天打下堅(jiān)實(shí)的基礎(chǔ)。

從功能上來講，本教務(wù)系統(tǒng)數(shù)據(jù)庫采用自頂而下的設(shè)計(jì)思路，數(shù)據(jù)庫的訪問權(quán)限逐層限制。同時(shí)處于同一層次的不同角色之間的權(quán)限有交叉性又有差異性?；旧夏軌蛲瓿蓪?shù)據(jù)的查詢，添加，刪除，修改等基本的數(shù)據(jù)庫系統(tǒng)操作。

從數(shù)據(jù)庫的運(yùn)行效率上來講，本教務(wù)管理系統(tǒng)由于沒有采用數(shù)據(jù)庫管理系統(tǒng)的默認(rèn)的系統(tǒng)參數(shù)，并根據(jù)的實(shí)際的數(shù)據(jù)需求進(jìn)行重新配臵，同時(shí)對物理體系結(jié)構(gòu)的調(diào)整，使得數(shù)據(jù)庫的運(yùn)行效率得到提高。我們做東西，也是要追求進(jìn)步，如果說做出來的東西和以前的系統(tǒng)都沒什么兩樣，這樣意義也不大。不過，這也得是在我們能力所及的范圍內(nèi)，我們得適當(dāng)?shù)匕盐蘸米约旱臅r(shí)間和現(xiàn)有資源進(jìn)行適當(dāng)?shù)脑O(shè)計(jì)。相信自己的努力還是能有一個(gè)很好的結(jié)果的，我們得對自己的發(fā)展有一個(gè)好的概括。

本教務(wù)管理系統(tǒng)登錄設(shè)計(jì)，歷時(shí)三周，從2017年底，經(jīng)過了2018這嶄新的一年每天都要寫學(xué)習(xí)日報(bào)，報(bào)告總結(jié)每天學(xué)習(xí)了什么，遇到什么問題，如何處理等，這種方式讓我們養(yǎng)成了好的學(xué)習(xí)習(xí)慣，確實(shí)受益匪淺。說實(shí)在話，一直覺得自己有做不完的作業(yè)，剛開始還有些抱怨，但隨著作業(yè)的進(jìn)行，我們慢慢看到了自己的小小成果，覺得付出有了回報(bào)，并開始樂在其中。在這期間，老師也一直陪伴和鼓勵(lì)我們，告訴我們，只要堅(jiān)持做下去，我們會(huì)收獲到成功的喜悅的！謝謝老師和同學(xué)們的鼓勵(lì)和支持！

第五篇：Windows_XP如何登錄Administrator賬戶以及刪除管理員賬戶的方法

XP系統(tǒng)一般情況下在裝完系統(tǒng)后會(huì)有一個(gè)計(jì)算機(jī)管理員權(quán)限的用戶，以后登陸時(shí)就顯示這個(gè)用戶，而看不到 Administrator賬戶，并且進(jìn)入XP系統(tǒng)后在控制面板中的用戶賬戶下看不到Administrator用戶，就好像丟失了一樣，如何看到，并使 用Administrator賬戶呢？那么又如何刪除計(jì)算機(jī)管理員權(quán)限的用戶呢？

（1）登陸Administrator賬戶

方法一：進(jìn)入“控制面板”->“用戶賬戶”->“更改用戶登錄或注銷的方式”，然后將“使用歡迎屏幕”前的勾選去掉。重新啟動(dòng)計(jì)算機(jī)，使用用戶名：Administrator，輸入密碼（沒有密碼就不要輸入），OK!方法二：單擊“開始/運(yùn)行”，輸入“rundll32 netplwiz.dll,UsersRunDll”，按回車鍵后彈出“用戶賬戶”窗口，這和“控制面板”中打開的“用戶賬戶”窗口不同！然后取消選定“ 要使用本機(jī)，用戶必須輸入用戶名和密碼”選項(xiàng)，單擊確定。在彈出的對話框中輸入你想讓電腦每次自動(dòng)登錄的賬戶（默認(rèn)Administrator）和密碼即 可。下一次開機(jī)自動(dòng)用Administrator登陸到系統(tǒng)，再看控制面板就有了Administrator。

（2）刪除計(jì)算機(jī)管理員權(quán)限的賬戶

單擊“開始/運(yùn)行”，輸入“rundll32 netplwiz.dll,UsersRunDll”，按回車鍵后彈出“用戶賬戶”窗口，在本機(jī)用戶中，選中要?jiǎng)h除的計(jì)算機(jī)管理員權(quán)限的賬戶，然后單擊下面的刪除按鈕，OK。

======================= 如何刪除管理員賬戶方法2009-04-20 13:55

其一:在“開始→運(yùn)行”中輸入compmgmt.msc，在打開的“計(jì)算機(jī)管理”控制臺中定位到“系統(tǒng)工具→本地用戶和組→用戶”，在右側(cè)窗口的列表中選中所要?jiǎng)h除的目標(biāo)賬戶，右鍵點(diǎn)擊之并選擇“刪除”，關(guān)閉控制臺。

其二:在注冊表中刪除,簡單的說,你可以查找要?jiǎng)h除的管理員的名字,將查詢出來的結(jié)果都刪除即可.其三:筆者的Windows XP系統(tǒng)一直是使用“Administrator”管理員賬戶，并沒有再創(chuàng)建其他賬戶。最近為了測試系統(tǒng)創(chuàng)建一個(gè)新超級管理員賬戶（如圖1所示），但是測試完成后，在“用戶賬戶”里卻找不到本應(yīng)有的刪除賬戶的菜單（如圖2所示）。

分析：

當(dāng)Windows XP安裝完成第一次登錄時(shí)，系統(tǒng)要求輸入使用的用戶名，這里輸入的用戶名稱不允許是“Administrator”和“Guest”。如果此時(shí)冷啟動(dòng)系統(tǒng)，下次登錄Windows XP將自動(dòng)以“Administrator”賬戶登錄。在Windows XP創(chuàng)建新管理員賬戶后，原先的“Administrator”賬戶已經(jīng)隱藏，系統(tǒng)就認(rèn)為新建的管理員賬戶為唯一的管理員賬戶。

解決：

問題找到了，解決起來就容易多了，只需要讓系統(tǒng)“明白”有另外一個(gè)系統(tǒng)管理員賬戶就可以刪除新建的管理員賬戶。具體操作步驟如下：

1.以“Administrator”賬戶登錄Windows XP，點(diǎn)擊“開始→運(yùn)行”，在運(yùn)行文本框中輸入“gpedit.msc”，回車后打開“組策略”工具；

2.在“組策略”窗口的目錄樹中展開“計(jì)算機(jī)配置→Windows設(shè)置→安全設(shè)置→本地策略→安全選項(xiàng)”，接著在右窗口中雙擊“賬戶：重命名系統(tǒng)管理員賬戶”，輸入其他字符更改系統(tǒng)管理員名稱（如圖3所示）；

3.要“控制面板”中打開“用戶賬戶”，可以發(fā)現(xiàn)“Administrator”已經(jīng)更名為剛剛更改的名稱，單擊創(chuàng)建的管理員賬戶，進(jìn)入具體操作窗口，單擊“刪除賬戶”進(jìn)入具體刪除操作（如圖4所示）。

4.如果希望以“Administrator”使用系統(tǒng)，重復(fù)步驟2更換回來即可

如果以上中提到的命令沒有運(yùn)行結(jié)果，那么可以用下面的方法：

在xp系統(tǒng)中，可以依次單擊：控制面板－>計(jì)算機(jī)管理，然后在左邊框中，單擊“本地用戶和組”，打開tree，然后選中用戶，就可以在右邊看到計(jì)算機(jī)上所有的用戶了，然后選中目標(biāo)用戶，進(jìn)行刪除操作皆可。

同時(shí)選中組，就可以在右邊看到關(guān)于組的詳細(xì)信息，可以對相應(yīng)的目標(biāo)組進(jìn)行操作，刪除或修改。