PREGUNTAS CONTESTADAS - Visual

 Hay un total de 3030 Preguntas.<<  >> 

    Pregunta:  3426 - COMO SACAR LA BANDEJA DE CD EN VISUAL BASIC
Autor:  Mauricio Pardo
ME GUSTARIA QUE ME AYUDARAS CON LA CODIFICACION DE SACAR LA BANDEJA DE ENTRADA EN VISUAL ES QUE ESTOY HACIENDO UN PROGRAMA REPRODUCTOR DE CD Y SOLO ME FALTARIA ESO
GRACIAS
  Respuesta:  Oswaldo Monagas
Aqui te envio el codigo que necesitas para eso:En un módulo declaramos :

Declare Function mciSendString Lib "winmm.dll" Alias _
"mciSendStringA" (ByVal lpstrCommand As String, ByVal _
lpstrReturnString As String, ByVal uReturnLength As Long, _
ByVal hwndCallback As Long) As Long

´Y luego para abrir la puerta :

dim res as long, returnstring as string*127
res = mcisendstring("set CDAudio door open", returnstring, 127, 0)

´Y para cerrarla :

dim res as long, returnstring as string*127
res = mcisendstring("set CDAudio door closed", returnstring, 127, 0)

Acuerdate que el codigo de Declaraciones "Declare ....." debe estar escrito en una sola linea y leelo para que te des cuenta que debes tener en el directorio C:\Wimdows\System el archivo winmm.dll

Saludos
Oswaldo

    Pregunta:  3428 - PROBLEMA CON CRYSTAL REPORT 7
Autor:  Rafaela Mendivil
Hola.

Mi problema es que al mandar un parametro de fecha al crystal report 7, me marca error, no se si el formato para la fecha es diferente. Gracias
  Respuesta:  Adolfo Mujica Mota
Hola.

Para mandarle fechas al CR 7 desde Visual Basic, tienes que hacerlo de acuerdo a la sintaxis del Mismo crystal y no de la sintaxis de VB.

Sistaxis de Crystal:
Date(Año,Mes,Dia)

Ejemplo 1:
´ Este ejemplo es para seleccionar los registros que cumplan con una fecha en especifico.

dFecha1 = CDate(txtFecha1) ´ txtfecha valida
dia1 = day(dFecha1)
mes1 = month(dFecha1)
año1 = Yaer(dFecha1)

cr1.selectionformula = "{BDD.fecha} = Date(" & año1 & "," & mes1 & "," dia1 & ")"


Ejemplo 2:
´ Y esta otra es para un rango de fechas
dFechaIni = CDate(txtFecha1)
dFechaFin = CDate(txtFecha2)
´ txtFecha1 y txtFecha2, que sean fechas validas

diaIni = day(dFechaIni)
mesIni = month(dFechaIni)
añoIni = Yaer(dFechaIni)

diaFin = day(dFechaFin)
mesFin = month(dFechaFin)
añoFin = Yaer(dFechaFin)

cr1.selectionformula = "{BDD.fecha} in Date(" & añoIni & "," & mesIni & "," diaIni & ") to Date(" & añoFin & "," & mesFin & "," & diaIni & ")"

´ Espero que te ayude este pedazo de codigo.

    Pregunta:  3434 - DIFERENCIAS VB4 &VB6
Autor:  Mireya Flores
Quiero saber la diferencia(s) de la versión de VB4 y VB6 para desarrollo de una aplicacion?
  Respuesta:  hernan casadesus
Hola:

Las diferencias que hay entre uno y otro son demasiadas, tantas, que no se podrian ni siquiera resumir en esta respuesta.

Lo que te recomiendo, es que si tenes la posibilidad de usar el VB6, archives el VB4, y vallas a comprarte un libro urgente, porque el VB6 te facilita muchisimas tares que para conseguirlas en VB4 habia que hacer malabares.

Chau

    Pregunta:  3435 - COMO ABRIR Y CERRAR UN CD-ROM
Autor:  Proteo
Lo que me ha pasado es que he prestado el gabinete a una persona y ahora que me lo han regresado resulta que no sirve el boton de expulsion del CD-ROM, Alguien me puede ayudar para hacer esto.
  Respuesta:  Oswaldo Monagas
Aqui he copiado y pegado esto de las respuestas en Preguntas Contestadas de la Web del programador

3426 - COMO SACAR LA BANDEJA DE CD EN VISUAL BASIC
ME GUSTARIA QUE ME AYUDARAS CON LA CODIFICACION DE SACAR LA BANDEJA DE ENTRADA EN VISUAL ES QUE ESTOY HACIENDO UN PROGRAMA REPRODUCTOR DE CD Y SOLO ME FALTARIA ESO
GRACIAS


