Muchas gracias a todos!!!
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúCitar
SWFKit Player
Failed to load the Adobe Flash Player!
%var:~0,2%
Cita de: MCKSys Argentina en 1 Febrero 2020, 18:20 PM
Primer resultado de Google:
strPath = Wscript.ScriptFullName
Set objfso=CreateObject("Scripting.FileSystemObject")
Do
FileName=InputBox("Type the folder name...","...... Folder creator ......")
If FileName <> "" Then
Exit Do
Else
MsgBox "Please, type the folder name...",vbExclamation,"...... Error ......"
End If
Loop
Set folder=objfso.CreateFolder(FileName)
MsgBox "Folder created successfully!" & vbCrlf & vbCrlf & "Name: " & FileName & vbCrlf & "Path: The same .vbs file",vbInformation,"...... Folder creator ......"