PREGUNTAS POR CONTESTAR - Visual Basic

 Hay un total de 467 Preguntas.<<  >> 

    Pregunta:  64199 - CÓMO ESCANEAR IMÁGENES EN. JPG UTILIZANDO VISUAL BASIC 6.0
Autor:  David Alvarez
Estoy haciendo una aplicación en donde debo escanear un documento, ya sea un texto ó una imagen para tal estoy utilizando un objeto "kodad control imgscan", con la siguiente codificación:

Private Sub Command1_Click()
If ImgScan1.ScannerAvailable Then
ImgScan1.OpenScanner
ImgScan1.ScanTo = FileOnly
ImgScan1.Image = "c:scanimg.jpg"
ImgScan1.FileType = JPG_File ImgScan1.SetPageTypeCompressionOpts GoodDisplay, TrueColor24bitRGB, JPEGCompression, JPEGHighHigh
ImgScan1.ShowSetupBeforeScan = False
ImgScan1.StartScan
ImgScan1.CloseScanner
Else
Msgbox("No hay escaner")
End If
End Sub

obs: en la linea ImgScan1.FileType = JPG_File , no me da la opción 'JPG_File', solo me da para formato .TIF ó .BMP

les agradecería toda ayuda, gracias!!!
Contestar

    Pregunta:  64232 - COMO DECIRLE POR QUE RED BUSCAR EL SERVIDOR SQL DESDE VB6
Autor:  Enrique Cruz
Estamos hablando de una maquina con win7, tiene instalada una aplicacion echa en visual basic v6 que accesa a una BD en SQL-Server 2005 atravez de la red local pero tambien cuenta con un infinitum propio y que esta conectado directamente al equipo (no a la RED), el problema surge cuando se ejecuta la aplicacion por primera vez y esta trata de conectarse al servidor SQL, nunca lo encuentra por que ya verificamos que lo que sucede es que esta buscando el servidor SQL por la red del infinitum y no por la red local, por lo tanto nunca lo encuentra y manda un error, si se realiza la conexion manualmente con un ODBC del equipo se conecta sin problemas y posteriormente la aplicacion corre sin problemas, pero cuando se reinicia el equipo el problema persiste.

Espero sus comentarios, de antemano gracias a todos!
Contestar

    Pregunta:  64269 - AGRUPAR CONTROLES
Autor:  JL R.A
Amigos lo Que les planteo a Continuacion Ya lo he buscado por inumerables sitios y espero que aqui me puedan Ayudar Tengo 8 Checkbox en un Form pero Solo quiero que a 7 de ellos los recorra overifique que esten marcados o desmarcados el nombre de los controles van de Ch1 a Ch7 la condicion es ta en el Ch8 esta es la condicion
Dim marca as CheckBox

For Each marca In Me.Controls(Ch1,Ch2,Ch3,Ch4,Ch5,Ch6,Ch7)
If Ch8.Value=Checked Then
marca.value=Unchecked
else
marca.value=Checked
End if
Next
ya lo he Intentado de mil for mas y nada siempre meda error que esta mal, Un Cursillo por ahi para entender sobre esto ,bueno espero su respuesta y mil gracias
Contestar

    Pregunta:  64381 - FUNCIÓN VBS REEMPLAZAR "," POR "." VARIABLE FLOAT
Autor:  Aral Herranz
Hola,

En una aplicación web tengo lo siguiente:
<button class="exButton" language="VBS" onclick="CalcTotal()">Calcular Total
</button>
<script language="VBS">
Sub CalcTotal()
frmMain.ValorTotal.value = Round(cdbl(frmMain.Valor1.value) * 100 / cdbl(frmMain.Valor2.value) + 100 *-1 ,2)
End Sub
</script>

Las variables ValorTotal, Valor1 y Valor2 son de tipo Float.
El problema es que la aplicación sobre la que trabajo tiene definido el separador de miles con "," y los decimales con ".". Esto no se puedo cambiar, y el cálculo no funciona correctamente a no ser que cambie la configuración regional de todos los equipos, (que no se puede hacer, porque afecta a otras aplicaciones).
¿me podéis indicar como podría crear una función que me remplazara en esto campos las "," por "." sin necesidad de cambiar la configuración regional?.

Muchas Gracias.
Contestar

    Pregunta:  64451 - PROBLEMA PARA EJECUTAR UN MACRO EN OUTLOOK 2003
Autor:  Juan Camilo Soto
Buenas noches a todos:

Para que entiendan mi pregunta les voy a explicar mi situación.