Si alguien tiene otra respuesta, o puede ampliarla, ruego la conteste GRACIAS
RESPUESTA : Oswaldo Monagas Aqui te envio el codigo que necesitas para eso:En un módulo declaramos :

Declare Function mciSendString Lib "winmm.dll" Alias _
"mciSendStringA" (ByVal lpstrCommand As String, ByVal _
lpstrReturnString As String, ByVal uReturnLength As Long, _
ByVal hwndCallback As Long) As Long

´Y luego para abrir la puerta :

dim res as long, returnstring as string*127
res = mcisendstring("set CDAudio door open", returnstring, 127, 0)

´Y para cerrarla :

dim res as long, returnstring as string*127
res = mcisendstring("set CDAudio door closed", returnstring, 127, 0)

Acuerdate que el codigo de Declaraciones "Declare ....." debe estar escrito en una sola linea y leelo para que te des cuenta que debes tener en el directorio C:\Wimdows\System el archivo winmm.dll

Saludos

    Pregunta:  3444 - PROBLEMA CON EL CRYSTAL REPORT
Autor:  Andres Rivero
Saludos a Todos:

Mi problema es el Siguiente, tengo VB5 en Español, manejo varias bases de datos y varios Reportes, el problema se produce cuando consulto varios Reportes, los imprimo sin ningun problema, pero cuando salgo del programa, me arroja un error "VB5 provocó un fallo de página no válida en el módulo CRYSTL32.OCX de 0137:250127fb."
Este problema me tiene loco, y no se como solucionarlo.
Gracias por su ayuda.
  Respuesta:  Pedro Almodovar
Tengo el mismo problema, en realidad la única solución que encontré es la de instalar el Crystal Report en cada PC donde debo instalar mi aplicación, una solución poco convencional, pero hasta ahora la única que me ha dado resultado. Si alguien que conoce una solución mejor está leyendo esto, HAGA QUE VEAMOS LA LUZ!!!!
  Respuesta:  Daniel Burgués
Yo también tuve el mismo problema y tras dar muchas, MUCHISIMAS vueltas, encontré que no daba error al salir de la aplicación si en todos los formularios ponía un solo OCX de crystal, es decir, que todos los formularios utilizaban un OCX en común. Se ve que si pones más de uno de estos, aunque sea en diferentes formularios, salta el error y no se porque.
Para referirte al ocx del formulario que posee el OCX de crystal, haz esto:

Supón que en el form1 tienes el OCX y ahora estás trabajando en el form2

Sub ImpresionForm2()
Form1.CrystalReport1.ReportFileName = "C:\directorio\InformeForm2.Rpt" ´ Esto es el informe que tienes que sacar en el form2
Form1.CrystalReport1.DataFiles(0) = C:\directorio\BaseDeDatos.Mdb" ´Esto es la base de datos de donde sacas la información para imprimir.
Form1.CrystalReport1.Destination = crptToWindow ´Por donde saca los datos en este caso por pantalla
Form1.CrystalReport1.Action = 1 ´Esto para que se ejecute crystal report
End sub
Si estubieras en el form3 también haríamos lo mismo pero cambiando el reporte que queremos imprimir y la base de datos.

Si tienes alguna duda...E-scribeme ;)
  Respuesta:  José Antonio Guillén Martinez
Creo que he entendido tu problema. Pero lo que no dices es si el problema te lo esta dando en tiempo de ejecución desde VB o ya una vez la aplicación esta compilada. En ambos casos revisa la configuración de memoria, y por supuesto, es posible que si la configuración es correcta que necesites mas capacidad. Espero haberte ayudado, si el problema es otro ponte en contacto conmigo he intentare ayudarte en lo que este en mi mano.
Hasta Pronto.

    Pregunta:  3455 - SEGURIDAD DE BASES DE DATOS
Autor:  FERNANDO INGRASSIA
Tengo un pregunta que me gustaria me contesten.
como puedo hacer para que una base de datos de un programa que yo realizo solo pueda ser leida y modificada por ese programa y no por otros (ej. acces) es decir que no pueda ser accedida por alguien que no deseo.
Se que hay una opción para ingresarle claves de acceso, pero con todos los programas hacker que hay no es seguro, otra opción es encriptarla pero no se como se hacer, si encripto la base (no se como, se que hay programas) como hago para accederla desde mi programa.
gracias por contestarme.
  Respuesta:  Roque Andrés Aranda
Consulta la ayuda de Visual Basic hay algunos ejemplos de como hacerlo.

Para encriptar la base podes hacer lo siguiente al crear la base:

createdatabase (NombreBase, dblangGeneral,dbencrypt)

