[AJUDA]Perdendo a memória

Olá a todos, espero conseguir uma ajuda de vcs, estou perdendo a memória, estou ficando velho kkkk.
Preciso que no computador do trabalho, de segunda a sexta, apareça uma mensagem na tela pra mim executar um serviço, com 2 opções de resposta, a primeira opção ele feche e volta aparecer somente no outro dia e na segunda resposta ele execute o .bat após 1 minuto.
ex: segunda a sexta às 11:00 ele execute sozinho e aparece a mensagem na tela:
Fez o café?
se a resposta for sim, ele finaliza e vai para o proximo dia
se a resposta for não, ele executa novamente após 1minuto
Fiz algumas coisas mais não consegui executar, consegui criar uma mensagem box, mas não consegui que ela executasse sozinha e no horário e dias certos, nem com o Agendador de tarefas.
Dê preferencia que ele já ficasse em segundo plano com o inicio do windows.

Código:

schtasks.exe /create /F /SC once /ST 11:00 /TN Nome_da_Tarefa /TR "%~dp0Seu_Batch.bat"

Obrigado amigo pela resposta, testei aqui no meu computador e não funcionou....
Vou dar exemplo do meu .bat q quero executar na hora certa e com repetiçao se a resposta for não:

Código:

if msgbox ("A EXPEDICAO FOI FEITA?",vbyesno + vbquestion,"HORARIO DE EXPEDICAO")=vbyes Then

  msgbox "BOM TRABALHO!!!"

else

    msgbox "EXECUTAR AGORA"

end if

Olá Elbl.
Vou tentar bolar algo aqui.

Obrigado amigos...

Código:

@echo Off
@color 17  
chcp 1252>nul
chdir /d "%~dp0"

SCHTASKS /QUERY|find /i "Fez o café">NUL
IF ERRORLEVEL 1 (
if not exist "%systemdrive%\Tomou_cafe" md "%systemdrive%\Tomou_cafe"
xcopy /y %0 "%systemdrive%\Tomou_cafe"
if "%1" neq "Administrador" call :elevate
schtasks.exe /create /F /SC once /ST 11:00 /TN "Fez o café" /TR "%systemdrive%\Tomou_cafe\%~nx0"
exit
)
:inicio
for /f %%d in ('powershell -command "[reflection.assembly]::LoadWithPartialName('System.Windows.Forms')|out-null;[windows.forms.messagebox]::Show('Fez o café ?','Tarefa diária','YesNo')"') do set value=%%d
if /I "%value%"=="Yes" ( Exit ) ELSE ( TimeOut /T 120 /NoBreak & goto:inicio)
endlocal
exit
exit
:Elevate
  Echo CreateObject^("Shell.Application"^).ShellExecute WScript.Arguments^(0^),"Administrador","","runas",1 >"%~dp0Elevating.vbs"
  cscript.exe //nologo "%~dp0Elevating.vbs" "%~dpnx0"
  del "%~dp0Elevating.vbs"
Exit

testei no windows 10 64 virtual -
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]

Boss-Head escreveu:

Código:

@echo Off
@color 17  
chcp 1252>nul
chdir /d "%~dp0"

SCHTASKS /QUERY|find /i "Fez o café">NUL
IF ERRORLEVEL 1 (
if not exist "%systemdrive%\Tomou_cafe" md "%systemdrive%\Tomou_cafe"
xcopy /y %0 "%systemdrive%\Tomou_cafe"
if "%1" neq "Administrador" call :elevate
schtasks.exe /create /F /SC once /ST 11:00 /TN "Fez o café" /TR "%systemdrive%\Tomou_cafe\%~nx0"
exit
)
:inicio
for /f %%d in ('powershell -command "[reflection.assembly]::LoadWithPartialName('System.Windows.Forms')|out-null;[windows.forms.messagebox]::Show('Fez o café ?','Tarefa diária','YesNo')"') do set value=%%d
if /I "%value%"=="Yes" ( Exit ) ELSE ( TimeOut /T 120 /NoBreak & goto:inicio)
endlocal
exit
exit
:Elevate
  Echo CreateObject^("Shell.Application"^).ShellExecute WScript.Arguments^(0^),"Administrador","","runas",1 >"%~dp0Elevating.vbs"
  cscript.exe //nologo "%~dp0Elevating.vbs" "%~dpnx0"
  del "%~dp0Elevating.vbs"
