SoloCodigo

Hola.
Tengo la siguiente duda. Estoy intentando meter 3 formularios en un formulario MDI, pero no se como hacer para darle a cada uno su espacio y se carguen siempre ahí, como si fuese un picture por ejemplo.
Muchas gracias.

Kaixo Brroz!
Te agradecería mucho si me agregases el ejemplo.
MUCHISIMAS GRACIAS!
Agur!

La verdad es que ninguna de las funciones las he creado yo, sino que son funciones que se utilizan en el Setup1.vbp.
La función GetShortPathName devuelve un string, y he comprobado que el problema no proviene de aquí, pero si de ExtractFileFromCab. La declaración de esta función es la siguiente:

Declare Function ExtractFileFromCab Lib "vb6stkit.dll" (ByVal Cab As String, ByVal File As String, ByVal Dest As String) As Long

Gracias por todo.
AIO!

No tienes por que disculparte. Es normal que ocurran malentendidos, sobre todo si al principio me explico mal.
Un saludo a ti también.

Lo de volver a generar el empaquetado ya lo he hecho, pero sigue sin funcionar. Con respcto al archivo .DDF, ni siquiera se lo que tengo que buscar, eso sí, si tiene que haber alguna referencia a setup1.exe, no la hay. Probaré con esto a ver si consigo algo.
Muchisimas gracias por todo!
AGUR!

Supongo que me he explicado mal.
Lo que he hecho ha sido guardar una copia del original y ahora estoy intentando restaurarla, es decir, vuelvo a ponerlo todo igual que estaba antes de haber modificado nada.
Cuando ejecuto el setup.exe que pone en la carpeta support no hay ningun problema, pero si ejecuto este mismo programa en le directorio que lo pone por defecto es cuando aparece el problema.
Muchas gracias por todo.

A ver si esto te ayuda en algo:

Option Explicit
-------------------------------------------------------------------------------
Private Sub cboName_Click() ' Este el nombre del Combo
' Load the selected record.
datPeople.RecordSource = _ ' datPeople es el Control Data
"SELECT * FROM People WHERE Name='" & _ ' People nombre de la Tabla a consultar y "Name" creo que es uno de los campos de la Tabla
cboName.Text & "'"
datPeople.Refresh
End Sub
--------------------------------------------------------------------------------
Private Sub Form_Load()
Dim dbname As String
Dim db As Database ' A veces me marca error (objeto no difinido)
Dim rs As Recordset

' Open the database.
dbname = App.Path  'dbname toma el directorio actual, es decir, el directorio en el que se está ejecutando el programa
If Right$(dbname, 1) <> "" Then    
'comprueba si el path que contiene dbname acaba con "" y si no es así se lo pondrá
dbname = dbname & ""
dbname = dbname & "data.mdb" 'ahora dbname contiene el path completo, incluyando el nombre de la base de datos, que es "data.mdb"

Set db = OpenDatabase(dbname) 'abre la base de datos
Set rs = db.OpenRecordset( _
"SELECT Name FROM People ORDER BY Name", _
dbOpenSnapshot) 'hace un select y la respuesta lo guarda en rs

' Load the ComboBox.
rs.MoveFirst  'obtiene el primer nombre de rs
Do While Not rs.EOF 'hasta que no lea todos los monbres
cboName.AddItem rs!Name 'insertará en el combo el nombre actual
rs.MoveNext 'va al siguiente nombre
Loop 'vuelve a Do While...

rs.Close 'cierra el recordset
db.Close 'cierra la base de datos

' Connect the Data control to the database.
datPeople.DatabaseName = dbname

' Select the first choice.
cboName.ListIndex = 0 'selecciona el primer objeto del combo
End Sub
--------------------------------------------------------------------------

Tenias razón. Con eso ya me funciona perfectamente.
Muchisimas gracias!
AIO!

La verdad es que no me funciona. Pongo lo siguiente:

Private m_wsShell As Variant
Private Sub Command4_Click()
    ' Crearlo en el escritorio:
    Dim sLnkPath As String
    sLnkPath = m_wsShell.SpecialFolders("Desktop")
End Sub

Pero me dice que al hacer el SpecialFolders se requiere un objeto. He intentado probar haciendole algunos cambios pero me sigue dando elmismo error. Gracias de todos modos.
Mila esker! Agur!

Hola de nuevo. En un proyecto tengo que dar la opción de elegir idioma y dependiendo de esto cargar distintos labels. Para esto debo utilizar un archivo de recursos, pero ni siquiera se como crearlo. ¿Puede alguien ayudarme?
Muchisimas gracias.

Hola. Necesito ayuda con la instrucción App.Path. La cosa es que en modo diseño el directorio que devuelve es el correcto, pero al crear el ejecutable lo que devuelve siempre es C:WINNT
¿Sabe alguien cómo puedo solucionar esto?
Gracias desde ya.

Desde mi proyecto quiero conseguir mostrar el listado de los drivers de Data Sources (ODBC), pero no se como acceder a ellos desde VB.
¿Pude alguien ayudarme?
Gracias desde ya.