關于asp點虐 (vb)中如何查看用戶信息的問題!

先加AccessDataSource設置你的數(shù)據(jù)庫連接，然后用個GridView綁定到AccessDataSource上，編輯你的AccessDataSource中Where選項根據(jù)實際情況寫好，然后在你提交查詢的那個按鈕的事件里面執(zhí)行GridView的數(shù)據(jù)綁定就好：GridView1.DataSource=AccessDataSource。

公司主營業(yè)務：網(wǎng)站制作、成都網(wǎng)站建設、移動網(wǎng)站開發(fā)等業(yè)務。幫助企業(yè)客戶真正實現(xiàn)互聯(lián)網(wǎng)宣傳，提高企業(yè)的競爭能力。創(chuàng)新互聯(lián)公司是一支青春激揚、勤奮敬業(yè)、活力青春激揚、勤奮敬業(yè)、活力澎湃、和諧高效的團隊。公司秉承以“開放、自由、嚴謹、自律”為核心的企業(yè)文化，感謝他們對我們的高要求，感謝他們從不同領域給我們帶來的挑戰(zhàn)，讓我們激情的團隊有機會用頭腦與智慧不斷的給客戶帶來驚喜。創(chuàng)新互聯(lián)公司推出香洲免費做網(wǎng)站回饋大家。

SQL:select * from 數(shù)據(jù)庫名 where 用戶名=TextBox1.text (如果用TextBox的話)

vb點虐 獲取局域網(wǎng)計算機的當前用戶名和計算機型號等信息

Private Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long

Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long

Private Sub GetName()

Dim sJM As String

Dim sMC As String

Dim sIP As String

Dim s As String

s = String(128, Chr(0))

GetComputerName s, Len(s)

s = UCase(Left(s, InStr(1, s, Chr(0)) - 1))

sJM = s'計算機名稱

s = String(128, Chr(0))

GetUserName s, Len(s)

s = UCase(Left(s, InStr(1, s, Chr(0)) - 1))

sMC = s‘當前用戶名稱

End Sub

'用這種方法在遠程獲得再發(fā)回本機就可以吧

'取計算機型號暫時不會

VB.NET 如何獲取主機在域中的用戶名？

Private?Sub?Button1_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button1.Click

Dim?UserID?As?String?=?Environment.GetEnvironmentVariable("USERNAME")?'獲取用戶名?

MsgBox(UserID)

End?Sub