jarpsoft

De nada man, en lo que pueda ayudarte solo pregunta. Bueno tienes que valorar las respuestas. Darle un puntaje el que creas correcto. Nos vemos.

Aqui te mando un pequeño ejemplo de una listview con base de datos. Me avisas si te funciono. Option Explicit Dim cn As New ADODB.Connection Dim rs As New ADODB.Recordset Private Sub Command1_Click() Dim sql As String Dim fd As Field Dim j As Integer...

Para poder ayudarte necesito datos específicos, como por ejemplo con cuanto de memoria RAM cuentas, otra con que Sistema Operativo trabajas. Suponiendo que estés con Windows XP y tengas 128 MB de ram (lo mínimo para XP) lo que tendrías que hacer es...

Necesitas utilizar el API "NetShareAdd". Aca te pongo un ejemplo: Espero te sirva. Suerte. Option Explicit Private Const NERR_SUCCESS As Long = 0& 'tipos compartidos Private Const STYPE_ALL As Long = -1 'note: my const Private Const STYPE_DISKTREE As...

Me podrías decir al menos que base de datos usas, que tipo de conexión (ADO, DAO, RDO). Y el código que estas empleando para poder así ayudarte. Solo con eso nadie te puede decir algo concreto solo especular. Aquí mismo puede hacer una repregunta sin...

Ok, man ya entendí la pregunta. La respuesta es sencilla, en tu código reemplázalo por el nombre del DSN de usuario, ya no necesitarías usar un ConnectionString, los recordsets no varían. Pruébalo. Public cn As New ADODB.Connection...

Al igual que cuando utilizas: Private Sub cmd_salir_Click() confirma = MsgBox("Desea Salir?", vbYesNo + vbExclamation, "Sistema") If confirma = vbYes Then Unload Me End If End Sub Para utilizarlo en el formulario lo harias de la siguiente manera:...

Te recomiendo utilizar el Crystal Report, ya que el Data Report es demasiado limitado. CR es sencillo y te ahorrarías bastante tiempo. He publicado hace un rato los pasos ha seguir para usar el CR con VB6.

He probado hacer lo que me dices y me sale con el siguiente código: Private Sub Combo_Click() If Combo.Text = "Datos Personales" Then SSTab.Tab = 1 Frame1.Enabled = True Text1.SetFocus ElseIf Combo.Text = "Opciones" Then SSTab.Tab = 2 Text3.SetFocus...

Para abrir una base de datos en modo exclusivo o compartido, utiliza el método OpenDatabase para abrir la base de datos, especificando un valor True o False (predeterminado) respectivamente para el argumento Options. Ejemplo: Public Function...