• Viernes 26 de Abril de 2024, 20:24

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 - Javochin

Páginas: [1]
1
MS Access / Access en Red
« en: Jueves 11 de Agosto de 2011, 04:28 »
 :losiento: el foro es de VB, pero seamos honestos VB y VBA es muy similar, ayudenme por favor:

Describo: Hice una aplicación en access 2007 donde creo formularios y reportes; hago todo a traves de codigo en VBA.
Ahora necesito usar la aplicacion en multiusuario, tengo un ordenador servidor de la BBDD con recurso compartido para el accesso y para lo cual no tengo problema en la captura de datos usando DAO; sin embargo, a la hora de querer imprimir los reportes uso la siguiente instruccion:

Código: Visual Basic
  1. DoCmd.OpenReport "EMPLEADOS", acViewPreview, , , acWindowNormal

Obviamente me imprime los reportes de la BBDD activa; es decir, de la del usuario y no de la del servidor. he trabajado con VB6 y Crystal Reports, pero ahora si no tengo ni idea de como empezar.

Gracias de Antemano

2
Bases de Datos / Access en Red
« en: Jueves 11 de Agosto de 2011, 04:24 »
Describo: Hice una aplicación en access 2007 donde creo formularios y reportes; hago todo a traves de codigo en VBA.
Ahora necesito usar la aplicacion en multiusuario, tengo un ordenador servidor de la BBDD con recurso compartido para el accesso y para lo cual no tengo problema en la captura de datos usando DAO; sin embargo, a la hora de querer imprimir los reportes uso la siguiente instruccion:

Código: Visual Basic
  1. DoCmd.OpenReport "EMPLEADOS", acViewPreview, , , acWindowNormal

Obviamente me imprime los reportes de la BBDD activa; es decir, de la del usuario y no de la del servidor.

No tengo idea de como Solucionar este problema. Gracias de Antemano

3
Crystal Reports / Ajustar A Ancho De Página
« en: Martes 8 de Agosto de 2006, 17:59 »
Hola a todos, agradecería mucho su colaboración.

Necesito saber como hago para que al mostrar el reporte desde vb 6.0, muestre el reporte ajustado al ancho de la hoja, utilizo cr 8.0

Gracias

4
Visual Basic 6.0 e inferiores / Error Al Instalar
« en: Viernes 12 de Mayo de 2006, 00:49 »
:hola:

He desarrollado un aplicacion en VB 6.0, al momento de empaquetar hago lo siguiente:
1.- Lo empaqueto con el "Asistente para Empaquetado" de Visual Estudio.
2.- Extraigo la Carpeta de "Support" que crea el asistente y la coloco en otra.
3.- Empaqueto todo otra vez en Inno Setup Compiler, agregando las OCX y DLL de la carpeta "Support".

Una vez ya armado el paquete lo instalé en varias PC, en algunas no hubo ningún problema y la aplicación funcionó perfectamente, pero en tres PC se instalo todo sin ningún error, pero al ejecutar la aplicación merco este error:

clase no registrada
CLSID:{00000010-0000-0010-8000-00AA006D2EA4}

Alguien Podría ayudarme  :)

5
Visual Basic 6.0 e inferiores / No Repetir Items En Un Listbox
« en: Jueves 6 de Octubre de 2005, 00:55 »
Hola a todos:

El Codigo qeu he hecho es el siguiente:

Código: Text
  1. Tramite As String
  2. Agregado as Boolean
  3. GridTab2=DBGrid
  4. LstTramites=ListBox
  5.  
  6.  
  7. Tramite = GridTab2.Columns(0).Text
  8. For i = -1 To LstTramites.ListCount    
  9.        If Tramite = LstTramites.Text Then
  10.              Agregado = False    
  11.        Else        
  12.              Agregado = True
  13.        End If
  14. Next i
  15.  
  16. If Agregado = True Then    
  17.         LstTramites.AddItem TramiteElse    
  18.         MsgBox "El Trámite ya fué agregado", vbInformation
  19. End If
  20.  


Espero su Colaboración

6
Visual Basic para principiantes / No Repetir Items En Un Listbox
« en: Miércoles 5 de Octubre de 2005, 22:18 »
Hola a todos:

El Codigo qeu he hecho es el siguiente:
Código: Text
  1. Tramite As String
  2. Agregado as Boolean
  3. GridTab2=DBGrid
  4. LstTramites=ListBox
  5.  
  6.  
  7. Tramite = GridTab2.Columns(0).Text
  8. For i = -1 To LstTramites.ListCount    
  9.         If Tramite = LstTramites.Text Then
  10.               Agregado = False    
  11.         Else        
  12.               Agregado = True
  13.         End If
  14. Next i
  15.  
  16. If Agregado = True Then    
  17.          LstTramites.AddItem TramiteElse    
  18.          MsgBox "El Trámite ya fué agregado", vbInformation
  19. End If
  20.  

Espero su Colaboración

Páginas: [1]