Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - ignorantev1.1

#731
Código (vb) [Seleccionar]
Private Sub Command1_Click()
    Combo1.ListIndex = Val(Text1.Text)
End Sub



No se si te referias a esto  :rolleyes:
#732
hola que tal.
bueno, el asunto es que quiero jugar este videojuego y, lo instalo y todo bien, a la hora de ejecutar sale el problema: la pantalla en negro y solo da audio...

Que podra ser?, tengo actualizados los drivers de video, hace tiempo ya lo habia jugado en esta misma maquina, pasa con el CD que tengo y otras versiones que me he descargado... gracias!

Edito:
Cuestiones de codecs!

despues de haber probado como 57 aparentes soluciones encontre la apropiada... ;-)
#733
a ver a ver y quien si se da tiempo de leerlo?
#734
y por que lo deberia detectar un antivirus, si solo trabaja con texto liso?
#735
Cita de: kuroi shonen spider en  6 Diciembre 2010, 21:52 PM
es ignorantev1.1

Jajajajaj... soy victima!  :-(

Este Juego se esta alargando mucho!

Que caiga el siguiente! >:D
#736
Ya lo solucione, gracias. Bueno por si les interesa el error era el siguiente:

el Recordset que mandaba como parametro a la funcion "bdNuevo", era global: lo puse en un formulario que siempre estuviera cargado para que otros formularios lo aprovecharan y lo mandaba como parametro asi: "FormularioMain.bdMain.Recordset"

Y pues, tuve que poner uno para cada formulario y ya me funciona... :laugh:
#737
hey ssccaann43 ese ejemplo ya lo tengo desde hace tiempo y lo estuve revisando pero no me convencion mucho... de todas formas muchas gracias! :xD

Que hay con "Data type conversion error"?
#738
Hola pues con otro problema de lo mismo  :-\

Para insertar un nuevo dato hice algo asi:

Código (vb) [Seleccionar]

sub XXX()
    Dim datos(0 To 3) As Variant
   
    datos(0) = txtNombre
    datos(1) = txtDireccion
    datos(2) = txtTelefono

    Call bdNuevo(bdMain.Recordset, datos())
end sub

Public Sub bdNuevo(tdb As Recordset, datos() As Variant)
    Dim i As Integer
    tdb.AddNew
    For i = 0 To UBound(datos)
        tdb.Fields(i) = datos(i)
    Next
    tdb.Update
End Sub


y resulta esto:

Data type conversion error!

que paso?

gracias?
#739
Uuuuuu! recuerdo! hace mas de 4 años: Ahi estaba yo, registrandome para entrar en el foro era un ignorante, cavernicola y novato en este foro, pero ahora 4 años y un poquito mas tarde... las cosas cambiaron y ahora solo soy ignorante y cavernicola :-(
#740
Que caiga el siguiente  >:D