Popup Maker

[gast0231]

Hier is een klein programmaatje wat ik net gemaakt heb, en ik had graag wat feedback over de werking.

Groet
B. Dalenoord

 

[That Guy]

leuk, werkt goed. Over het nut ervan ga ik het niet hebben, maar hey, ziet er toll uit.

Overgens, hoe kan het dat het zo 'lang' duurt voordat het gemaakt is? Moest toch zeker 1 seconde wachten ofzo.


:thumb:

 

[stienoo]

Werkt ook goed bij mij!

 

[gast0231]

leuk, werkt goed. Over het nut ervan ga ik het niet hebben, maar hey, ziet er toll uit.

Overgens, hoe kan het dat het zo 'lang' duurt voordat het gemaakt is? Moest toch zeker 1 seconde wachten ofzo.


:thumb:

Dat je zolang moet wachten ligt aan dat hij de code moet wegschrijven naar een nieuw .vbs-bestand, en dat bestand moet hij eerst aanmaken.

Hieronder staat de code

::	Popupmaker 1.1
::	Door Bas Dalenoord


@echo off
md popups
title Bas Dalenoord's Pop-up Maker
cls 
echo. 
echo ------------------------------------------------------------------------------- 
echo Bas Dalenoord's Pop-up Maker
echo ------------------------------------------------------------------------------- 
echo.
set /p popupfil=Vul een bestandsnaam in (zonder extensie):
if "%popupfil%"=="%popupfil%" goto aco5next
:aco5next
echo.
set /p poptitle=De tekst in de titelbalk:
if "%poptitle%"=="%poptitle%" goto aco5next1
:aco5next1
echo.
set /p poptext=De tekst in het venster:
if "%poptext%"=="%poptext%" goto aco5next2
:aco5next2
echo.
echo Selecteer de knoppen
echo =================
echo.
echo 0) OK 
echo 1) OK en annuleren
echo 2) Afbreken, opnieuw en negeren
echo 3) Ja, nee en annuleren
echo 4) Ja en nee
echo 5) Opnieuw en annuleren
set /p butpop=Typ 1/2/3/4/5:
if %butpop%==%butpop% goto aco5next3
:aco5next3
echo.
echo Selecteer een Icon
echo ===============
echo.
echo 16) Kritiek bericht
echo 32) Vraag
echo 48) Waarschuwing
echo 64) Informatie
echo.
set /p popicon=Typ 16/32/48/64:
if %popicon%==%popicon% goto aco5next4
:aco5next4
echo.
echo Uw popup word gecreerd...
cd "popups"
echo x=msgbox("%poptext%",%butpop%+%popicon%,"%poptitle%") > "%popupfil%.vbs"
start %popupfil%.vbs
cls 
echo. 
echo ------------------------------------------------------------------------------- 
echo Pop-up Maker
echo ------------------------------------------------------------------------------- 
echo.
echo De Pop-up is succesvol gecreerd op uw desktop
echo.
echo Wat wilt u nu doen?
echo 1. Opnieuw
echo 2. Afsluiten
set /p final=Uw keuze (nummer): 
if %final%==1 goto start
if %final%==2 goto clear
:clear

 

[That Guy]

vanwaar deze regel?

ping localhost -n 3 >nul

(3x naar localhost pingen, en weg-nul-len?)

 

[gast0231]

vanwaar deze regel?

ping localhost -n 3 >nul

(3x naar localhost pingen, en weg-nul-len?)

Is inderdaad nutteloos, heb het veranderd.

 

[bn2vs]

hehe, dit is lollig :thumb:

 

[Niekwoo10]

Hier is een klein programmaatje wat ik net gemaakt heb, en ik had graag wat feedback over de werking.

Groet

gast0231

goed programma, ga het vaker gebruiken, kan het ook voor grappen gebruiken
:thumb::thumb::thumb::thumb::thumb:

 

[gast0231]

Thank's. Zit erover te denken een update uit te brengen, met o.a. een eigen UI.