用php作ssl证书用openssl的函数
来源:百度知道 编辑:UC知道 时间:2024/06/05 10:54:25
希望大家 尽快解答
Private Sub lvwUsers_Click(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles lvwUsers.Click
Using objData As New DABase
Try
objData.SQL = "UserPackage.usp_SelectUser"
objData.InitializeCommand()
objData.AddParameter("inUserID", _
Data.OracleClient.OracleType.Char, _
36, lvwUsers.SelectedItems.Item(0).Tag)
objData.AddParameter("results_cursor", _
Data.OracleClient.OracleType.Cursor, _
Data.ParameterDirection.Output)
objData.OpenConnection()
objData.DataReader = objData.Command.ExecuteReader
If objData.DataReader.HasRows Then
objData.DataReader.Read()
txtUserID.Text = _
objData.DataReader.Item("UserID").ToString.ToUpper
txtName.Text = _
objData.DataReader.Item("Name")
txtPassword.Text = String.Empty
For intIndex = 0 To objRolesDS.Tables("Roles").Rows.Count - 1