为 Web 服务分配用户名和密码 vb.NET

Assign Username and Password to Web Service vb.NET

我需要在 vb.NET 中创建一个具有用户名和密码的网络服务。
换句话说,我需要我的 Web 服务具有 windows 帐户之类的凭据。

但我不知道该怎么做...

创建网络服务时,只需添加用户名和密码参数即可。例如下面的 web 服务将用户名和密码作为字符串,使用它们登录到数据库和 returns 数据集(未显示打开连接功能)。我使用 TLS 1.2 加密连接:

Imports System.Web.Services
Imports System.Web.Services.Protocols
Imports Oracle.DataAccess.Client
Imports System.ComponentModel
Imports System.Net.mail
Imports System.IO

<System.Web.Services.WebService(Namespace:="http://tempuri.org/")> _
<System.Web.Services.WebServiceBinding ConformsTo:=WsiProfiles.BasicProfile1_1)> _
<ToolboxItem(False)> _
Public Class MyWebService
    Inherits System.Web.Services.WebService
        <WebMethod()> _
    Public Function GetData(ByVal pUsername As String, ByVal pPassword As String) As DataSet
        Dim MyDataSet As DataSet
        Dim MyConnection As OracleConnection = OpenConnection(pUsername, pPassword)
        Try
            MyDataSet = GetUserData(MyConnection, pUsername)
            MyConnection.Close()
            MyConnection.Dispose()
            MyConnection = Nothing
            Return MyDataSet

        Catch ex As Exception
            MyConnection.Close()
            MyConnection.Dispose()
            MyConnection = Nothing
            Return New DataSet
        End Try
    End Function
End Class