Mostrar Mensajes
Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.
Dim rsCargaLista As ADODB.Recordset
Private Sub CargarListBox()
rsCargaLista.Open "SELECT * FROM tarifas", nc, adOpenDynamic, adLockOptimistic
List1.Clear
Do Until rsCargaLista.EOF
List1.AddItem rsCargaLista("reg_des")
Loop
rsCargaLista.Close
End SubvSQL = "SELECT * Tabla WHERE ID=" & List1.ItemData(List1.Listindex)La idea que tengo es descompilar y volverlo a compilar, o es posible acceder directamente al codigo del MSDATGRD.OCX???
, puede ser que SQL Lite no tome esa forma. igualmente fijate lo que te dice leandro, porque si el campo id es clave, te va a tirar error porque hay 2 id iguales.
Private Sub Form_Load()
Call Prueba(3)
End Sub
Private Function Prueba(ByVal vNumero As Integer) As Integer
Dim b As Integer
b = 0
Select Case vNumero
Case 3
b = 2 + 1 And Not 1
Debug.Print b
End Select
a = b
End Function...no tengo mucho tiempo que dedicarle a la web y es por eso que la mia esta como esta abandonada totalmente , le instale un foro SMF igual que este una versión mas vieja y ni entro jaja, lo hice para verlo nomas, pero tenia ganas de ponerme un foro y ir posteando codigo y esas cosas tambien..tenia la idea de reformarla toda, ya tengo el diseño, tengo miles de plantillas que me he bajado y tengo un DVD lleno de diseños de web que le puedo poner a mi web, pero no es asi nomas, la que tengo ahora esta sin plantillas ni nada, esta hecha a mano 
, pero algun dia la voy a hacer, ya que es algo que lo quiero hacer, pero va a tardar .