BUSCAR EN PREGUNTAS Y RESPUESTAS

 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  >>  >|