PREGUNTAS CONTESTADAS - Visual Basic

Hay un total de 3030 Preguntas.

<< >>

Pregunta:	39893 - CARGAR UNA IMAGEN EN UN PICTUREBOX DESDE UN ARCHIVO .RES
Autor:	Christian Domenichelli
Hola Lo que intento hacer es lo siguiente cargar una Imagen en un PictureBox desde un archivo .Res En el objeto le asigno a la propiedad Tag un valor similar al que tengo en el archivo de recurso. Pero cunado el tipo es un PictureBox en for interno la propiedad ctl.ColumnHeaders me da error dice que no existe el objeto Lo raro es que para otros objetos si funciona For Each ctl In frm.Controls Err.Clear If TypeName(ctl) = "PictureBox" Then For Each obj In ctl.ColumnHeaders Err.Clear If IsNumeric(obj.Tag) Then obj.Picture = LoadResPicture(CInt(obj.Tag), vbResBitmap) End If Next End If Next SI alguien sabe como puede resolver esto se lo agradezco mucho

Respuesta:

Alex Chong

Hola soy de panamá, y creo que lo que te voy a decir te puede funcionará pero no sé si te agrada la idea siguiente:

---porque no intentas cambiar lo el PixtureBox por un Images y utiliza y creas un modulos.frm que permita buscar atraves del directorio de tu pc y capturar el Path (la ruta de la ubicación de la images y lo asigna a una variables string y finalmente la carga:

private sub mostrarImagenes()
dim StrLugar as string
StrLugar="C:\Mis Documentos\Imagenes\0001.jpg"
Images.streach=True
Images.caption=loadpiture(StrLugar)
end sub

El objeto pictureBox a mi criterio no me adrada mucho porque no hay libertad de manipulación, cualquiera cosa me escribes. espero que te funciones.

Contestar

Pregunta:	39931 - COMO CREAR USUARIOS
Autor:	cesar ericezs
Hola amigos estoy creando un programa en sql server 7.0 y visua basic 6.0 lo deseo saber es como crear, modificar, eliminar y agregar usuarios con sus respectivas claves; en un codigo de visual basic por supuesto

Respuesta:	julio garcia
Cesar, tendrás que usar un ABM de manera que puedas administrar a los usuarios con sus claves. Obviamente, tendrás que dar de alta a los usuarios en SQL server, de acuerdo al tipo de seguridad que poseas, ya sea SQL server y/o NT-Window2000 server. Para ampliar, enviame correo.

Contestar

Pregunta:	39963 - MANEJO DE PUERTO SERIE CON "PORT.DLL"
Autor:	Leonardo Nicolás Nuñez Ramos
Necesitaría saber que hacen las funciones de la librería para manejo de puerto serie "PORT.DLL", ya que las necesito para terminar un trabajo para la facultad, y solo encuentro documentación al respecto en idioma aleman. Algunas de las funciones son: TIMEINITUS, DTR1, REALTIME (), TIMEREADUS. Gracias...

Respuesta:	Jorge Mercedes Ruiz
Si es posible obtener tambien la misma informacion para el manejo de puerto paralelo. Todo esto en Visual Basic o algunas de sus versiones, que manejen puertos. Trabajo ahora en un proyecto de adquisicion y procesamiento de datos. pero me gustaria comparar entre el puerto paralelo y el serie. Es decir cual implementacion, se me haria mas facil.

Contestar

Pregunta:	40008 - DUPLICAR ESTRUCTURA DE BASE DE DATOS
Autor:	jose ignacio ibarra marroquin
Me gustaria saber si es posible copiar la estructura de una base de datos tipo ACCESS con todas sus tablas y asignarle otro nombre de base de datos. Por ejemplo, en trabajos de contabilidad, poder operar con archivos de base de datos independientes para cada empresa, pero conservando todos ellos la misma estructura interna. Gracias.

Respuesta:	lic carlos hernnadez
usa la instruccion filecopy (ve el ayuda)

Contestar

Pregunta:	40046 - MANIPULAR UNIDAD DE CD-ROM POR MEDIO DE UN PROGRAMA EN VB
Autor:	Darwin Ibarra Gutierrez
Quiero saber el codigo fuente para manipular la unidad de CD-ROM, como expulsarla, desactivarla, etc.

Respuesta:

SuNcO

Para abrir y cerrar la unidad :

'Añade dos CommandButtons a tu formulario

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

Private Sub Command1_Click()
'Se abrirá el CD
retvalue = mciSendString("set Cdaudio door open", returnstring, 127, 0)
End Sub

Private Sub Command2_Click()
'Se cerrará el CD
retvalue = mciSendString("set Cdaudio door closed", returnstring, 127, 0)
End Sub

Contestar

Pregunta:	40086 - USAR INTER BASE COMO BASE DE DATOS
Autor:	Eduardo Urrejola Escobar
Quisiera saber si se puede ocupar inetr base como base de datos y si es posible, saber como hacerlo.

Respuesta:	jUAN mEJIA
si se pude utilizar lo unico a tienes q hacer es encontrar la carpeta dentro del CD Interbase q diga ODBC ejecutas el archivo setup.exe y listo ! ! ! despues agregasdesde visual basic el componente Microsoft Windows Common Dialogs 6.0 y despues crear tu cadena de conexion y ya.

Contestar

Pregunta:	40180 - APPLETS EN VISUAL BASIC
Autor:	gustavo prado cespedes
quisiera saber si es posible utilizar applets en Visual Basic

Respuesta:	Ric Sierra
Los applets son para Java lo que los OCX son para VB. Ahi esta tu respuesta.

Contestar

Pregunta:	40405 - COMPACTAR Y REPARAR ACCESS DESDE VB
Autor:	Carlos Serrano
Estoy interesado en saber si es posible activar desde Visual basic la opción de Compactar y reparar la base de datos de Access... Gracias...

Respuesta:

Pedro Valencia

Este es el codigo para poder compactar una base de datos
***********************
Sub CompactDatabaseX()

Dim dbsNeptuno As Database

Set dbsNeptuno = OpenDatabase("Neptuno.mdb")

' Muestra las propiedades de la base de datos original.
With dbsNeptuno
Debug.Print .Name & ", versión " & .Version
Debug.Print " Secuencia de ordenación = " & .CollatingOrder
.Close
End With

' Asegúrese de que no existe un archivo con el
' nombre de la base de datos compactada.
If Dir("NeptunCo.mdb") <> "" Then _
Kill "NeptunCo.mdb"

' Esta instrucción crea una versión compactada de
' la base de datos Neptuno que utiliza la secuencia
' de intercalación del lenguaje coreano.
DBEngine.CompactDatabase "Neptuno.mdb", _
"NeptunCo.mdb", dbLangKorean

Set dbsNeptuno = OpenDatabase("NeptunCo.mdb")

' Muestra las propiedades de la base de datos compactada.
With dbsNeptuno
Debug.Print .Name & ", versión " & .Version
Debug.Print " Secuencia de ordenación = " & .CollatingOrder
.Close
End With

End Sub
**************************

y este el el codigo para poder repararla
**************************************

Sub RepairDatabaseX()

Dim errBucle As Error

If MsgBox("¿Desea reparar la base de datos Neptuno?", _
vbYesNo) = vbYes Then
On Error GoTo Err_Reparar
DBEngine.RepairDatabase "Neptuno.mdb"
On Error GoTo 0
MsgBox "¡Fin del procedimiento reparar!"
End If

Exit Sub

Err_Reparar:

For Each errBucle In DBEngine.Errors
MsgBox "¡Falló Repair!" & vbCr & _
"Número de error: " & errBucle.Number & _
vbCr & errBucle.Description
Next errBucle

End Sub
*******************

Espero te sirva de ayuda
Saludos

Contestar

Pregunta:	40407 - CREACION DE TABLAS ORACLE DESDE VISUAL
Autor:	ELIA
Tengo un problema con la creación de tablas desde visual Basic, al intenter crear una tabla en un programa VISUAL, me dice q no tengo privilegios en mi tablespace. Cuando entro a ejecutar el programa como el administrador, no tengo problemas, pero cuando entro como usuario no me deja, la creación la hago mediante sentencias SQL. Para evitar el problema me he dado privilegios desde SQL con la siguiente sentencia: sql> GRANT CREATE TABLE TO usuario1; La cual se ejecuta con exito "contestando" 'Concesión realizada con éxito'. Pero en visual no me lo reconoce y sigue dandome insuficientes privlegios en su tablespace.La cosa es q tengo q crear esa tabla y no sé como hacerlo. De antemano os agradezco vuestra colaboración. Muchas gracias.

Respuesta:	Dhymitri
Hola Tu problema no pasa por un error de VB, si no de permisos en motor de ORACLE el usuario de conexión que usas no tiene privelegios de creación de tablas fisicas o temporales, pasa lo mismo en SQL Server, asi que dile a tu adminsitrador que le de privilegios a tu usuario de conexión para crear tablas Chao

Contestar

Pregunta:	40476 - COMO GUARDAR UNA IMAGEN EN MYSQL DESDE VB
Autor:	Leonardo Ramirez
El tipo de campo que maneja MySQL es Blob para guardar imagenes......ya trate de guardarlo como si guardar una imagen en una base de datos de acces con el tipo de dato OLE DB...pero no funciono......ojala alguin pueda resolverme el problema...gracias

Respuesta:

Alex Chong

No se como se guarda una imagen en una base de datos, pero esto te puede servir y he mas mantienes la base livianos y mas rapido a la hora de mostrar un regsitro o la image si tiene por ejemplo 300 imagenes en data, la solucion consta del siguiente:

el campos de dondes piensa guardar la images pues no lo haga, guardas el paranmetro de la ubicacin de la ímagen y si es mejor mantenlo en una carpeta exclusiva para ella y siempre sera hacia esa dirección y solo cambia el nombre final Ejemplo:

C:\Imagenes\im1.gif, tomamos que esta sea la dirección ok, guarda la direccion nada mas ya manten esa imagen en esa carpeta, y asi cuando lo llama, es mas rapido y el campo de la dat es cien veces mas livianos, se carga de la siguiente manera:

private sub Mostrar
dim strRuta as string
Images.streach=True
Images.picture=loadpicture(StrRuta).
Images.refresch
end sub

Contestar

|< << 236 237 238 239 240 241 242 243 244 245 246 >> >|