vb.net登陆时间的简单介绍

vb.net 用户登入相关问题

首先要把Label1vb.net登陆时间的属性Visible设置为falsevb.net登陆时间，然后双击button1输入vb.net登陆时间：

Dim rs As New Data.DataView()

Dim rs As New DataView()

conn.DataFile = "users.mdb"

conn.SelectCommand = "select top 1 * from users where name='" txtUserName.Text "'and pass='" txtPassword.Text "'"

rs = conn.Select(DataSourceSelectArguments.Empty)

if rs.Count Then

Label1.Visible=true

Session("name") = Trim(txtUserName.Text)

Session("pass") = Trim( txtPassword.Text)

MsgBox("登录成功", MsgBoxStyle.SystemModal)

Response.Redirect("")

Else

MsgBox("对不起vb.net登陆时间！用户名和密码不正确，请重新输入。", MsgBoxStyle.SystemModal)

End If

相关问答

Q1: 在vb.net中如何编写限制软件的使用时间？

给vb.net登陆时间你个方法vb.net登陆时间，在软件加载时就判断下当前系统时间（最好是判断远程服务器上vb.net登陆时间的时间，因为当前运行系统vb.net登陆时间的时间vb.net登陆时间他可以手动），判断当前时间是否有超过最后期限。。

Q2: vb.net关于时间和savesetting的问题

1、如果要设置时间变量应该这样：

Dim a As Date = Date.FromOADate(24 / 9 / 2010)

2、Sub SaveSetting(ByVal AppName As String, ByVal Section As String, ByVal Key As String, ByVal Setting As String)

此函数只能在注册表的“HKEY_CURRENT_USER\Software\VB and VBA Program Settings\”创建应用程序的参数设置，这个函数是从VB6继承过来的，是为了升级vb6代码而使用的。函数中的AppName为项目名，Section为节点，Key为键名，Setting为键值。例如SaveSetting("MyName","Section1","MainKey","Settingvalue")将会在“HKEY_CURRENT_USER\Software\VB and VBA Program Settings\MyName”创建一个节点"Section1"，并在Section1下创建一个键名为"MainKey"，值为"Settingvalue"的键。

至于如何保存RadioButton的值，可以先用"CStr"函数或"CInt"函数将RadioButton是否被选中的Boolean值转换为String或Integer，再使用SaveSetting函数存入注册表。注意：当使用Cstr函数转换Boolean时，如果Boolean为“真”，转换的String就是“True”，反之则是“False”，转换为Integer是0代表假，1代表真。

不知是否详细。

Q3: Vb.net 2008 如何获取网络时间

你是指Internet上的国际标准时间吗。

先加入控件 AxWinsock1 在.Com中Microsoft.Winsock

Public Class Form1

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Integer)

Dim NoSrv As Boolean

Dim TimeFromNet As String

Dim OldTime As Date

Dim NewTime As Date

Dim MyDate As Date

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

If AxWinsock1.CtlState MSWinsockLib.StateConstants.sckClosed Then AxWinsock1.Close()

AxWinsock1.Protocol = MSWinsockLib.ProtocolConstants.sckTCPProtocol

NetTime("") '首先取中科院国家授时中心时间

If NoSrv Or TimeFromNet = "" Then

NetTime("time.nist.gov") '取美国标准技时院时间

If NoSrv Or TimeFromNet = "" Then

MsgBox("检测不到网络标准时间服务器time.nist.gov！")

Else

NetTime("time.nist.gov")

If TimeFromNet = "" Then

MsgBox("网络标准时间服务器time.nist.gov超时！")

Else

MyDate = Mid(TimeFromNet, 8, 8)

OldTime = Mid(TimeFromNet, 17, 8)

NewTime = TimeSerial((Hour(OldTime) + 8) Mod 24, Minute(OldTime), Second(OldTime))

Dim MyTime As DateTime = MyDate Space(1) NewTime

MsgBox(MyTime)

'SetWindowsClock(MyTime)

End If

End If

Else

'使网络误差时间小，第2次再中科院国家授时中心时间

NetTime("")

If TimeFromNet = "" Then

MsgBox("网络标准时间服务器超时！")

Else

MyDate = Mid(TimeFromNet, 8, 8)

NewTime = Mid(TimeFromNet, 17, 8)

Dim MyTime As DateTime = MyDate Space(1) NewTime

MsgBox(MyTime)

'SetWindowsClock(MyTime)

End If

End If

End Sub

Private Sub NetTime(ByVal TimeSrv As String)

NoSrv = False

TimeFromNet = ""

If AxWinsock1.CtlState MSWinsockLib.StateConstants.sckClosed Then AxWinsock1.Close()

AxWinsock1.RemoteHost = TimeSrv ' "" 或 "time.nist.gov"

AxWinsock1.RemotePort = 13

AxWinsock1.LocalPort = 0

AxWinsock1.Connect()

Do While TimeFromNet = ""

If NoSrv Then Exit Do

Sleep(55)

System.Windows.Forms.Application.DoEvents()

Loop

If AxWinsock1.CtlState MSWinsockLib.StateConstants.sckClosed Then AxWinsock1.Close()

End Sub

Private Sub AxAxWinsock1_CloseEvent(ByVal sender As Object, ByVal e As System.EventArgs) Handles AxWinsock1.CloseEvent

AxWinsock1.Close()

End Sub

Private Sub AxAxWinsock1_DataArrival(ByVal sender As Object, ByVal e As AxMSWinsockLib.DMSWinsockControlEvents_DataArrivalEvent) Handles AxWinsock1.DataArrival

AxWinsock1.GetData(TimeFromNet)

End Sub

Private Sub AxAxWinsock1_Error(ByVal sender As Object, ByVal e As AxMSWinsockLib.DMSWinsockControlEvents_ErrorEvent) Handles AxWinsock1.Error

NoSrv = True

End Sub

End Class

Q4: vb.net 用户登录

哈哈简单哪

第一步：登陆网页代码

第二步：登陆以后判断是否登陆成功

有两种方法：1.获取网页代码，判断网页字符有无”登陆成功”字样

源代码：

2.就是判断网页是否跳转到了某一页

源代码：

两种方法结合起来用，可以判断网页是否无法连接

Q5: 想用vb.net做一个登陆界面 在这个界面显示一个指针时钟。就像下面的。谁有现成的例子么？

这个控件不是.net Fremawork自带的，是用户自己添加的控件，你可以去网上找这样的控件，在VS里添加引用就可以了

vb.net登陆时间的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于、vb.net登陆时间的信息别忘了在本站进行查找喔。