PREGUNTAS CONTESTADAS - Visual Basic

Hay un total de 3030 Preguntas.

<< >>

Pregunta:	*2027 - UBICACIÓN DEL ENLACE (.UDL) Y BASE DE DATOS CON ADODC**
Autor:	David Airam Hernández Rodríguez
Me gustaría saber como puedo cambiar la ruta del enlace (.udl) y también poder cambiar la ruta de la base de datos aunque realmente la ruta está especificado en el .udl pero me gustaría saber si se pueden cambiar ambas rutas con alguna propiedad del adodc. He probado con la propiedad conecttionstring pero realmente no sé si esa propiedad es para la ruta de la base de datos o bien la del enlace *.udl. También me gustaría saber si al cambiar la ruta de la base de datos la indicada en el enlace se ignora o bien si el adodc primero lee la escrita en el enlace y desopués la que yo le asigne. Gracias por adelantado.

Respuesta:	Julian Flórez
Lo que tienes que hacer es poner la propiedead Instancing de la clase donde estan los métodos públicos en el valor 6, es decir, GlobalMultiUse

Respuesta:

Milton Orlando Serrano

al trabajar con el ADODC y la propiedan conecttion string, le estas indicando al control el proveedor y la base de datos que deseas accesar, independientemente de la que estas utilizando en la dataenvironment o conexion, la ruta la puedes hacer al generando la cadena de conexion en el cual escoges el proveedor y la ruta de la base de datos..un ejemplo
With Adodc1
.Mode = adModeUnknown
.ConnectionString= "Provider=MSDASQL.1;Persist Security Info=False;Extended Properties=DSN=DBelectrificadora;DBQ=C:\Archivos de programa\Electrohuila\electrohuila.mdb
;DefaultDir=C:\Archivos de programa\Electrohuila;DriverId=25;FIL=MS Access;MaxBufferSize=512;PageTimeout=5;UID=admin;"
.CommandType = adCmdText
.RecordSource = "SELECT NombModulo, CodModulo FROM Modulo WHERE CodMicrocentral = ´" & cod & "´"
.Refresh
End With

Contestar

Pregunta:	2029 - USAR UNA MACRO DE WORD EN VB
Autor:	Juan Miguel Esposito
Desearia saber como ejecutar una macro de Word desde VB5,ej: deseo imprimir un documento de word llamado planifica.doc que se encuentra en la carpeta c:\sanmartin. agradezco de antemano a quien me de alguna ayuda gracias

Respuesta:

Joan-Baptista Fàbregas Muñoz

En tu aplicacion tienes que añadir la referència de Microsoft Word Objects 8.0 (o la version que tengas instalada) i tienes que introducir el siguiente codigo:

Dim wrdAplicacion As Word.Application
Dim wrdDocumento As Word.Document

Set wrdAplicacion = New Word.Application

Set wrdDocumento = wrdAplicacion.Documents.Open("Path i nombre de documento")

Entonces para ejecutar la macro el codigo es:

wrdAplicacion.Run "Nombre de macro"

Por desgracia la macro no puede admitir parametros de entrada. Esto funciona con Word 97 i VB 6.0 creo que en tu caso tambien te puede funcionar.

Espero que te sirva.

Contestar

Pregunta:	2038 - COMO CREAR UNA DLL CON V. BASIC
Autor:	Jose
Hola a todos, puede ayudarme alguien a crear una DLL desde visual basic? Hasta ahora no he conseguido que los métodos que defino como públicos en la librería, puedan ser usados por otros proyectos.

Respuesta:

Jonnatan Rodríguez

Hola no soy muy experto en Visual Basic pero si un poco.

este es un ejemplo de un msgbox personalizado, pero lo puedes adactar a otras cosa.

1.- Lo primero que tiene que hacer es abrir VB, y en la ventana Nuevo Proyecto, seleccionas Dll ActiveX
2.- elegir esta opcion aparecera la ventana de codigo. class1
en esa ventana copis el siguiente código:

'Creas un Sub con dos parametros del tipo string (cadena de texto)
Public Sub MostrarMensaje(Titulo As String, Mensaje As String)

'defines una variable con la cual haras referencia al formulario
Dim Formulario As Form

'le indicas a VB que Formulario sera igual al Form1
Set Formulario = New Form1

'estableces la variables
'en el caption del formulario para el titulo pasado como parametro
Formulario.Caption = Titulo
'en el label del control label1 pones el mensaje
Formulario.Label1.Caption = Mensaje
'muestra el formulario de forma modal
Formulario.Show vbModal
End Sub

3.- insertas un formulario (Menu Proyecto > Agregar Formulario)
y colocas estos parametros

private form_load()
BorderStyle = 3 Fixed Dialog
StartUpPosition = 2 CenterScreen
end sub
agregas un boton al formulario

Private Sub Command1_Click()
Unload Me
End Sub

generas el dll en archivo->generar dll

esto es todo.

Para llamarlo la proxima vez en una nueva aplicación haces lo siguiente:
menu Proyecto > Referencias y eliges la ruta donde generastes el Dll

