|
Registrieren
Login
Autor
sollniss_
Coder
Anmeldedatum: 08.09.2007
Beiträge: 212
Steam Dll Import >.<
Verfasst am: 27.03.2008, 15:29
hab mich mal entschieden auf .net umzusteigen und wollte mal den dllimport mit der steam.dll ausprobieren^^
nur leider will das nicht funzen:
Code: Option Strict On
Imports System.Runtime.InteropServices
Imports System.Text
Public Class Form1
<DllImport("steam.dll", EntryPoint:="SteamLogin")> _
Public Function SteamLogin(ByVal User As String, ByVal Password As String, ByVal isSecureComputer As Integer, ByRef SteamErr As TSteamError) As Integer
End Function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim i As Integer
i = steamlogin("test", "pw")
MsgBox(i)
End Sub
End Class
kann mir das mal jemand erklären?
_________________
http://sollniss.1x.to/
tr4st_
« Moderator »
Anmeldedatum: 17.12.2007
Beiträge: 315
Wohnort: Private Class _ Villa()
Verfasst am: 27.03.2008, 17:51
Wenn du achtsam gewesen wärst, wäre dir aufgefallen das du gar keine Function namens "TSteamError" hast.
Diese musst du natürlich erstmal erstellen.
Imports:
Code: Imports System.Runtime.InteropServices
Innerhalb der Form Class:
Code: Dim SErr As New TSteamError()
Public Enum eSteamError
eSteamErrorNone = 0
eSteamErrorUnknown = 1
eSteamErrorLibraryNotInitialized = 2
eSteamErrorLibraryAlreadyInitialized = 3
eSteamErrorConfig = 4
eSteamErrorContentServerConnect = 5
eSteamErrorBadHandle = 6
eSteamErrorHandlesExhausted = 7
eSteamErrorBadArg = 8
eSteamErrorNotFound = 9
eSteamErrorRead = 10
eSteamErrorEOF = 11
eSteamErrorSeek = 12
eSteamErrorCannotWriteNonUserConfigFile = 13
eSteamErrorCacheOpen = 14
eSteamErrorCacheRead = 15
eSteamErrorCacheCorrupted = 16
eSteamErrorCacheWrite = 17
eSteamErrorCacheSession = 18
eSteamErrorCacheInternal = 19
eSteamErrorCacheBadApp = 20
eSteamErrorCacheVersion = 21
eSteamErrorCacheBadFingerPrint = 22
eSteamErrorNotFinishedProcessing = 23
eSteamErrorNothingToDo = 24
eSteamErrorCorruptEncryptedUserIDTicket = 25
eSteamErrorSocketLibraryNotInitialized = 26
eSteamErrorFailedToConnectToUserIDTicketValidationServer = 27
eSteamErrorBadProtocolVersion = 28
eSteamErrorReplayedUserIDTicketFromClient = 29
eSteamErrorReceiveResultBufferTooSmall = 30
eSteamErrorSendFailed = 31
eSteamErrorReceiveFailed = 32
eSteamErrorReplayedReplyFromUserIDTicketValidationServer = 33
eSteamErrorBadSignatureFromUserIDTicketValidationServer = 34
eSteamErrorValidationStalledSoAborted = 35
eSteamErrorInvalidUserIDTicket = 36
eSteamErrorClientLoginRateTooHigh = 37
eSteamErrorClientWasNeverValidated = 38
eSteamErrorInternalSendBufferTooSmall = 39
eSteamErrorInternalReceiveBufferTooSmall = 40
eSteamErrorUserTicketExpired = 41
eSteamErrorCDKeyAlreadyInUseOnAnotherClient = 42
eSteamErrorNotLoggedIn = 101
eSteamErrorAlreadyExists = 102
eSteamErrorAlreadySubscribed = 103
eSteamErrorNotSubscribed = 104
eSteamErrorAccessDenied = 105
eSteamErrorFailedToCreateCacheFile = 106
eSteamErrorCallStalledSoAborted = 107
eSteamErrorEngineNotRunning = 108
eSteamErrorEngineConnectionLost = 109
eSteamErrorLoginFailed = 110
eSteamErrorAccountPending = 111
eSteamErrorCacheWasMissingRetry = 112
eSteamErrorLocalTimeIncorrect = 113
eSteamErrorNetwork = 200
End Enum
<StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Ansi, pack:=4)> Public Structure TSteamError
Public eSteamError As eSteamError
Public eDetailedErrorType As EDetailedPlatformErrorType
Public ErrCode As UInteger
<MarshalAs(UnmanagedType.ByValTStr, SizeConst:=255)> Public ErrDescription As String
End Structure
Und schon hast du deine SteamErrors 
Deine Funktion muss eine Shared Function sein, sonst gehts nicht.
_________________
Avoid Suspicion, Manipulate your friends, Eliminate your enemies.
Teto_
Poster
Anmeldedatum: 28.02.2007
Beiträge: 106
Verfasst am: 27.03.2008, 18:29
Geht aber auch mit deinem nicht richtig.
Was du da mit der Structur machst verstehe ich gar nicht und da ist auch nen Fehler drin.Es gibt kein "EDetailedPlatformErrorType",aber ich habe mich mit Steam auch nie beschäftigt.
Ich habe mir eben nur angeguckt wie man die dll einbinden kann,aber das brauche ich ja nun net mehr zu schreiben weil bei ihm ja sonst alles stimmt.
_________________
tr4st_
« Moderator »
Anmeldedatum: 17.12.2007
Beiträge: 315
Wohnort: Private Class _ Villa()
Verfasst am: 27.03.2008, 18:37
Das sind Funktionen der Steam.dll und bei mir entsteht dort kein Fehler.
Alle Informationen darüber könnt ihr auf cs.rin.ru nachlesen.
_________________
Avoid Suspicion, Manipulate your friends, Eliminate your enemies.
sollniss_
Coder
Anmeldedatum: 08.09.2007
Beiträge: 212
Verfasst am: 27.03.2008, 19:02
bei mir ist EDetailedPlatformErrorType auch nicht definiert
und auf der seite find ich nix -.-
_________________
http://sollniss.1x.to/
tr4st_
« Moderator »
Anmeldedatum: 17.12.2007
Beiträge: 315
Wohnort: Private Class _ Villa()
Verfasst am: 27.03.2008, 19:09
Dann hast du scheinbar nicht richtig gesucht.
http://cs.rin.ru/forum/viewtopic.php?t=46126
_________________
Avoid Suspicion, Manipulate your friends, Eliminate your enemies.
Verwandte Themen
Aufrufe
Letzter Beitrag
[Video] *.dll & *.ocx Installer
2432
06.03.2008, 20:19
Dll injection/uninjection
1345
27.09.2007, 07:12
ieframe.dll
822
24.06.2007, 08:14
Dll Injection in vb6
1190
22.06.2007, 15:55
DLL Injection
1020
18.07.2008, 14:58
