关于asp点虐 (vb)中如何查看用户信息的问题!

先加AccessDataSource设置你的数据库连接，然后用个GridView绑定到AccessDataSource上，编辑你的AccessDataSource中Where选项根据实际情况写好，然后在你提交查询的那个按钮的事件里面执行GridView的数据绑定就好：GridView1.DataSource=AccessDataSource。

公司主营业务：网站制作、成都网站建设、移动网站开发等业务。帮助企业客户真正实现互联网宣传，提高企业的竞争能力。创新互联公司是一支青春激扬、勤奋敬业、活力青春激扬、勤奋敬业、活力澎湃、和谐高效的团队。公司秉承以“开放、自由、严谨、自律”为核心的企业文化，感谢他们对我们的高要求，感谢他们从不同领域给我们带来的挑战，让我们激情的团队有机会用头脑与智慧不断的给客户带来惊喜。创新互联公司推出香洲免费做网站回馈大家。

SQL:select * from 数据库名 where 用户名=TextBox1.text (如果用TextBox的话)

vb点虐 获取局域网计算机的当前用户名和计算机型号等信息

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

'用这种方法在远程获得再发回本机就可以吧

'取计算机型号暂时不会

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

网站栏目：vbnet域用户清单 vbnet dir
文章出自：http://hbruida.cn/article/ddeiidp.html