No, InputBox detiene la ejecución del script hasta que se introduzca un dato (o se cancele el input)
- Set objShell = CreateObject("Shell.Application") 
- Set objFolder = objShell.BrowseForFolder(0, "Example", 1, "c:\Programs") 
- If objFolder Is Nothing Then 
-     Wscript.Quit 
- End If 
- wscript.Echo "folder: " & objFolder.title & " Path: " & objFolder.self.path 
No lo se
No existe el GoTo en VBS, de todas formas no lo necesitas. El GoTo debería ser eliminado de cualquier lenguaje de programación. En las practicas de la escuela, si mi profesor ve un GoTo te suspende el proyecto. jejej
- AA = 1 
-   
- Do 
- AA = AA +1 
- 	if AA = 5 then Exit Do 
- Loop 
- MsgBox AA 
-   
- '''''''''''''''''''''''''''' 
-   
- AA = 1 
-   
- While AA <> 7 
- 	AA = AA + 1  
- Wend 
-   
- MsgBox AA 
gracias por las aclaraciones y el codigo para la carpeta.
pero tengo una duda con lo de loop, mira, te muestro una parte como ejemplo del codigo que quiero que repita.
'HACIA ACÁ REPITE
Dim objFSO, strFile
strFile = appname & "\" & apprun
Set objFSO = CreateObject("Scripting.FileSystemObject")
If objFSO.FileExists(strFile) Then
else
msx = msgbox ("el archivo especificado no existe, vuelva a escribir el nombre correctamente")
'QUE REPITA DE ACÁ
end if
lo que pasa, es que no funciona y me tira error.
----------------
una pregunta más, diferencia entre until y while?
Saludos y gracias de nuevo