|
-
Jun 3rd, 2001, 04:10 PM
#1
Thread Starter
New Member
Listview and Subitems
Got a question for you all.
In this program a module called Recoredset.
This is the area of the problem.
---------------------------------------------------------------------
Public Sub Validate(UserName, Password As String)
Dim Rs As ADODB.Recordset
Set Rs = New ADODB.Recordset
Dim SQL As String
SQL = "Select * from Passwords where UserName = " & Chr(34) & UserName & Chr(34)
Rs.Open SQL, conn, adOpenKeyset, adLockReadOnly
With FrmBMServer
If Rs.EOF = True Then .sckServerWinsockConnection(.InitMax).SendData "InValid UserName": Exit Sub
If UCase(Password) = UCase(Rs!Password) Then
.sckServerWinsockConnection(.InitMax).SendData "Password Validated"
.lvUsers.ListItems.Add , , UserName
.lvUsers.ListItems(1).SubItems(1) = Count + 1
.lvUsers.ListItems(2).SubItems(1) = Count + 2 <- Right Here
Else
.sckServerWinsockConnection(.InitMax).SendData "InValid Password"
End If
End With
Rs.Close
Set Rs = Nothing
FrmBMServer.Label7.Caption = Err.Description
End Sub
---------------------------------------------------------------------
The line that has the arrow next to it is my problem.
I have a ListView set up and it has too columnheaders at the top. First column is UserName.
Second Column is Port Number.
What I want it to do is to put user name in the first column row and the port number in the second column row.
Im not sure on how to do this. There's got to be a way to check if column row's 1 2 3 etc are already filled, and if so add a new one plus need to figuer out how to put a counter in for the port numbers.
So it sould look somthing like this.
column Username | Column Port Number
-------------------------------------
Texg | 1
Bill | 2
ect...
Thanks for your help
TexG
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|