VBS TO BATCH

16 Eki 2020 Çağlar Arlı

Vbs Dosyasının İçeriği;

dim a

a=InputBox(“Siteme Gitmek İçin Birşeyler Yazın:”,”Var”)

dim WshShell
set WshShell=Wscript.Createobject(“Wscript.shell”)
wshshell.run “caglararli.bat ” & a

Bu sizden bir var yazmanızı isteyecek ve sonra yazdığınız var’ı geçerek caglararli.bat’ı çağıracaktır.
a = yazdıklarınız.

işte bat dosyası içeriği:

@echo off

echo %1

start https://www.caglararli.com.tr

pause
exit