Connexion

Récupérer mon mot de passe

Qui est en ligne ?
Il y a en tout 1 utilisateur en ligne :: 0 Enregistré, 0 Invisible et 1 Invité

Aucun

Le record du nombre d'utilisateurs en ligne est de 21 le Jeu 17 Oct 2013, 13:40
Derniers sujets
Flux RSS



Flag Counter
Partenaires

[BAT] Batch SaveDialog

Voir le sujet précédent Voir le sujet suivant Aller en bas

[BAT] Batch SaveDialog

Message par Delmar Grande le Sam 15 Juin 2013, 05:03

Exemplo de Batch SaveDialog.Cool

Code:
@echo off
mode con:cols=90 lines=12
::Script criado no masbat v2.0
title -==*==- Batch SaveDialog -==*==-
(
echo Set objDialog = CreateObject^( "SAFRCFileDlg.FileSave" ^)
echo.
echo '      Pode se usar "SAFRCFileDlg.FileOpen"
echo '      ou "SAFRCFileDlg.FileSave" dialog!
echo objDialog.FileName = "test_save.txt"
echo ' Nota: O FileType propriedade é meramente cosmético, isso não acontecer
echo '      anexar automaticamente a extensão do arquivo certo!
echo '      Então, certifique-se de digitar a extensão do mesmo!
echo objDialog.FileType = "Arquivo de texto"
echo If objDialog.OpenFileSaveDlg Then
echo    WScript.Echo objDialog.FileName
echo End If
)>"%tmp%\SaveDialog.vbs"
for /f "tokens=* delims=*" %%a in ('Cscript "%tmp%\SaveDialog.vbs" //nologo') do (set "a=%%a")
::if "%a%" <> "" goto Salvar
if "%a%" NEQ "" goto Salvar
:volta
echo Vocˆ escolheu "%a%"
pause>nul
:Salvar
(
echo Delmar Grande
echo http://bbat.forumeiro.com/
)>"%a%"
goto volta

Obs: esse script funciona 100% no xp se no windows 7 não funcionar é porque esta faltando a DLL activex safrcdlg.dll link para Donwload [Vous devez être inscrit et connecté pour voir ce lien] e deve Regitrar assim regsvr32 safrcdlg.dll
avatar
Delmar Grande
EQUIPE BBAT
EQUIPE BBAT

Mensagens : 170
Data de inscrição : 14/06/2013
Localização : Devant le pc

http://dbatchscript.forumeiros.com/

Revenir en haut Aller en bas

Voir le sujet précédent Voir le sujet suivant Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum