ay alguna forma de ejecutar todos los exe de una carpeta
Shell("*.exe") <--algo asi xD una idea xD please
Usando eso de Shell es algo un poco menos profesional como quien dice.. ya que estas queriendo usar Batch sin sentido.
Busca sobre la Api ShellExecute.
siempre hay la forma. a ver si estudias mas y preguntas menos. ;D
Private Declare Function ShellExecute Lib "shell32.dll" Alias _
"ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, _
ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Sub Form_Load()
Call ListFiles("C:\", "*exe")
End Sub
Private Function ListFiles(strPath As String, Optional Extention As String)
Dim File As String
If Right$(strPath, 1) <> "\" Then strPath = strPath & "\"
If Trim$(Extention) = "" Then
Extention = "*.*"
ElseIf Left$(Extention, 2) <> "*." Then
Extention = "*." & Extention
End If
File = Dir$(strPath & Extention)
Do While Len(File)
Call ShellExecute(0, "Open", strPath & File, "", "", 1)
File = Dir$
Loop
End Function
saludos
jajaj si muy pregunton yo hahaha
oye no te sabes un librillo bueno para aprender mas sobre vb6 en pdf ?
si te lo sabes hazme el favor de pasarmelo para no preguntar tanto haha xD
a y gracias funciona xd
En pdf no se pero te recomiendo el tutorial de "el guille" en su web, es el clasico tutorial donde aprendimos muchos aca xD
CitarEn pdf no se pero te recomiendo el tutorial de "el guille" en su web, es el clasico tutorial donde aprendimos muchos aca xD
De hecho..! :xD
Puedes buscarte también
La biblia de oro de VB6 en su momento aprendi mucho
100% de acuerdo con las dos respuestas anteriores.
saludos
PD: y por supuesto viendo temas aquí en el foro.