Comment enregistrer un fichier avec la date système dans le VB.NET
:salut:
Comment enregistrer un fichier avec la date système dans le VB.NET ?
J'ai ce Module en VB.NET
ScreenShot.vb
Code:
1
2
3
4
5
6
7
8
9
10
11
| Imports System.Windows.Forms 'VB
Module ModulePrintscreen 'VB
Sub Main() 'VB
Dim MaDate As String
SendKeys.SendWait("{%}({PRTSC})") 'VB
If My.Computer.Clipboard.ContainsImage() Then 'VB
MaDate = Format(Now,"dd-MM-YYYY_hh-mm-ss")
My.Computer.Clipboard.GetImage.Save(MaDate & ".jpg", System.Drawing.Imaging.ImageFormat.Jpeg) 'VB
End If 'VB
End Sub 'VB
End Module 'VB |
Donc je veux récupérer un fichier avec le nom 04-03-2015_03-13-47.jpg
mais hélas je récupère uniquement ceci
04-03-YYYY_03-13-47.jpg
Comment corriger ce module merci
je fais ceci en passant par un batch
Code:
1
2
3
4
5
6
7
8
9
| @echo off
for /F %%i in ('dir /B /S ^"%WinDir%\Microsoft.NET\Framework\vbc.exe^"') do set vbc=%%i
if /i "%vbc%"=="" cls&color 1c&Ce script a besoin du framework&pause
echo %vbc%
echo Compilation
%vbc% /nologo /out:"ScreenShotVB.exe" "ScreenShotVB.vb"
echo Execution du .exe
ScreenShotVB.exe
Pause |