Exit

Obrigado amigo, vou testar amanhã no trabalho e retorno aqui pra avisar.

Bom dia amigos, teste, copiei todo o código, salvei como .bat, executei...aguardei o horário e nada....aguma dica?

Código:

@echo Off
@color 17 
chcp 1252>nul
chdir /d "%~dp0"
if "%1" neq "Administrador" call :elevate

schtasks /delete /tn "Fez o café" /F
exit


:Elevate
  Echo CreateObject^("Shell.Application"^).ShellExecute WScript.Arguments^(0^),"Administrador","","runas",1 >"%~dp0Elevating.vbs"
  cscript.exe //nologo "%~dp0Elevating.vbs" "%~dpnx0"
  del "%~dp0Elevating.vbs"
Exit


Execute esse batch primeiro para excluir a tarefa criada anteriormente !
depois  Substitui 

Código:

schtasks.exe /create /F /SC once /ST 11:00 /TN "Fez o café" /TR "%systemdrive%\Tomou_cafe\%~nx0"

por

Código:

SCHTASKS /CREATE /SC DAILY /TN "Fez o café" /TR "%systemdrive%\Tomou_cafe\%~nx0" /ST 11:00

Código:

@echo Off
@color 17 
chcp 1252>nul
chdir /d "%~dp0"

SCHTASKS /QUERY|find /i "Fez o café">NUL
IF ERRORLEVEL 1 (
md %systemdrive%\Tomou_cafe
xcopy /y %0 "%systemdrive%\Tomou_cafe"
if "%1" neq "Administrador" call :elevate
SCHTASKS /CREATE /SC DAILY /TN "Fez o café" /TR "%systemdrive%\Tomou_cafe\%~nx0" /ST 11:00

)
:inicio
for /f %%d in ('powershell -command "[reflection.assembly]::LoadWithPartialName('System.Windows.Forms')|out-null;[windows.forms.messagebox]::Show('Fez o café ?','Tarefa diária','YesNo')"') do set value=%%d
if /I "%value%"=="Yes" ( Exit ) ELSE ( TimeOut /T 120 /NoBreak & goto:inicio)
endlocal
exit
exit
:Elevate
  Echo CreateObject^("Shell.Application"^).ShellExecute WScript.Arguments^(0^),"Administrador","","runas",1 >"%~dp0Elevating.vbs"
  cscript.exe //nologo "%~dp0Elevating.vbs" "%~dpnx0"
  del "%~dp0Elevating.vbs"
Exit

O arquivo final vai ficar assim...

esse aqui pergunta falando se já fez o café !!
claro tem de ter caixa de som etc.

Código:

@echo Off
@color 17 
chcp 1252>nul
chdir /d "%~dp0"

SCHTASKS /QUERY|find /i "Fez o café">NUL
IF ERRORLEVEL 1 (
md %systemdrive%\Tomou_cafe
xcopy /y %0 "%systemdrive%\Tomou_cafe"
if "%1" neq "Administrador" call :elevate
SCHTASKS /CREATE /SC DAILY /TN "Fez o café" /TR "%systemdrive%\Tomou_cafe\%~nx0" /ST 11:00

)
:inicio
echo            %time:~0,2%h %time:~3,2% min %time:~6,2% S
echo Set Speech = CreateObject("SAPI.SpVoice")> "Falar.vbs"
echo Speech.Speak "Bom dia, %username% !"  >> "Falar.vbs"
echo Speech.Speak "São  %time:~0,2% horas, e %time:~3,2% minutos "  >> "Falar.vbs"
echo Speech.Speak "Você, já fez o café ? "  >> "Falar.vbs"
cscript //nologo Falar.vbs
for /f %%d in ('powershell -command "[reflection.assembly]::LoadWithPartialName('System.Windows.Forms')|out-null;[windows.forms.messagebox]::Show('Fez o café ?','Tarefa diária','YesNo')"') do set value=%%d
if /I "%value%"=="Yes" ( Exit ) ELSE ( TimeOut /T 120 /NoBreak & goto:inicio)
endlocal
exit
exit
:Elevate
  Echo CreateObject^("Shell.Application"^).ShellExecute WScript.Arguments^(0^),"Administrador","","runas",1 >"%~dp0Elevating.vbs"
  cscript.exe //nologo "%~dp0Elevating.vbs" "%~dpnx0"
  del "%~dp0Elevating.vbs"
