• Sábado 4 de Mayo de 2024, 08:58

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.


Mensajes - Herchi

Páginas: [1]
1
Visual Basic 6.0 e inferiores / Re: Alguna Sugerencia Para Esta Interface?
« en: Martes 25 de Octubre de 2005, 19:20 »
na, voy a tirar "con lo puesto". Es una chapuza, pero no se m ocurre na mejor. Asias x todo ;)

2
Visual Basic 6.0 e inferiores / Re: Alguna Sugerencia Para Esta Interface?
« en: Viernes 21 de Octubre de 2005, 12:41 »
Si, me ha sido de mucha ayuda, aunque casi muero de solo pensar que tenia q rehacer el proyecto. Lo tenia en un mdi y un montón de mdichild y planteado así es todo en una ventana, no? :S

no se podria apañar en un mdiform? esta es mi idea.

lo malo:
* se puede poner un picturebox alineado a la izquierda y qda como un marco, pero quise poner otro a la dcha y la arma el visual
* no se puede maximizar una ventana a la dcha (si pones maximized la hija desaparece). de ahi la chapuza q hice: poner manualmente la hija al mayor tamaño q permite y quitar las scroll bars del mdi (apaño visual)
* un mdi no se puede poner 'no redimensionable' :(

3
Visual Basic 6.0 e inferiores / Alguna Sugerencia Para Esta Interface?
« en: Lunes 10 de Octubre de 2005, 17:23 »
HOLA

esta el dibujo http://img42.imagevenue.com/img.php?loc=lo...b0_HPIM0797.JPG

La idea es de tener una pantalla de tamaño fijo donde a la izquierda tengamos el menú principal (donde pone alumno habra mas botones: empleados, etc). Por ejemplo, al pinchar en 'alumno' saldrían esas pestañas en donde se haría el tipico: 'nuevo', 'ver', 'borrar' etc

Por ahora tengo el programa funcionando con las tipicas ventanitas, pero ahora tengo que hacerlo todo asi :(

4
Visual Basic 6.0 e inferiores / Pestañas (supongo Que Preguntas Básicas)
« en: Jueves 6 de Octubre de 2005, 04:57 »
Hola :)

usando el tabstrip que te trae el Microsoft Windows Common Controls 6.0...

Como sé, al pinchar en una pestaña en el evento TabStrip_click, en el nº de pestaña a pinchado?

Si en la pestaña 1, tengo alumnos, y en la 2 tengo profesores. Si estoy viendo alumnos y pincho en profesores. Q tengo que poner "a mano" todos los elementos de alumnos invisibles y todos los de profesores visibles?

Por cierto, la putada de todo esto es que yo tenia un programa importante con ventanas, y ahora me dicen que lo haga con pestañas, menudo trabajo de chinos :S

Gracias

5
pos mira, este codigo añade bien a la BD, pero el .refresh da error (la operacion no esta permitida si el objeto está cerrado)
 
sin el .refresh no da error, aunq no lo mete en la tabla. q tengo q hacer?


Dim variable_SQL As String
    variable_SQL = "INSERT INTO TEORICA (ID_AULA, ID_PROFESOR, ID_ALUMNO) values (8, 28, 169)"

    adoTeorica.RecordSource = variable_SQL
    adoTeorica.Refresh









ASIAS

6
Visual Basic 6.0 e inferiores / Las Mascaras Dan Error Al Estar La Bd Vacia :(
« en: Lunes 25 de Julio de 2005, 17:33 »
las mascaras van bien, hasta que la BD está vacia. cdo eso pasa me dice que no puede enlazar con el campo tal (lo estoy diciendo de memoria, pero debe de ser un error muy tipico).

He intentado poner los datafields en caliente. o sea, los dejo en blanco en el formulario y desde codigo poner esto:

    With frmAlumno
        .AdoAlumnoInvisible.Refresh
        Set .mkbFechaNacimiento.DataSource = .AdoAlumnoInvisible
        .mkbFechaNacimiento = "11/11/1111"
         .AdoAlumnoInvisible.Recordset.AddNew
         .mkbFechaNacimiento.DataField = "FECHA_NACIMIENTO"

pero me dice q tp puede enlazar...


resumiendo: como puedo usar una mascara spre, aunq a veces la BD este vacia y no casque.

7
Visual Basic 6.0 e inferiores / Usar Sql Para Añadir Un Registro, Como Puedo?
« en: Martes 19 de Julio de 2005, 14:50 »
me esta dando problemas al añadir un registro, creo que el codigo deberia de ser este:
---------------------------------
       Dim variable_SQL As String
        variable_SQL = "INSERT INTO MATRICULA2 (campo1, campo2, campo3) values (88, 99, true);"
       
        adoMatricula.RecordSource = variable_SQL
        adoMatricula.Refresh
----------------------------------------


error me sale en 'adoMatricula.RecordSource = variable_SQL'
y me dice que: se requiere un objeto

SOCORRO!!!

8
Visual Basic 6.0 e inferiores / Re: Máscara De Entrada
« en: Jueves 7 de Julio de 2005, 03:59 »
pero con el mid capturo la parte que yo quiera de un String, yo lo que quiero es que en la caja de texto salga ya pintado un "(___)_________" para el telefono y un "_______(_)" para el nif o en fecha un "__/__/____"

Por supuesto no me refiero a la propiedad text de la caja de texto.

9
Visual Basic 6.0 e inferiores / Máscara De Entrada
« en: Jueves 7 de Julio de 2005, 02:36 »
Me gustaria que en un text box para el telefono saliese así:
(12) 312.31.23, o que el nif saliese asi: 12.341.231 (N)
O sea, que en la caja de texto salga para el telefono algo así (__) ___.__.__

Pensaba que era con el Masked Edit, pero me dice al intentar insertarlo a un formulario que no tengo una licencia apropiada para este componente :-S (en agregar componentes es el 'Microsoft Masked Edit Control 6.0', no?)

10
Visual Basic 6.0 e inferiores / Re: Dtpicker
« en: Jueves 23 de Junio de 2005, 02:44 »
lo has sido, chico ;)

11
Visual Basic 6.0 e inferiores / Ado Y El Addnew Me Funciona A Medias
« en: Lunes 20 de Junio de 2005, 18:04 »
hola.

tengo un boton de 'nuevo alumno' con su tipico:
adoAlumno.Recordset.AddNew

Me funciona siempre y cuando no haya borrado el ultimo registro desde el programa. El error que me da:
error '-2147217842(80040e4e)' Operacion cancelada. un mensaje indescriptivo y sin ayuda.

Lo curioso es que el programa me funciona cuando la base de datos está en blanco y le doy al 'Añadir alumno'. Con lo cual el error sólo surge en el caso anterior

Gracias


OS PEGO EL CÓDIGO, POR SI LAS MOSCAS
----------------------------
Private Sub cmdNuevo_Click()
   adoAlumno.Recordset.AddNew 'AQUI ES DONDE DA ERROR
   NuevoAlumno
End Sub


Public Function BorrarAlumno()
   Dim esElPrimero As Boolean

   If frmAlumno.adoAlumno.Recordset.AbsolutePosition = 1 Then esElPrimero = True


   frmAlumno.adoAlumno.Recordset.Delete
   frmAlumno.adoAlumno.Recordset.Update

   'Si borra el único registro existente deshabilitamos el botón borrar y la barra de navegación
   If (frmAlumno.adoAlumno.Recordset.RecordCount = 0) Then
      'Chapuza necesaria para que al borrar el último registro y añadir uno nuevo no me diga
'error '-2147217842(80040e4e)' Operacion cancelada
      'Unload frmAlumno
      'frmAlumno.Show

      NoHayRegistros
   Else
      If esElPrimero Then
         frmAlumno.adoAlumno.Recordset.MoveFirst
      Else
         frmAlumno.adoAlumno.Recordset.MovePrevious
      End If
   End If

   ActualizarDisplay
End Function

12
Visual Basic 6.0 e inferiores / Dtpicker
« en: Lunes 20 de Junio de 2005, 17:59 »
quiero poner un DTPicker, para seleccionar la fecha de nacimiento. Y no se inicializar ese DTP en blanco (pues queda muy feo ponerle una fecha por defecto a una fecha así).

Por cierto, un DTP tiene una propiedad para añadirle un minicheckbox. Como puedo saber desde el código si ese checbox está activado o no?
Porque 'frmAlumno.dtpFechaNacimiento.CheckBox' siempre me devuelve true, más que decirme si está clickado o no lo que me dice es si tiene un checkbox o no.

Páginas: [1]