VB.NET用户登录页面实现技巧分享

开发 后端
在用户登录页面的实现上,开发人员可以使用VB.NET这门语言来轻松的实现。在这里大家将会会了解到VB.NET用户登录页面的具体实现方法。

VB.NET的应用方式比较简单灵活,大多数开发人员在刚接触这门语言不久后就被他的灵活易用,功能强大等特点深深吸引住了。我们今天将会为大家介绍的实用技巧是VB.NET用户登录页面的实现方法,希望能给大家带来一些帮助。

VB.NET用户登录页面代码示例:

  1. Private Sub Button2_Click(ByVal 
    sender As System.Object, ByVal e 
    As System.EventArgs) Handles 
    Button2.Click   
  2. If TextBox3.Text = "" Or
     
    TextBox4.Text = "" Then   
  3. Label35.Text = "请确认您的输入!"   
  4. Return   
  5. End If   
  6. Dim sql As String = "select * 
    from pwd where stu_id=@stu_id 
    and pwd=@pwd"
       
  7. Dim comm As SqlCommand = New 
    SqlCommand(sql, conn)   
  8. comm.Parameters.Add(New SqlParameter
    ("@stu_id", SqlDbType.Int, 4))   
  9. comm.Parameters("@stu_id").Value = 
    TextBox3.Text   
  10. comm.Parameters.Add(New SqlParameter
    ("@pwd", SqlDbType.Char, 16))   
  11. comm.Parameters("@pwd").Value = 
    TextBox4.Text   
  12. Dim dr As SqlDataReader   
  13. conn.Open()   
  14. dr = comm.ExecuteReader   
  15. If dr.Read Then   
  16. Session("stu_id") = TextBox3.Text   
  17. dr.Close()   
  18. comm.Cancel()   
  19. Dim sql_3 As String = "update 
    stu_base set point=point+1
     where stu_id=@stu_id"
       
  20. comm = New SqlCommand(sql_3, conn)   
  21. comm.Parameters.Add(New SqlParameter
    ("@stu_id", SqlDbType.Int, 4))   
  22. comm.Parameters("@stu_id").
    Value
     = Session("stu_id")   
  23. comm.ExecuteNonQuery()   
  24. comm.Cancel()   
  25. Response.Redirect("detail.aspx?
    stu_id='" & Session("stu_id") & "'")   
  26. Else   
  27. Label35.Text = "您还没有注册或账号密码错误"   
  28. End If   
  29. End Sub    
  30. Private Sub Button1_Click(ByVal 
    sender As System.Object, ByVal e As 
    System.EventArgs) Handles Button1.Click   
  31. TextBox1.Text = ""   
  32. TextBox2.Text = ""   
  33. End Sub  

VB.NET用户登录页面相关实现方法就为大家介绍到这里。

【编辑推荐】

  1. VB.NET加密文件实现技巧分享
  2. VB.NET数组赋值怪异现象揭秘
  3. VB.NET自定义属性应用方式解析
  4. VB.NET异常迭代捕捉代码示例
  5. VB.NET共享成员变量创建技巧解析
责任编辑:曹凯 来源: pcppc.cn
相关推荐

2010-01-18 18:50:26

VB.NET鼠标手势

2010-01-18 16:33:57

VB.NET加密文件

2010-01-14 16:04:32

VB.NET显示时间

2010-01-18 10:26:19

VB.NET中心旋转图

2010-01-07 13:40:50

VB.NET读取XML

2010-01-15 19:04:09

2010-01-22 11:02:30

VB.NET创建新变量

2010-01-13 15:52:59

VB.NET浮动窗体

2010-01-22 13:16:05

VB.NET初始化数组

2010-01-13 16:45:44

VB.NET删除控件

2010-01-11 15:31:04

VB.NET拖动窗体

2010-01-08 18:31:45

VB.NET历史菜单

2010-01-07 10:02:53

Flash控制VB.N

2010-01-19 15:30:44

VB.NET比较运算符

2010-01-13 10:25:30

VB.NET文件夹操作

2010-01-15 19:24:42

2010-01-22 16:27:19

VB.NET关于对话框

2010-01-11 16:04:10

VB.NET使用wit

2010-01-13 14:41:18

VB.NET列出目录内

2010-01-18 19:36:52

VB.NET调整控件
点赞
收藏

51CTO技术栈公众号