donde NombreBase es la base de datos
dblanggeneral es el idioma
y dbencrypt la encripta a la vista
en Options podes agregar ,PW=Clave
Mira en detalle la ayuda ya que no recuerdo el uso de PW. Sorry.
La base solo la abriran con la clave correcta. Igualmente si alguien esta dispuesto a violarla...
  Respuesta:  hernan casadesus
Hola

Con respecto al tema de los hackers, no existe nada que te proteja de ellos, si te quieren hacer mal, lo van a hacer, pero si tu informacion es tan importante, lo mas recomendable es que la encriptes, te va a durar un poco mas.

Busca bien en la red, porque esta lleno de OCXs para encriptar.

    Pregunta:  3462 - ¿COMO HACER QUE UN DBCOMBO SE AJUSTE AL Nº DE ELEMENTOS?
Autor:  Alvaro G. Cerpa Bedregal
¿Como puedo hacer que un DBCombo se ajuste al numero de elemntos de la lista?

los elemtos de la lista son:
A
B
C

y cuando se despliega la lista del DBCombo muestra los campos ya mencionados pero el tamaño de la lista es mas grande que del total de los campos.
  Respuesta:  hernan casadesus
Hola

Visitate estas direcciones, que esta lo que pedis:

http://www.vbsquare.com/tips/tip327.html
(te enseña como manejar el ancho de la lista)

http://www.vbsquare.com/tips/tip328.html
(esta te muestra como cambiar el alto, que es lo que vos queres)

http://www.vbsquare.com/tips/tip330.html
(y aca te muestra como desplegarlo y cerralo con codigo, tal vez de sirva)
  Respuesta:  Angel Rivera
trabaja con un API ...

Public Declare Function SendMessageLong Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long

lo declaras en un modulo y aparte de lo que querias el combo cuando llegue al foco se despliega automaticamente

y esto lo declaras en el gotfocus del combo

Const CB_SHOWDROPDOWN = &H14F
Dim Tmp
Tmp = SendMessage(Combo1.hwnd, CB_SHOWDROPDOWN, 1, ByVal 0&)

Angel... Lima-Peru

    Pregunta:  3474 - GUARDAR IMAGENES .JPG EN ACCESS A TRAVÉS DE VISUAL BASIC
Autor:  Pablo López Jimenez
¿Cual es la instrucción de visual basic para guardar una imagen, contenida en un control Picture Box, en un campo de tipo OLE contenido en el registro de una base de datos en Access ?
  Respuesta:  David
Vayamos por partes:
1.- uno de los campos de access debe ser long binary.
2.- asocias un image o picture a la base de datos y a ese campo.
3.- Para insertar una imagen, haces el addnew, modificas el control de la imagen, con la nueva y haces el update.

Si no te ha quedado claro mandame un emilio y te mando un proyecto de VB que lo hace y la base de datos

    Pregunta:  3495 - ERROR AL INSTALAR UNA APLICACION VB6 EN WIN95
Autor:  Pepe Rodrigo
Hola. He implementado un programa en VB6 y a la hora de instalarlo en Windows98 no tengo ningun problema pero cuando intento instalarlo en Windows 95 me da los siguientes errores a la hora de registrar:

MFC40.DLL
MSSTDFMT.DLL
MSCOMCT2.DLL
CMCT3ES.DLL
COMCTL32.DLL
DAO360.DLL
He de decir que estoy trabajando con WNT
Gracias por todo.
  Respuesta:  ESTEBAN GILBERTO
Hola :

No se si de algo te sirve, pero he tenido problemas parecidos, pero me di cuenta de que no había agregado el archivo DCOM98.EXE, eso puede que te este repercutiendo o bien es la MSDAC_TYPE el archivo de Microsoft Data Acces Components, de todas maneras revisa esta dirección de microsoft

http://www.microsoft.com/com

si de algo te sirve, se despide

ESTEBAN G.

    Pregunta:  3503 - TOOLTIP EN WINDOWS NT
Autor:  David Contreras Oyarce
Saludos:

Tengo el siguiente problema. trabajo con VB5 español, mi aplicación tiene varias formularios y en todos estos formularios tengo insertado imagenes pequeñas e identificadas con Tooltip, resulta que no tengo ningun problema al instalar mi aplicación en Win95 o Win98, los tooltip de las imagenes se visualizan bien, pero cuando instalo mi aplicación en NT, no se reflejan los Tooltip.

Que debo hacer... sera que tengo que instalar algun Service Pack de NT?

de antemano muchas gracias.
atte,
David
  Respuesta:  Shagrath Veltz
Saludos

Mire los Tooltip le toca crearlos de otra manera aquí tengo un buen ejemplo.

www.geocities.com/jaimeeliecer/Tip.zip

descarguelo y que ojala le sirva.
Si el archivo llega dañado comenteme.
chao

|<  <<  53 54 55 56 57 58 59 60 61 62 63  >>  >|