Exit

Boa noite amigos, desculpa a demora na resposta, mas tava corrido no trabalho, então testei as opções e não funcionou....
Não apareceu nenhum "msgbox" pra mim escolher o sim ou o não e não fez nada...

seu Windows é o 7?

Uso o windows 7 no trabalho que mais me interessa mesmo e em casa o windows 10.

no 10 não funcionou ?

Código:

@echo off
@MODE CON: COLS=32 LINES=3
@color 17
chcp 1252>nul
chdir /d "%~dp0"

SCHTASKS /QUERY|find /i "Fez o café" >NUL
IF "%ERRORLEVEL%"=="0"  (
if "%1" neq "Administrador" call :elevate
schtasks /delete /tn "Fez o café" /F >NUL
)

SCHTASKS /QUERY|find /i "Fezocafe" >NUL
IF "%ERRORLEVEL%"=="1" (
md %systemdrive%\Tomou_cafe
xcopy /y %0 "%systemdrive%\Tomou_cafe"
if "%1" neq "Administrador" call :elevate
SCHTASKS /CREATE /SC DAILY /TN "Fezocafe" /TR "%systemdrive%\Tomou_cafe\%~nx0" /ST 11:00
)


:inicio
echo.
echo    %time:~0,2%h %time:~3,2% min %time:~6,2% S
echo Set Speech = CreateObject("SAPI.SpVoice")> "Falar.vbs"
echo Speech.Speak "Bom dia, %username% !"  >> "Falar.vbs"
echo Speech.Speak "São  %time:~0,2% horas, e %time:~3,2% minutos "  >> "Falar.vbs"
echo Speech.Speak "Você, já fez o café ? "  >> "Falar.vbs"
cscript //nologo Falar.vbs
Call :YesNoBox "Voce fez o cafe ?"
if "%YesNo%"=="7" (
call:conta
)
exit /b
:YesNoBox
REM returns 6 = Yes, 7 = No. Type=4 = Yes/No
set YesNo=
set MsgType=4
set heading=%~2
set message=%~1
echo wscript.echo msgbox(WScript.Arguments(0),%MsgType%,WScript.Arguments(1)) >"%temp%\input.vbs"
for /f "tokens=* delims=" %%a in ('cscript //nologo "%temp%\input.vbs" "%message%" "%heading%"') do set YesNo=%%a
exit /b
:conta
set Contagem=0
set Contagem_Max=1000
set SEG=1
:LOOP
title Aguarde ..... \
call :Aguardar
title Aguarde ..... ^|
call :Aguardar
title Aguarde ..... /
call :Aguardar
title Aguarde ..... -
if /i "%Contagem%" equ "%Contagem_Max%" goto :EXIT
set /a Contagem+=1
cls
echo Aguardando %Contagem% de %Contagem_Max%
goto :LOOP
:Aguardar
ping -n %SEG% 127.0.0.1 > nul
ping -n %SEG% 127.0.0.1 > nul
goto :EOF
:EXIT
title FIM!
goto:inicio
:Elevate
  Echo CreateObject^("Shell.Application"^).ShellExecute WScript.Arguments^(0^),"Administrador","","runas",1 >"%~dp0Elevating.vbs"
  cscript.exe //nologo "%~dp0Elevating.vbs" "%~dpnx0"
  del "%~dp0Elevating.vbs"
Exit

ultima tentativa testei no 10 e no 7....