SoloCodigo

Yo estuve intentando hacer también una aplicación multitarea con visual basic 6.0 pero no funcionaba bien del todo porq lo que decidi hacerla con visual basic .NET que lei que si que se podía y era bastante sencillo.

Ahora mismo la estoy desarrollando pero por las pruebas que estoy haciendo y lo que llevo echo de la aplicación funciona correctamente, o sea que te aconsejo que lo hagas en .NET que es muy sencillo hacerle multitarea.

De todas formas, si sigues keriendo hacerlo con la versión 6.0 te puedo pasar unos módulos que hice y pruebas a ver si te sirve.

Y si decides hacerlo en .NET te puedo pasar un libro muy bueno en pdf que tengo que te explica muy bien como programar en .NET

Saludos.

Yo creo que una buena solución es que creeis en el servidor una carpeta ocx, dentro de la cual ireis almacenando los ocx. Después creas un archivo por lotes que lo que haga es que cada vez que se ejecute copie los ocx y los registre de forma automática en la máquina de la persona que lo ejecuto.

No se si me he explicado bien pero yo creo que es una solución bastante buena. Uno de los inconvenientes es que la primera vez que tengas que hacer el proceso por lotes vas a tardar un pokito a no ser que seas una máquina de hacer procesos por lotes, pero las siguientes veces ya sólo vas a tener que copiar los ocx en la carpeta ocx del servidor y modificar el proceso por lotes (que no se tarda nada).

Saludos.

Tienes declarado rs como recordset y cn como un objeto connection y lo tienes abierto?

El código lo tienes que tener de la siguiente forma:

Set cn = Server.CreateObject("ADODB.Connection")ç
Set rs = Server.CreateObject("ADODB.Recordset")

'Donde la variable ConnectionString tiene que contener la cadena de conexión con la base de datos

cn.Open ConnectionString

Set rs = cn.Execute("SELECT ...")

'acciones

'Cerramos la conexión y destruimos los objetos para liberar memoria
cn.close
Set rs = Nothing
Set cn = Nothing

Comprubea de todas formas que la consulta de SQL la tengas bien hecha.

Saludos.

He encontrado este ejemplo por internet espero que te sirva. A este ejemplo sólo falta que se puedan parar los procesos, pero eso ya investiga tu un poco de todas formas creo que es mediante la API TerminateProcess o algo asi.

De todas formas si tienes la posibilidad de poderlo hacer con Visual Basic .NET dimelo porque yo tengo echo un programita con todo lo que tu kieres pero con .NET.

Saludos.

Yo creo que depende de que sea la aplicación y los objetos que utilices para crearla.

De todas formas te aconsejo lo mismo que J.M.Movilla intenta instalarla y luego pruebala que es la mejor forma que tienes para probarlo porque no creo que nadie del foro te sepa decir con exactitud si te va a funcionar o no.

Cuando lo pruebes comentame que te ha sucedido que tengo interés por saberlo.

Gracias.

Saludos.

Muchas gracias a los dos. Era lo que yo quería exactamente.

Saludos.

Tienes que visualizarlo obligatoriamente en un picturebox?

El objeto picturebox tiene una propiedad que es autosize que si la pones a true hace que el picturebox se redimensione según el tamaño de la imagen para poderla ver en su totalidad.

En cambio en objeto image tiene una propiedad que es Stretch que si la pones a true hace que las imágenes se ajusten al tamaño del objeto image pudiendo así poder la imagen también en su totalidad.

Espero que sea esto a lo que te refieres.

Saludos.

Muhas gracias a todos por ayudarnos a resolver nuestra duda.

Saludos.

Tengo que hacer un programa para un gimnasio, el cual tiene un lector de tarjetas de crédito. Es decir los usuarios del gimnasio pasan su tarjeta y si es correcta les abre la puerta sino no.

Como puedo interactuar con el lector de tarjetas de crédito desde visual basic (6.0 o .NET me da lo mismo) y poder obtener los datos que contiene la tarjeta?

Muchas gracias de antemano. Por favor es muy urgente.

Saludos.

Pon el siguiente código en un formulario:

RichTextBox1.Text = Module1.GetFolder(Form1.hWnd, "Select folder")

En un módulo:

Declare Function SHGetPathFromIDList Lib "shell32.dll" Alias "SHGetPathFromIDListA" (ByVal pidl As Long, ByVal pszPath As String) As Long
Declare Function SHBrowseForFolder Lib "shell32.dll" Alias "SHBrowseForFolderA" (lpBrowseInfo As BROWSEINFO) As Long

Const BIF_RETURNONLYFSDIRS = &H1
Const BIF_DONTGOBELOWDOMAIN = &H2
Const BIF_STATUSTEXT = &H4
Const BIF_RETURNFSANCESTORS = &H8
Const BIF_BROWSEFORCOMPUTER = &H1000
Const BIF_BROWSEFORPRINTER = &H2000


Type BROWSEINFO
  hOwner As Long
  pidlRoot As Long
  pszDisplayName As String
  lpszTitle As String
  ulFlags As Long
  lpfn As Long
  lParam As Long
  iImage As Long
End Type

Function GetFolder(ByVal hWndOwner As Long, ByVal sTitle As String) As String
Dim bInf As BROWSEINFO
Dim RetVal As Long
Dim PathID As Long
Dim RetPath As String
Dim Offset As Integer
    bInf.hOwner = hWndOwner
    bInf.lpszTitle = sTitle
    bInf.ulFlags = BIF_RETURNONLYFSDIRS
    PathID = SHBrowseForFolder(bInf)
    RetPath = Space$(512)
    RetVal = SHGetPathFromIDList(ByVal PathID, ByVal RetPath)
    If RetVal Then
      Offset = InStr(RetPath, Chr$(0))
      GetFolder = Left$(RetPath, Offset - 1)
    End If
End Function


Con esto te aparecerá el selector de carpeta de windows.

Saludos.

Yo lo he estado buscando por internet y no he encontrado nada. La solución que he encontrado ha sido prácticamente la misma que me has dado tu pero en vez de hacerlo con funciones de la API de windows lo hago con el objecto FileSystemObject.

He estado buscando en el visor de las apis y no he encontrado nada, o sea que supongo que no existirá esa función tan necesaria.

Espero que en la versión de Visual Basic .NET la hayan añadido porque es bastante necesaria a la hora de programar para no tener que andar haciendo estas historias. Yo he empezado no hace mucho a programar con el .NET y la verdad es que tiene bastantes cambios y algunas mejoras esperemos que esta sea una de ellas también.

Saludos,
Roberto García

Para reproducir videos lo que tienes que hacer es lo siguiente:

- Agrega el componente Microsoft Windows Common Controls 6.0

- Agrega el objeto Animation al formulario.

- En el Evento form_load del formulario por el siguiente código:

    Animation1.Open (ruta_fichero)
    Animation1.Play

En la propiedades del objeto animation, en la propiedad Autoplay pon false para que no se esté reproduciendo sin parar.

Espero haberme explicado bien.

Saludos,
Roberto García

La solución es que te hagas tu un formulario como quieras y que te encarges tu de que luego dicho formulario sea igual que un msgbox.

Por lo menos yo es como lo hago y va muy bien.

Saludos,
Roberto García