Net send med feil avsender

[Jonas]

Hallo

Jeg fant et program som kunne sende net send med feil avsender og har miksa litt på hele greia og kom fram til dette:

 

Private Declare Function NetMessageBufferSend Lib "Netapi32.dll" (ByVal ServerName As String, ByVal msgname As String, ByVal FromName As String, ByVal Buffer As String, ByVal BufSize As Long) As Long


Private Const NERR_SUCCESS As Long = 0
Private Const NERR_BASE As Long = 2100
Private Const NERR_NetworkError As Long = (NERR_BASE + 36)
Private Const NERR_NameNotFound As Long = (NERR_BASE + 173)
Private Const NERR_UseNotFound As Long = (NERR_BASE + 150)
Private Const ERROR_ACCESS_DENIED As Long = 5
Private Const ERROR_BAD_NETPATH As Long = 53
Private Const ERROR_NOT_SUPPORTED As Long = 50
Private Const ERROR_INVALID_PARAMETER As Long = 87
Private Const ERROR_INVALID_NAME As Long = 123
Function NetSendMessage(sSendTo As String, sMessage As String, Optional ServerName As String = vbNullString, Optional FromName As String = vbNullString) As Long


NetSendMessage = NetMessageBufferSend(StrConv(ServerName, vbUnicode), StrConv(sSendTo, vbUnicode), StrConv(FromName & vbNullString, vbUnicode), StrConv(sMessage, vbUnicode), Len(StrConv(sMessage, vbUnicode)))
End Function


Private Sub Command1_Click()
Dim ret As Long, C As Long, FromName As String, D As Long, SuppressError As Boolean
   
FromName = Text1

ret = NetSendMessage(Text3.Text, Text2, vbNullString, FromName)
End Sub

 

pluss to clas filer som er ganske lange hvordan er det mulig at den sender med annen avsender? Kan noen forklarer meg hvordan koden virker?

 

clas filene ligger her og her

[aadnk]

Se litt nærmere på API-callen NetMessageBufferSend. Jeg tar meg først for alle paramentrene.

 

 

· ServerName

[inn] Pointer til en konstant unikode string som spesifiserer navnet til en fjern tjener der funksjonen skal kjøres. Stringen må begynne med \\. Hvis paramenteren er NULL, brukes den lokale datamaskinen.

 

· msgname

[inn] Pointer til en konstant unikode string som spesifiserer meldings-navnet som meldingsbufferen skal sendes til.

 

· fromname

[inn] Pointer til en konstant unikode string som spesifiserer hvem meldingen er fra. Er paramentreren NULL, brukes den lokale datamaskinens navn.

 

· Buffer

[inn] Pointer til en buffer som inneholder meldingen.

 

· BufSize

[inn] Spesifiserer en DWORD verdi som inneholder lengden i byte bufferen som skal sendes er.

 

 

Du ser at paramentreren fromname spesifiserer hvem meldingen er fra. Dette er grunnen til at det er mulig å sende en melding med et annet navn.

Endret 25. desember 2003 av aadnk

[Jonas]

Så i kjør menyen så er alltid fromname NULL? Er det noe måte å sende med feil avsender i kjør?

 

takk for svar

[Electric]

Hvordan sender man net send med dette da?

[Jonas]

Hvordan sender man net send med dette da?

Slenger inn koden og de to filene og setter på en command1 og tre text bokser

[GeirGrusom]

Fett. har en kamerat som laget et sånt program;

men jeg hadde ikke peiling på hvordan han laget det, og han ville ikke si det.