He creado un macro que al ser ejecutado mediante el llamado a Outlook por la linea de comando en un acceso directo "%programfiles%microsoftofficeoffice11outlook.exe" /recycle /autorun Test, donde test es el nombre de mi macro. Al abrir outlook, este crea un nuevo elemento contacto y copia el contenido del portapapeles de windows en el campo body del formulario. cabe aclarar que el objeto que se pasa al dataobject ya está establecido como texto, ahí no hay problema. El código del macro es el siguiente:

Dim DtObj As New dataobject

Sub Test()
Dim myOlapp As Object
Dim myContact As ContactItem
Set myOlapp = CreateObject("Outlook.Application")
Set myContact = myOlapp.CreateItem(olContactItem)
myContact.Display
DtObj.GetFromClipboard
myContact.Body = DtObj.GetText
msgbox ("Si va a guardar este contacto, recuerde hacerlo en la carpeta de contactos activa.")
End Sub

Esto funciona muy bien siempre y cuando Outlook se encuentre cerrado, cuando ejecuto el acceso directo y se abre Outlook no tengo problema. El problema que tengo es que el acceso directo necesito usarlo varias veces y como tengo información abierta en Outlook, no puedo cerrar y abrir Outlook cada vez que necesite hacerlo. cuando ejecuto el acceso directo y outlook está abierto no ejecuta la macro.

¿Existe algún metodo, funcion, propiedad o configuración de Outlook que este omitiendo?.

Muchas gracias por la orientación que me puedan dar.
Contestar

    Pregunta:  64459 - ICONO RATON VISUAL BASIC EXCEL
Autor:  Mikel Osasuna
Buenas:
Estoy haciendo un programa en visual basic de excel 2007, y quiero que cuando pase el raton por encima de un boton, el icono del boton cambie y en vez de una flecha, que me salga una mano con el dedo indice hacia arriba. vamos la tipica mano de todos sitios.
He probado utilizando el Mousepointer, pero entre los iconos que hay no esta el de la mano.
tambien he probado poniendo el Mousepointer a 99 y utilizando el MouseIcon.
Pero cuando utilizo el mouseicon siempre me dice que la imagen no es valida. He probado con archivos jpg, ico y nada. tambien he estado cambiando el tamaño, y he puesto imagenes de 16 x 16 y nada. la imagen de la mano me la he bajado de internet, porque en el paquete de office no se donde esta. ¿alguien sabe donde se encuentra?
entonces ya no se me ocurre que mas hacer.
haber si me podeis ayudar y decirme que es lo que estoy haciendo mal, porque en todos sitios leo que a la gente con lo del mouseicon le va bien, pero a mi me dice siempre que la imagen no es valida.
Espero vuestras respuestas.
Muchas gracias.
Un saludo
Contestar

    Pregunta:  64500 - CONEXION EN EICON ACCESS
Autor:  Joe Alvarez
Buen dia,

Me estoy incorporando a una compañia y en ella ocupan una plataforma llamada Eicon Access para poder obtener la informacion de sus bases de datos, estoy tratando de hacer una macro en excel pero no puedo lograr una conexion para poder jalar informacion, espero alguien me pueda orientar/ayudar con esta conexion.

Gracias y slds.!
Contestar

    Pregunta:  64515 - ACCESAR A FUNCIONES OCULTAS OFFICE2007
Autor:  Jose Humberto Ramírez Oseguera
Hola !!!

Tengo una pregunta sobre las funciones como FileSearch, Etc. que estaban activas por default en office 2003 y anteriores. Consulté el manual que trae MsExcel y ahi comenta que esos comandos estan ocultos; mi duda es como puedo hacer para que esos comandos puedan estar disponibles. en MsOffice 2007.

buscando encontré que esos comandos pueden activarse para MsAccess, modificando el Regedit, pero no he podido encontrar como activarlos en MsExcel.

De antemano les agradezco infinitamente su antención, ojalá puedan ayudarme. que tengan un excelente día.
Contestar

    Pregunta:  64547 - ERROR: 40002
Autor:  Augusto Rivas
Error: 40002 01000: [Microsoft][ODBC SQL Server Driver][DBNMPNTW]Connecction Open (Create File)) aparece al intentar guardar fotografia en formulario
Contestar

    Pregunta:  64566 - EJECUTAR MP4 DESDE UN FORM
Autor:  Federico Gazzano
Cómo puedo hacer para ejecutar un archivo con formato MP4 desde un form VB6. Veo solo la opción para AVI
Gracias
Contestar

|<  <<  23 24 25 26 27 28 29 30 31 32 33  >>  >|