自学ASP.NET(VB)(1)

qq_43504527

于 2023-07-03 12:52:33 发布

阅读量57

点赞数 1

文章标签： asp.net 后端

本文链接：https://blog.csdn.net/qq_43504527/article/details/131513447

版权

本文展示了如何使用VisualBasic(VB)而非常见的C#在ASP.NET中创建一个登录界面。开发者成功地构建了一个与SQLServer数据库交互的登录表单，当用户点击登录按钮时，会检查用户名和密码的有效性，如果匹配则重定向到欢迎页面。

摘要由CSDN通过智能技术生成

心血来潮，尝试一下，asp.net，网上找了很多资料都是 C#。

可是咱不会C#！

VB在很多年前接触过，看了下，VS也支持用VB写代码的。于是开搞。

首先编写一个登录界面。

数据库用sqlserver ，先建好数据库。

<%@ Page Language="VB" %>
<%@ Import Namespace="System.Data.SqlClient" %>
<!DOCTYPE html>
<html>
<head>
    <title>登录页面</title>
</head>
<body>
    <form id="form1" runat="server">
        <h2>登录</h2>
        <div>
            <label for="txtUsername">用户名:</label>
            <input type="text" id="txtUsername" runat="server" />
        </div>
        <div>
            <label for="txtPassword">密码:</label>
            <input type="password" id="txtPassword" runat="server" />
        </div>
        <div>
            <input type="submit" value="登录" id="btnLogin" runat="server" OnClick="btnLogin_Click" />
        </div>
    </form>

    <script runat="server" language="vb">
        Protected Sub btnLogin_Click(sender As Object, e As EventArgs)
            Dim connectionString As String = "Data Source=YourServer;Initial Catalog=YourDatabase;User ID=YourUsername;Password=YourPassword"
            Dim username As String = txtUsername.Value
            Dim password As String = txtPassword.Value

            Dim query As String = "SELECT COUNT(*) FROM Users WHERE Username = @Username AND Password = @Password"

            Using connection As New SqlConnection(connectionString)
                Using command As New SqlCommand(query, connection)
                    command.Parameters.AddWithValue("@Username", username)
                    command.Parameters.AddWithValue("@Password", password)

                    connection.Open()
                    Dim result As Integer = CInt(command.ExecuteScalar())

                    If result > 0 Then
                        Response.Redirect("Welcome.aspx") ' 登录成功后跳转到欢迎页面
                    Else
                        ' 登录失败的处理
                    End If
                End Using
            End Using
        End Sub
    </script>
</body>
</html>

没想到竟然还能运行。！

qq_43504527

关注

1
点赞
踩
0

收藏

觉得还不错? 一键收藏
1
评论
自学ASP.NET(VB)(1)

VB在很多年前接触过，看了下，VS也支持用VB写代码的。心血来潮，尝试一下，asp.net，网上找了很多资料都是 C#。数据库用sqlserver ，先建好数据库。首先编写一个登录界面。没想到竟然还能运行。
复制链接

扫一扫