y en un form nuevo

colocas un boton

Private Sub Command1_Click()
mostrarmensaje "titulo", "mensaje"
End Sub

Respuesta:

Miguel Francisco Conde De Santis

Que tal, creo que te conviene crear un activeX como dll y crear tus metodos, una ves hecho esto lo registras con la utilidad regsvr32 y cualquier proyecto podrá usarlo creando una instancia de tu objeto con la función CreateObject. LO bueno de esto es que aprovecharias el manejo de MTS que inclusive ya viene incorporado en Windows 2000 y optimiza el rendimiento de esos objetos. Para crear un ActiveX DLL es muy simple, cuando cree un nuevo proyecto en VB6.0 selecciona el icono "ActiveX DLL". Si necesitas un proyecto ejemplo, enviame tu email y te lo envio anexo.

Contestar

Pregunta:	2043 - PROGRAMACION TELNET
Autor:	josé luis pinto martinez
Como realizar una conexión desde Visual Basic con Telnet, quiero comunicación desde visula con telnet, es decir programar telnet desde visual, ej: cuando entre a telnet y me pida la clave poder desde visual respondele, les agradezco cualquier ayuda posible

Respuesta:

jorge carvajal

para que hagas una aplicación y te comuniques con un servidor telnet, tienes que saber el protocolo que se usa para la comunicación con este servidor, en este momento no me acuerdo muy bien del protocolo, pero en la red puedes buscar los protocolos o en algun libro de TCP/IP.

solo tienes que mandar los comandos y esperar que el servidor te conteste, cuando te conteste le mandas otro comando y asi sucesivamente....

Contestar

Pregunta:	2053 - UTILIZAR EL CORRECTOR ORTOGRAFICO DE WORD A TRAVÉS DE V.B.
Autor:	Eduardo Jiménez Vargas
Deseo utilizar el corrector ortografico de Word a traves de una aplicación en Visual Basic 5.0, y a su vez poder almacenar los cambios realizados por word en mi campo memo. Espero y alguien tenga alguna sugerencia que me pueda ayudar.

Respuesta:

Julian Flórez

Con este codigo puede utilizar el corrector ortográfico de word desde visual basicsin que se note que se abre word

Private Sub Command1_Click()
Dim XWord As Object
Set XWord = CreateObject("Word.Application")
XWord.Visible = False
XWord.Documents.Add
XWord.Selection.Text = Text1.Text
XWord.ActiveDocument.CheckSpelling
Text1.Text = XWord.Selection.Text
XWord.ActiveDocument.Close SaveChanges:=wdDoNotSaveChanges
XWord.Quit
Set XWord = Nothing
MsgBox ("Ha finalizado la corrección ortográfica"), vbInformation
End Sub

Respuesta:

Alberto Melo Coton

Hola, este codigo es simplemente una actualizacion respecto a lo que escribio Jags Andrew 90. Yo tengo vb5 y Office97 y lo que me funciona es:

Option Explicit
´...
Private Sub Command1_Click()
Dim ObjExcel as Excel.Application
Set ObjExcel = New Excel.Application
ObjExcel.SheetsInNewWorkbook=1
ObjExcel.WorkBooks.Add
With ObjExcel.ActiveSheet
.Cells(1,1)=Text1.Text
.CheckSpelling
.Visible=True
End With
Text1.Text=ObjExcel.ActiveSheet.Cells(1,1).Value
ObjExcel.Application.DisplayAlerts=False ´No estoy
´seguro si esta es la sentencia que hace que al
´cerrar Excel no haga preguntas o la siguiente.
ObjExcel.Application.Quit
Set ObjExcel=Nothing
End Sub

A mi me da resultado y como veis no hay tanta diferencia al codigo de Jags.

Respuesta:	Jags Andrew 90®
Hola desde Colombia... Bueno es asi: antes de comenzar debes tener una caja de texto llamada text1 ** dim x set x=createobject("Excel.Sheet") x.cells(1,1).value=text1.text x.visible=true´visualiza cuadro de dialogo x.checkspelling text1.text=x.cells(1,1).value´copia el texto corregido x.application.quit set x=nothing ** Hasta la proxima...

Contestar

Pregunta:	2077 - PROBLEMAS CON VBAJET32.DLL Y MSVBVM50.DLL
Autor:	Rodrigo García Puente
Hola, me gustaría que me ayudaran a resolver un problema que tengo con Visual Basic. Por una parte, un programa que he hecho que utiliza el motor Jet de Bases de Datos me da el siguiente problema al instalarlo en algunos ordenadores y arrancar el programa: "El motor de VBAJET32.DLL no pudo iniciarse cuando se le llamó". Mi otra duda era que en algún programa que he hecho, cuando finaliza la aplicación me sale la típica pantalla de CERRAR y DETALLES, en DETALLES se puede ver que se produjo un error en MSVBVM50.DLL o KERNEL32.DLL. No se que es lo que puede pasar. Agradecería su respuesta y ayuda.

Respuesta:

Juan Antonio Gómez Felipe

