Dim parameter As String
parameter = Request.QueryString("User_ID")
If parameter Is Nothing Or parameter = "" Then
ddlRights.SelectedIndex = 3
txtUserId.Text = ""
txtPassword.Text = ""
Else
Dim strsql As String = "select * from table where user_id = " + parameter
Dim ds As New DataSet
ds = regClass.getDS(strsql)
If ds.Tables(0).Rows.Count = 0 Then
Else
txtUserId.Text = CStr(ds.Tables(0).Rows(0)(0))
txtPassword.Text = CStr(ds.Tables(0).Rows(0)(1))
ddlRights.SelectedValue = CStr(ds.Tables(0).Rows(0)(2))
End If
End If