Feedback

VB - Datei mittels Windows Dialog kopieren

Veröffentlicht von am 03.06.2006
(3 Bewertungen)
Datei mittels Windows Dialog kopieren
GFU-Schulungen  [Anzeige]

C# Komplett

Sie kennen sich in objektorientierter Programmierung aus. Sie schreiben C++ oder Java? Und nun stehen Sie vor der Aufgabe, in C# Anwendungen zu erstellen. Das C# Komplett-Seminar verschafft Ihnen umfassende Programmierkenntnisse in dieser Sprache. Nach der Schulung entwickeln Sie selbständig Anwendungen mit C#. Sie kennen die Datentypen und Klassenbibliotheken der objektorientierten Programmiersprache C#. Der Komplettkurs setzt bei den Grundlagen von C# ein. Sie arbeiten mit Variablen und konvertieren Typen. Multithreading, Delegates, Generics sind nach dem Seminar für Sie kein Geheimnis mehr.

Visual Studio Team Foundation Server 2017/2015 (TFS) - Komplett 

Private Declare Function SHFileOperation Lib "shell32.dll" Alias "SHFileOperationA" (ByRef lpFileOp As SHFILEOPSTRUCT) As Integer

Private Structure SHFILEOPSTRUCT
    Dim hwnd As Integer
    Dim wFunc As Integer
    Dim pFrom As String
    Dim pTo As String
    Dim fFlags As Short
    Dim fAnyOperationsAborted As Boolean
    Dim hNameMappings As Integer
    Dim lpszProgressTitle As String
End Structure

Const FO_COPY As Short = &H2S

Public Function ShellCopy(ByVal strSource As String, ByVal strTarget As String, ByVal Handle As Long) As Boolean
    Dim SFO As New SHFILEOPSTRUCT

    If Right(strSource, 1) = "\" Then strSource = Mid(strSource, 1, Len(strSource) - 1)
    ShellCopy = True
    With SFO
        .hwnd = Handle
        .wFunc = FO_COPY
        .pFrom = strSource & Chr(0) & Chr(0)
        .pTo = strTarget & Chr(0) & Chr(0)
    End With

    Call SHFileOperation(SFO)
    If SFO.fAnyOperationsAborted Then ShellCopy = False
End Function
Abgelegt unter Shell, Datei, Kopieren.

Kommentare zum Snippet

 

Logge dich ein, um hier zu kommentieren!