How do you create an account using VB while using hash.dll and checkrevision.dll. A script would help very much. Thanks for any help.
Public Sub SendCreateAccount(UserName As String, password As String)
Dim AccountHash As String
AccountHash = CalcHashBuf(password)
If Len(AccountHash) = 20 Then
SendPacket &H3D, AccountHash & UserName & Chr(0)
Else
Addtext ColAnError, "Account creation failed for " & UserName & " (couldn't hash password)" & vbCrLf, True
End If
End Sub
send it right after you get 0x51 response. the server will send you 0x3D back with a DWORD indicating if the account was created or not. 0 means sucessful, see bnetdocs for the other codes.
meh, i'm feeling generous
'Packet ID: 0x3D
'Direction: Server -> Client (Recieved)
'Format: (DWORD) Status
'(STRING) Account name suggestion
'Remarks: Account creation result.
'
'Result:
'0: Account created
'2: Name contained invalid characters
'3: Name contained a banned word
'4: Account already exists
'6: Name did not contain enough alphanumeric characters
Quote from: DaRk-FeAnOr on April 13, 2003, 06:29 PM
How do you create an account using VB while using hash.dll and checkrevision.dll. A script would help very much. Thanks for any help.
If you're using my hash.dll, there is no function exported to do what you're asking.
Might want to use BnetAuth.dll ::)