Hallo,
hier ein kleines Beispielprogramm, wie man die CDArchiv.dll in ein Visual Basic .NET Programm einbaut.
Dim CDArchiv As New CDARCHIVELib.CDArchive
Dim lNumberOfCDs As Long
Dim dtLastModified As Date
Dim CDData As New CDARCHIVELib.CDData
Dim lResult As Long
CDArchiv.Open("www.cdarchiv.de", "", 0, 0)
' Anzahl der CDs im Archiv und letztes Änderungsdatum ermitteln.
CDArchiv.Info(lNumberOfCDs, dtLastModified)
CDArchiv.SetUser("xxxx", "xxxx") ' Achtung! Hier Login-Daten eintragen!!
' Hier die Identity der CD ermitteln. Wird für dieses Beispiel fest auf 13433759 gesetzt.
lResult = CDArchiv.ReceiveCD("13433759", CDData)
' In CDData steht jetzt die CD drin, wobei lResult = CDARCHIV_CD_FOUND (1) sein sollte.
If lResult = 1 Then
' CD wurde erfolgreich gefunden
End If
CDArchiv.Close()
Vorher muss die CDArchiv.dll registriert werden, und im Visual Studio über Project->Add Reference->COM der Eintrag CDArchiv 1.0 Typbibliothek auswählen.
Gruß
Dieter Schmitz (Big 3 Software)