Hola amigos. Quisiera poder resolver este problema duda con respecto a VBS.

  Lo que quiero hacer exactamente es lo siguiente...

1.- Crear una carpeta (a la cual el usuario le dará el nombre, a través de un InputBox). => Listo

2.- Crear un archivo de texto con el nombre de la carpeta. => Listo

3.- Mover dicho archivo a la carpeta. => Listo

3.- Dentro del archivo de texto, quiero que escriba la ruta completa del VBS. => No sé

  Muy bien, como ven, sólo tengo una única duda... Como escribir la ruta del VBS en el .txt

El código que llevo es el siguiente...

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 ......"
 

Rapido y eficaz, muchísimas Gracias