• Viernes 29 de Marzo de 2024, 12:18

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.


Temas - AS

Páginas: [1]
1
Visual Basic 6.0 e inferiores / Manipular el puerto paralelo
« en: Martes 10 de Junio de 2003, 17:04 »
Para un proyecto final de la facultad, necesito manipular el puerto paralelo para que me devuelva 8 bits (1 byte), de a dos bloques de 4 cuatro. En el 98 para un proyecto de la cursada manipule el puerto paralelo con win95io.dll. Actualmente yo poseo XP y esta dll no me sirve. Alguien sabe de otra dll u ocx para manipular el puerto paralelo. Por favor, se lo agradecería mucho.
Saludos

2
ASP / Como evitar que se presione dos veces un botón
« en: Jueves 10 de Abril de 2003, 18:09 »
Como puedo evitar que el usuario presione dos o más veces un botón. Ya que cuando se vaya a actualizar, si me lo presiona más de una vez no agregue archivos n veces.
Yo les agregue a mis páginas lo siguiente, pero no funciono.

With Response
     .Expires = 0
      .ExpiresAbsolute= Now()-1
     .AddHeader "pragma","no-cache"
     .AddHeader "cache-control","private"
     .CacheControl = "no-cache"
     .Buffer = True
End With

Espero su ayuda, desde ya muchas gracias!!!
Any

3
Visual Basic 6.0 e inferiores / No me actualiza el MSHFlexGrid con un ADODC
« en: Domingo 2 de Febrero de 2003, 23:43 »
Estoy usando un MSHFlexGrid con un ADODC y cuando actualizo los datos del adodc no se me refrescan los datos de la grilla. Si yo llamo desde el botón que busca a la función para actualizar los datos de la grilla los datos del MSHFlexGrid se refrescan pero si yo llamo a esa misma función desde donde estoy actualizando los datos la grilla no se refrescan. Alguien tiene idea porque me pasa esto o como hacer para solucionarlo?

Funcion que actualiza:

Sub ActualizarGrilla()
 On Error GoTo ActualizarGrilla_Err
 
    Screen.MousePointer = vbHourglass
    sSQL = "SELECT Usuario, Apellido_Usuario, Nombre_Usuario, Permiso_Usuario "
    sSQL = sSQL & "FROM Usuarios WHERE Activo_Usuario = " & CVnx(xTxt_Activo) & " "
    If sTxt_Usuario <> "" Then
        sSQL = sSQL & "AND Usuario Like '%" & CVne(sTxt_Usuario) & "%' "
    End If
    Ado_Usuarios.ConnectionString = sCon
    Ado_Usuarios.RecordSource = sSQL
    Ado_Usuarios.Refresh
    Set Grd_Usuario.DataSource = Ado_Usuarios
    Grd_Usuario.Refresh
   
ActualizarGrilla_Exit:
    Screen.MousePointer = vbArrow
    Exit Sub
ActualizarGrilla_Err:
    MostrarError "ActualizarGrilla"
    Resume ActualizarGrilla_Exit
End Sub

4
Me gustaría tener un botón que permita insertar un icono a la izquierda y poner el texto al lado, todo en la misma línea.
Con el botón estándar de VB se puede insertar una imagen y este te lo centra arriba de todo y te pone el texto abajo y realmente no me gusta porque queda un botón muy grande y ancho. Me gustaría saber si conocen algún botón o alguna forma que yo pueda hacer lo que deseo. Desde, muchas gracias.

Páginas: [1]