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

Bueno, muchísimas gracias a todos!

Supongo que buscaré otra alternativa...

Pues creo que no abriré otro tema XD

Sí, eso es obvio, que Batch este limitado a ciertas cosas... Tal vez ahora me concentre más en VBScript ya que puede ser útil de vez en cuando.

Pues, muchas gracias hace como 6 o 7 meses que ando con Batch, apenas estoy ahí con VBS también. Yo creo que con mi edad está muy bien lo que he hecho.

Sobre el bug que le encontraste, sinceramente yo no la había descubierto, gracias por comentar. Intentaré "mejorar" el code... Gracias de nuevo

Hola amigos. Quería compartir un proyecto que he estado llevando a cabo a través de Batch.

Les dejo el Code, y me dicen que tal... Por los momentos no le he encontrado bugs.

@echo off
mode con:cols:30 lines=9
title Cronómetro 3.1
 
:ini
cls
set sec=
set m=
set hours=
 
echo.
set/p "sec=Numero de segundos [1/59] > "
if not defined sec (set sec= )
if %sec% equ 0 (
echo Respeta el rango
pause>nul
goto :ini
)
 
if %sec% geq 60 (
echo Respeta el rango
pause>nul
goto :ini
)
 
cls
echo.
set/p "m=Numero de minutos > "
if not defined m (set m= )
if %m% equ 0 (set m=00)
 
cls
echo.
set/p "hours=Numero de horas > "
if not defined hours (set hours= )
if %hours% equ 0 (set hours=00)
set "time=%hours%:%m%:%sec%"
 
cls
echo.
echo.         Pulse para
echo.
echo.         comenzar la
echo.
echo.          cuenta...
pause>nul
 
set seg=00
set min=00
set h=00
 
:begin
set "time2=%h%:%min%:%seg%"
if %time2%==%time% (goto :ready)
cls
 
set/a seg+=1
if %seg%==60 (set/a min+=1) && (set seg=00)
if %min%==60 (set/a h+=1) && (set min=00)
 
echo.
echo %h%:%min%:%seg%
echo.
echo Tiempo establecido: %hours%:%m%:%sec%
echo.
echo Pulse Ctrl + C para salir...
echo.
echo            Por .:Xx4NG3LxX:.
TIMEOUT /T 1 /NOBREAK >nul
goto :begin
 
:ready
cls
echo.
echo Cuenta finalizada...
TIMEOUT /T 5 >NUL
GoTo :ini
 

Digan que tal por favor...

PD: Tengo 13 años

Además tengo otro problema, pero esta vez es con el powershell_ise.exe.

Pero ya abriré otro tema... ¡A ver si me ayudan!

ALERTA DE SPOILER XD: ERROR (0xc0000135)

Ah no! Iba a ejecutarlo y...


Solucion?

Perdón por tanta molestia

Lo probaré a ver que tal, y comento luego