El primer problema de la inicialización de VBAJET se debe a que en el PC donde generas el SETUP de la aplicación tiene la versión 5 y 6 de VB, y hay ciertas librerias que las machaca. Para solucionarlo incluye en el SETUP de la aplicación manualmente la libreria EXPSRV.DLL que hay en WINDOWS/SYSTEM. Es posible que te de algún problema de que le falta la información de dependencias y luego al instalar de que no ha podido registrarla, pero ignora los mensajes se soluciona.
En el Technet hay más informácion sobre este error. Espero haberte ayudado. Juan Antonio.

Contestar

Pregunta:	2103 - ABRIR UNA BASE DE DATOS UBICADA EN UN CD
Autor:	Adolfo Ruiz
Necesito que alguien me ayude a abrir una base de datos que reside en un CD. Lo estoy haciendo con VB6 y ADO. He probado a darle acceso de solo lectura pero no funciona. Agradecería cualquier ayuda.

Respuesta:	Excalibur jorge Corach
La opcion que tambien es posible, es al abrir la base, seria asi: Set Mibase = OpenDatabase("Archivo",ReadOnly,True) Espero que les sea de utilida hasta la proxima, aprovecho a agradecer a todos aquellos que envian sus ejemplos, que gracias a ellos he aprendido mucho de visual...

Respuesta:

Adolfo Ruiz

Bueno aunque este feo me contesteré yo mismo a la pregunta.

Rompiendome la cabeza e conseguido abrir la base de datos sin sacarla del CD. Esta contiene fotografias y no tengo que modificarlas, solo leerlas y presentarlas en pantalla.
El forma que he encontrado ha sido la siguiente:

Set cnnPhotos = New Connection
cnnPhotos.Mode = adModeUnknown
cnnPhotos.Open "Provider=Microsoft.Jet.OLEDB.4.0;"
"Data Source=" & UnidadCd & PathData & "\DataPho.mdb"

Como puedes ver solo cambiando la propiedad mode de la connection la base de datos puede ser abierta en modo lectura.
Así que si necesitaís hacer algo parecido aquí teneís la forma.

Contestar

Pregunta:	2109 - ERROR TYPE MISMATCH
Autor:	VICTOR SALAZAR
HOLA saludos. Mi pregunta es si alguien me puede ayudar a solucionar el siguiente error (type mismatch) al tratar de instalar mi aplicacion en una pc. que no tiene cargado el paquete de visual basic, he detectado que las aplicaciones realizadas en visual basic ver.5, se pueden instalar perfectamente, pero recientemente cambie a la vercion 6 de visual basic, y no he podido instalar mi aplicacion, ya he hecho varias pruebas, instalando el programa DCOM98.EXE, y los OLEPRO32.DLL OLEAUT32.DLL, o si me pudieran decir si esta vercion tiene algun problema de compativilidad con windows-95 y windows-98 para regresarme a la vercion 5. GRACIAS POR SU AYUDA.

Respuesta:	Claudio M
Me parece que es por la configuración regional del equipo, prueba cambiendo de dd/mm/yyyy a mm/dd/yyyy. (Panel de Control / configuración regional)

Respuesta:	Manuel Castro M.
Utiliza el Package de Visual 6 ! me cuentas !

Contestar

Pregunta:	2115 - FORMULARIOS MDI Y SECUNDARIOS
Autor:	Pedro Cabrera
Hola a todos, espero que me puedan ayudar, el problema es el siguiente: Tengo un exe standard con un formulario mdi, activando un evento llamo a un exe activex el cual activa un formulario comun y corriente, la pregunta es: ¿como hago para que el formulario del activex este contenido en el formulario mdi del standard como si fuera un mdichild?

Respuesta:	Ximena Tamame
todos los formularios tienen una propiedad (mdichild) que por defecto esta establecida en false, seteala a true y se convertira en un formulario mdichild. Espero que solucione tu problema.

Contestar

Pregunta:	2118 - COMO ESCRIBIR EN UN TEXTBOX EN MAYUSCULAS
Autor:	Xavi
Como puedo hacer, para que los datos que se introduzcan en un TextBox, aparezcan siempre en mayusculas? Gracias anticipadas.

Respuesta:	Roque Andrés Aranda
Lo mas facil: En el evento LostFocus frl TextBox Text1.text=ucase(text1.text) Asi se actualiza cuando el text box pierde el foco, cuando son muchos text box, utiliza un array de text boxs

Respuesta:	Luis Miguel Caballero
En el evento keypress keyascii=asc(ucase(chr(keyascii)))

Respuesta:	Manuel R. Bercian
Te comento que pude hacer que en un TextBox solo se escriban Mayusculas aunque esten en minusculas te mando el codigo para que lo probes Text1.text=ucase(text1.text), si funciona pero escribe la palabra alreves. siempre en el evento change pon lo siguiente Text1.Text=Ucase(text1.text) Text1.Setfocus SendKeys "{END}"

Contestar

|< << 34 35 36 37 38 39 40 41 42 43 44 >> >|