Thema Datum  Von Nutzer Rating
Antwort
Rot Automatisch benennen
 04.11.2016 11:27:36 Gast70823
NotSolved
04.11.2016 12:36:43 Gast2268
NotSolved
04.11.2016 12:46:04 Gast46032
NotSolved
04.11.2016 12:52:58 Gast95154
NotSolved
04.11.2016 12:54:10 Gast2017
NotSolved
04.11.2016 12:56:53 Gast59721
NotSolved
04.11.2016 13:03:41 Gast9054
NotSolved
04.11.2016 13:09:50 Gast40767
NotSolved
04.11.2016 13:11:15 Gast41653
Solved

Ansicht des Beitrags:
Von:
Gast70823		 Datum:
04.11.2016 11:27:36		 Views:
1351		 Rating:
     
Antwort:
  Ja
Thema:
Automatisch benennen

Hallo zusammen,

ich habe in einem Modul folgende Funktion um einen Screenshot zu speichern:

 

Public Sub prcCreate_Picture_Active_Window()
    Dim hWnd As Long
    Dim udtRect As RECT
    Sleep 3000 '3 sekunden pause um ein anderes Fenster zu aktivieren
    hWnd = GetForegroundWindow
    GetWindowRect hWnd, udtRect
    stdole.SavePicture hDCToPicture(GetDC(0&), udtRect.Left, udtRect.Top, _
        udtRect.Right - udtRect.Left, udtRect.Bottom - udtRect.Top), _
        "C:\Test\Screenshot.bmp"
End Sub

Leider hat die Datei immer den gleichen Namen und überschreibt sich immer.

Wie könnte ich es anstellen, dass die Datei automatisch mit Datum und Uhrzeit benannt wird?

 

Vielen Dank für Huere Hife!

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Automatisch benennen
 04.11.2016 11:27:36 Gast70823
NotSolved
04.11.2016 12:36:43 Gast2268
NotSolved
04.11.2016 12:46:04 Gast46032
NotSolved
04.11.2016 12:52:58 Gast95154
NotSolved
04.11.2016 12:54:10 Gast2017
NotSolved
04.11.2016 12:56:53 Gast59721
NotSolved
04.11.2016 13:03:41 Gast9054
NotSolved
04.11.2016 13:09:50 Gast40767
NotSolved
04.11.2016 13:11:15 Gast41653
Solved