• Martes 21 de Mayo de 2024, 05:50

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

Páginas: 1 2 3 [4]
76
Visual Basic 6.0 e inferiores / Re: Hacer Pausa...
« en: Martes 8 de Abril de 2003, 20:16 »
Hola a todos..
muchas gracias por anticipado.
Como puedo hacer para que mi codigo se detenga un momento, es decir, si tengo un:

For i= 1 to 50000
      if i = 25000 then
         ' ** detente unos 5 segundos y luego sigue **
      end if
next i

muchas gracias..

77
Visual Basic 6.0 e inferiores / Manera de imprimir con plantillas
« en: Martes 8 de Abril de 2003, 19:15 »
Hola Alberto:
mira, por la misma presura que tenia para crear los formulario de impresion, no he investigado mas alla.
Felizmente en la pc donde esta el sistema, tienen el office profesional completo. Llegara el dia donde tendre que investigar.. :think: , de hecho se debe de poder instalando algun componente adicional.
Si averiguas algo comparte tu experiencia.
Saludos;

Ruben Delgado.
:adios:

78
Visual Basic 6.0 e inferiores / Re: Manera de imprimir con plantillas
« en: Lunes 7 de Abril de 2003, 17:46 »
Hola agasky:
mira, antes cuando tenia que imprimir un formulario, lo hacia mediante el CrytalReport y la verdad no tenia problemas hasta que un usuario me pidio cambiar algunas cosas del formulario(tipo de letra, color, aspecto) ademas de que imprimiera en cualquier impresora. Intente hacerlo con el CR, pero si no era por una cosa u otra, me salie error. Tuve que investigar un poco y "migre" el reporte a Word(plantilla), utilizo Marcadores y desde VB paso los datos. Ahora no tengo ningun problema. Tambien puedes usar el Excel, eso depende del tipo de formulario que vas a usar.
Un saludo;

Ruben Delgado.:adios:

79
Visual Basic 6.0 e inferiores / Re: Problema con InputBox
« en: Lunes 7 de Abril de 2003, 15:37 »
Hola:
intenta con este codigo, pegalo en un boton:

Dim sTexto As String
    sTexto = InputBox("Hola!")
    If StrPtr(sTexto) = 0 Then
        MsgBox "Ud. presiono Cancelar"
    Else
        MsgBox "Ud. presiono Aceptar"
    End If

Sobre compactar datos de access, la verdad no te puedo ayudar.

Saludos;

Ruben Delgado.:hola:

80
Visual Basic 6.0 e inferiores / word con visual basic
« en: Viernes 4 de Abril de 2003, 15:50 »
Hola:

yo he realizado algo parecido, pero utilizando "MARCADORES" en word.
Si tu tienes:

el nombre es : <Insertar marcador(ej.MyNombre)>
para efectos  : <Insertar marcador(Ej.MyEfectos)>

lo grabas normal como *.doc
en visual harias lo siguiente:

Set obj = New Word.Application
obj.Documents.Open FileName:="" & App.Path & "DocumentoPrueba.doc"

obj.Selection.GoTo What:=wdGoToBookmark, Name:="MyNombre"
obj.Selection.TypeText text1.Text
obj.Selection.GoTo What:=wdGoToBookmark, Name:="MyEfectos"
obj.Selection.TypeText text2.Text

'****grabas el archivo ****

obj.ActiveDocument.SaveAs FileName:="" & App.Path & "DocumentoGenerado.doc"

'****si deseas imprimes ****

obj.PrintOut (False)
obj.Quit SaveChanges:=wdDoNotSaveChanges
Set obj = Nothing


Obviamente tendrias que validar si el archivo existe, ademas generar el nombre del archivo a grabar.

Saludos;

Ruben Delgado

81
Visual Basic 6.0 e inferiores / SmartMenuXP - Ventanas
« en: Jueves 3 de Abril de 2003, 18:15 »
Saludos a todo el grupo:
Utilizando el SmartMenuXP, como se puede crear la opcion "Ventanas" y que vaya apareciendo los formularios que estan abiertos. Obviamente esto debe aparecer al ejecutar mi programa.

Muchas gracias por todo.

Ruben Delgado.:think:

82
Visual Basic 6.0 e inferiores / ComboBox....
« en: Miércoles 2 de Abril de 2003, 16:09 »
gracias Jaume, probare el codigo.

saludos;

Ruben Delgado A.:gracias:

83
Visual Basic 6.0 e inferiores / Re: Conexion con BD
« en: Miércoles 2 de Abril de 2003, 15:58 »
Hola:
puedes chequear esta pagina, ahi te explica las formas de conexion a cualquier base de datos que desees.
Suerte.

http://www.able-consulting.com/ADO_Conn.htm

Saludos;
Ruben Delgado

84
Visual Basic 6.0 e inferiores / Re: ComboBox....
« en: Lunes 31 de Marzo de 2003, 20:38 »
:comp:
Saludos al grupo:
como se puede almacenar en un datacombo 2 campos, es decir, que al seleccionar muestre un dato pero que mediante alguna propiedad me diga que valor tiene, algo asi, como el datacombo que se usa el:
DataCombo.ListField = "nombre"
DataCombo.BoundColumn = "codigo"


Muchas gracias por todo.

Ruben.

85
Visual Basic 6.0 e inferiores / Re: archivo msvbvm60.dll
« en: Viernes 28 de Marzo de 2003, 19:12 »
:argh:  

saludos a todo el foro, es la primera vez que entro por aca y me parece muy bueno.
tengo un programa hecho en VB6.0, en pc de desarrollo me corre todo bien, crea instaladores sin problema, instalo en otra pc sin problemas, pero cuando quiero levantarlo me sale el siguiente error:
"...MyPrograma provoco un error en el modulo msvbvm60.dll, ....." y no llega a levantar nada.
Que puede estar mal?, alguna manito.

Muchas gracias por todo.

Ruben.

Páginas: 1 2 3 [4]