Se han encontrado 2654 coincidencias. | << >> |
Visual Basic |
Pregunta: | 42071 - BASES CON CONTRASE脩A |
Autor: | Mariano C贸cora |
Quisiera saber como abrir una base de Access 97 con contrase帽a mediante codigo desde Visual Basic 6.0 sin usar objeto data, mediante variables recordset y demas. Desde ya muchas gracias! |
Respuesta: | Oswaldo Monagas |
Abrir con ADO estableciendo usuarios
'Agregar en las referencias 'Microsoft ActiveX Data Objects 2.0 Library 'o alguna version mas reciente 'declarar esto en un m贸dulo .bas Private DBConnection As New ADODB.Connection 'Abre una base de datos access 'Regresa : 'True = Exito al conectar 'False = Error al conectar ' Public Function AbrirBaseDatosAccess(ByVal BaseAccess As String, _ Optional ByVal Access2000 As Boolean = False, _ Optional ByVal Usuario As String = "", _ Optional ByVal Password As String = "") As Boolean On Error GoTo ErrorAbrirBaseDatosAccess Dim ret As Boolean Dim Conexion As String ret = True If Not Access2000 Then 'access 97 Conexion = "Provider=Microsoft.Jet.OLEDB.3.51;" _ & "Persist Security Info=False;Data Source=" & BaseAccess Else 'access 2000 Conexion = "Provider=Microsoft.Jet.OLEDB.4.0;" _ & "Persist Security Info=False;Data Source=" & BaseAccess End If DBConnection.ConnectionTimeout = 0 'no hay limite de espera de tiempo If Usuario <> "" Then DBConnection.Open Conexion, Usuario, Password Else DBConnection.Open Conexion End If GoTo SalirAbrirBaseDatosAccess ErrorAbrirBaseDatosAccess: ret = False MsgBox "AbrirBaseDatosAccess : " & Err & " " & Error$, vbCritical Resume SalirAbrirBaseDatosAccess SalirAbrirBaseDatosAccess: AbrirBaseDatosAccess = ret Err = 0 End Function Otra forma: Abrir una base de datos con seguridad desde ADO Permite abrir desde Visual Basic una base de datos cuando hay establecida seguridad a nivel de usuario La seguridad utilizada convencionalmente por Microsoft Access es una seguridad a nivel de usuario, controlada desde los ficheros .MDB y .MDA o .MDW (seg煤n versi贸n de Microsoft Access). NOTA: Aunque se disponga de Microsoft Access en idioma castellano y el usuario se llame Administrador, es necesario pasar "Admin" como UserID, y no "Administrador". Microsoft Access 7.0 y Microsoft Access 97 tambi茅n incorporan otro tipo de seguridad, asociada a la base de datos (se protege la base de datos con una contrase帽a que forma parte del fichero .MDB, y que solamente es solicitada al abrir 茅sta). El c贸digo aqu铆 incluido permite abrir desde Visual Basic una base de datos cuando hay establecida seguridad a nivel de usuario. Previamente, desde el entorno de Microsoft Access se ha asignado al usuario Administrador (que es por defecto el propietario de todas las bases de datos) una contrase帽a ("ejemplo"). Esto se hace en Access 97 en la opci贸n de men煤 Herramientas, Seguridad, Cuentas de usuario y de grupo y, una vez ah铆, accediendo a la pesta帽a Cambiar contrase帽a de conexi贸n. A partir de entonces, al abrir Access ser谩 necesario proporcionar el usuario y la contrase帽a. Tambi茅n a partir de entonces, para abrir un MDB desde VB ser谩 necesario pasarle el usuario y la contrase帽a. Dim Cn As New ADODB.Connection Dim strCn As String strCn = "Provider=Microsoft.Jet.OLEDB.3.51;" & _ "Data Source=nwind.MDB;" & _ "Jet OLEDB:System database=c:\winnt\system32\System.MDW" Cn.Open ConnectionString:=strCn, _ UserID:="Admin", Password:="moises" |
Pregunta: | 42129 - MARQUESINA PARA VISUAL VASIC 6.0 |
Autor: | Santiago Zu帽iga Shaik |
Existe un componente OCX, que me permita mostrar un texto movil en un formulario |
Respuesta: | Marito |
Tenes que hacer lo siguiente:
Usando un PictureBox como contenedor, agrega dentro de el un label suponiendo que el picture se llama picture1 y el label label1: agrega en el formulario un timer con el la propiedad interval en un valor adecuado a la velocidad que le queres imprimir al label. La propiedad autosize el label en true en la seccion general del formulario declara una variable dim posx as long en el evento load del form posx=picture1.width label1.left=posx en el evento timer del timer posx=posx-100 'con el 100 tambien modificas la velocidad del label if posx<-label1.width then posx=picture1.width en if label1.left=posx Espero te sirva. Salu2. Mario |
Respuesta: | Rafael Salas |
que tal primero tienes que dirigir el cursor al la barra de herramienta que se encuentra en el menu insertar del programa visual basic 6.0, insertas los toolsbarts y escribes la marquesinas o le insertas la imagen que desees que se despliegue por el programa.
PARA ACLARAR CUALQUIER DUDA ME PUDES ENVIAR UN CORREO Y YO TE RESPONDERE A LA BREVEDAD POSIBLE. |
Pregunta: | 42139 - SCROLL BAR EN LISTBOX |
Autor: | Jose Castellanos |
Hola y gracias de antemano por la ayuda, mi problema es el siguiente:
Tengo un listBox que carga registros de una base de datos, pero algunos registros son demasiado largos y no se visualizan todos los caracteres en el listbox, y no encuentro una propiedad de Scroll bar para mostrar toda la longitud del Item, hay alguna forma de mostrar todo el contenido del Item ??? La revise en las pregustas contestadas y por contestar y no encontre nada paracido. Nuevamente Gracias. |
Respuesta: | H茅ctor Shamir P茅rez |
Hola Jose, No existe un scroll horizontal para los ListBox a exepci贸n de cuando trabajas con columnas.
Recomiendo que trabajes con un FlexGrid y actives la propiedad AllowUserResizing. O en ultimo de los casos trabaja con un simple TextBox y la propiedad Multiline Espero te sirva. |
Pregunta: | 42222 - API PARA OBTENER EL APELLIDO DEL USUARIO DE WINDOWS |
Autor: | David Sanchez Lopez |
Hola, me gustaria saber como se obtienen los apellidos del usuario de windows con visual basic.
Con la api getUserName() solo obtengo el nombre Gracias |
Respuesta: | SuNcO |
Intenta con esto, a mi me funciona bien (son 3 lineas)
Private Sub Form_Load() Set Registro = CreateObject("WScript.Shell") MsgBox Registro.RegRead("HKEY_LOCAL_MACHINE\Software\Microsoft\Windows NT\CurrentVersion\RegisteredOwner") Set Registro = Nothing End Sub En Proyecto / Referencias checa si hay uno llamado OLE Automation activado. Esto es en Windows XP. En Windows anteriores no recuerdo cual es la clave donde se guardan esos datos |
Pregunta: | 42250 - CODIGO PARA CONECTAR TABLAS DE ACCESS EN VISUAL BASIC |
Autor: | Nestor velasco |
por favor necesito saber el codigo con su respectiva explicacion de como conectar tablas de access base de datos a visual basic gracias |
Respuesta: | Milton Hans Galarce |
'Desde el menu projecto agregar la referencia DAO 3.6
'Declarar variables de tipo: Public Base As Database '----> Base de Datos Public Tabla As Recordset '-----> Tabla de la Base 'Finalmente la coneccion ser铆a de la siguiente manera: Funcion() Set Base = OpenDatabase("Ruta de la base *.mdb") Set Tabla = Base.OpenRecordset("Tabla 1") Fin |
Pregunta: | 42328 - COMO REPRODUCIR UNA ANIMACI脫N FLASH EN VISUAL BASIC... |
Autor: | David Bos |
Hola amigos estoy haciendo un formulario y necesito reproducir una animaci贸n que hice en Macromedia Flash, y me gustaria saber como reproducirla cuando se carge este formulario. |
Respuesta: | marco pajuelo paredes |
Es sencillo.
Simplemente tienes que tener tu archivo con extension *.swf y en visual basic llamas al componente Shockwave Flash. Lo arrastras al formulario como cualquier otra herramienta. Y al cargar tu formulario (form_load) o al activarse (form_activate) escribes lo siguiente: ShockwaveFlash1.Movie = "ruta" En "ruta" escribes la direccion en donde se encuentra tu archivo con extensi贸n SWF. Al final s贸lo presionas F5 y mira tu formulario. |
Respuesta: | Marito |
Hola:
Usa el control ocx ShockwaveFlash que se encuentra en la opcion componentes del menu proyecto. Espero te sirva. Salu2. Mario. |
Pregunta: | 42340 - 驴QUE CODIGO REALIZO PARA IMPRIMIR UN FORMULARIO EN BASIC 6.0 |
Autor: | Andres FELIPE aRBOLEDA |
necesito saber el codigo para imprimir un formulario que se llama solicitud de credito |
Respuesta: | GABRIEL ZU脩IGA |
PARA IMPRIMIR EL FORMULARIO TAL CUAL SOLO TIENES QUE PONER UN BOTON Y DENTRO DE ESTE BOTON EL SIGUIENTE CODIGO
PrintForm ESO ES TODO, Y LISTO TU FORMULARIO SALE IMPRESO CON LUJO DE DETALLES. p.d. espero que sea lo que estas buscando |
Pregunta: | 42414 - CONEXI脫N DEL CRYSTAL REPORT 4 O 8 CON VB6 |
Autor: | juan medrano |
Al que pueda ayudarme:
Uso el SQL SERVER y Visual Basic 6.0 y el Crystal Report 4, 8 He creado mi archivo .rpt, sin ningun problema. En mi programa asigno a la propiedad conexion la sentencia requerida, pero cuando abro desde mi programa solo me muestra el archivo con los datos antiguos y no asi actualizados. Si alguien sabe como conectar por favor envienme su soluci贸n en forma detallada |
Respuesta: | Carlos Gonzalez |
tenes que seleccionar la opcion verificar en cada impresion en el dise帽o del informe desmarcar la opcion guardar datos con el informe, en el menu archivos, porque si no utiliza los datos que se guardaron con el informe la primera vez.- |
Pregunta: | 42445 - CONVERTIR BASE DE DATOS ULTRALITE (UDB) A ACCESS(MDB) |
Autor: | Pedro Sapon |
Estoy desarrollando una aplicacion de base de datos para Palm OS y Pocket PC en la cual utilizo IANYWHERE SQL(ultralite dbf) y APPFORGE MOBILE sobre VISUAL BASIC. Las bases de datos ULTRALITE tienen un manejador llamado SYBASE CENTER. Me gustaria saber si alguien conoce la forma de convertir una base de datos ULTRALITE a formato access (mdb) sin tener que pasar por el manejador Sybase Center.
Gracias. |
Respuesta: | Sandy Serna Parra |
Hola Pedro Sapon
Para convertir esa base de datos que en realidad no es una base de datos si no un tabla dbf, por que esos manejadores viejos solo manejaban tablas o conjunto de tablas, desde Acces la puedes importar es sencillo, crear una nueva base de datos en acces y luego le dice importar escojes el formato *.dbf y listo lo demas ya tu lo debes saber guardas esa base de datos o modificas los campo de la tabla importada etc. espero te sirva esto Sandy Serna Parra Programador de Sistemas Halcon34 |
Pregunta: | 42448 - EXPORTAR TABLAS Y CONSULTAS EN VB 6 VS ACCESS 2000 |
Autor: | Ernesto Parrilla Garrido |
Hola.
Trabajo con Windows 2000 y utilizo Visual Basic 6.0. Estoy pasando una aplicaci贸n realizada para Access 97 a Access 2000 utilizando DAO 3.6. La aplicaci贸n antigua tiene una opci贸n de exportar tablas y consultas a otra base de datos, por c贸digo ser铆a as铆: Set AplicAccess = CreateObject("Access.Application.8") AplicAccess.DoCmd.RunCommand acExportar Pero con Access 2000 esto no funciona, c贸mo podr铆a realizar lo mismo con Access 2000. Muchas Gracias |
Respuesta: | Gustavo ju谩rez |
Puedes usar la accion TransferirBaseDatos. La sintaxis quedar铆a m谩s o menos as铆:
DoCmd.TransferDatabase [tipotransf],tipobasededatos,nombrebasededatos[,tipoobjeto],origen, destino[,soloestructura][,guardariddeinicio] donde tipotransf : acExport, acImport (predeterminado), acLink tipobasededatos Microsoft Access (predeterminado) Jet 2.x Jet 3.x dBaseIII dsBaseIV dBase5 Pradox 3.x Paradox 4.x Paradox 5.x Paradox 7.x Basede datos ODBC nombrebasededatos - incluye la ruta de acceso tipoobjeto: acTable (predeterminado) acQuery acForm acReport acMacro acModule acDataAccessPage acServerView acDiagram acStoredProcedure origen destino soloestructura: True False guardaridinicio True False ejemplo: DoCmd.TransferDatabase acImport, "dBase III", "c:\Midirectorio\basededatos.dbf", acTable, "archivo.dbf","MiTabla" Espero te pueda servir de algo Saludos! |
|< << 218 219 220 221 222 223 224 225 226 227 228 >> >| |