Control SSTab

RZK
05 de Abril del 2005
NEcesito utilizar el Control SSTab, pero estoy atorado en un problema, al momento de que quiero almacenar un registro en otra pestaña de ese control me guarda el mismo registro que tengo en la anterior pestaña, como le hago para que sean registros diferentes, lo que hago es lo siguiente:
1.-Abro la base de datos, y mediante un List selecciono el registro que quiero, pero solo en la primer pestaña del SSTab
2.-Al momento de que me paso a la siguiente pestaña ese mismo registro esta en la siguiente pestaña, y asi sucesivamente ( tengo 5 pestañas) y entodas tengo el mismo registro que seleccione al principio.

El codigo es el siguiente:

Private Sub List1_Click(Index As Integer)
If RS.State = 1 Then
RS.Close
End If
Command2.Enabled = True
Command3.Enabled = True
RS.Open "select * from TITULOS where numerodeclasificacion =" & Val(List1(0).List(List1(0).ListIndex)), CN, adOpenDynamic, adLockOptimistic

If RS.BOF = True And RS.EOF = True Then
Else
Text16.Text = RS!numerodeclasificacion & " / " & RS!cutter & " / " & RS!año
Text15.Text = RS!titulo
Text14.Text = RS!autor
Text13.Text = RS!isbn
Text20.Text = RS!numerodeclasificacion & " / " & RS!cutter & " / " & RS!año
Text19.Text = RS!titulo
Text18.Text = RS!autor
Text17.Text = RS!isbn
Text24.Text = RS!numerodeclasificacion & " / " & RS!cutter & " / " & RS!año
Text23.Text = RS!titulo
Text22.Text = RS!autor
Text21.Text = RS!isbn
Text28.Text = RS!numerodeclasificacion & " / " & RS!cutter & " / " & RS!año
Text27.Text = RS!titulo
Text26.Text = RS!autor
Text25.Text = RS!isbn
Text32.Text = RS!numerodeclasificacion & " / " & RS!cutter & " / " & RS!año
Text31.Text = RS!titulo
Text30.Text = RS!autor
Text29.Text = RS!isbn
End If
RS.Close
RS.Open "SELECT * FROM TITULOS", CN, adOpenDynamic, adLockOptimistic
End Sub

3.-Este codigo es de el List dodne selecciono el registro que necesito en la 1er pestaña... Pero en las siguientes pestañas necesito otros registro.... Sé que tengo un error en este codigo¿Alguien me puede ayudar?