[VB] Net Sender koppelen aan VB

Pagina: 1
Acties:

  • Facer
  • Registratie: Januari 2002
  • Niet online

Facer

Ken net.....

Topicstarter
Is het mogelijk om een net send bericht te sturen zonder Shell( ) te gebruiken ?
Dus bv met Winsocket ?

Verwijderd

op Nt systemen kan je NetMessageBufferSend gebruiken, 9x geen idee, maarja wie draait er nou nog 9x :?

  • Facer
  • Registratie: Januari 2002
  • Niet online

Facer

Ken net.....

Topicstarter
Op 9x kan het niet :

Requirements
Windows NT/2000/XP: Included in Windows NT 3.1 and later.
Windows 95/98/Me: Unsupported.

Bron: http://msdn.microsoft.com/library/default.asp?url=/library/en-us/netmgmt/ntlmapi2_8gv8.asp

Verwijderd

daarom zeg ik ook, geen idee wat je op 9x daar voor kunt gebruiken...

  • Facer
  • Registratie: Januari 2002
  • Niet online

Facer

Ken net.....

Topicstarter
Maar bedankt :9

  • Facer
  • Registratie: Januari 2002
  • Niet online

Facer

Ken net.....

Topicstarter
Ik begrijp niet wat ik precies moet invullen bij :
success = NetMessageBufferSend(SERVER, SERVER, Eikel, Bericht, ByVal Len(sMessage))

Wie heeft voor mij een voorbeeld script ?

Heb er wel eentje gevonden op: http://www.mvps.org/vbnet/code/network/netmessagebuffersend.htm
maar daar staat het als :
success = NetMessageBufferSend(.sServerName, .sSendTo, .sSendFrom, .sMessage, ByVal Len(.sMessage))
en daar wordt ik ook niet echt wijzer van

Verwijderd

Op donderdag 09 mei 2002 00:00 schreef facer het volgende:
Heb er wel eentje gevonden op: http://www.mvps.org/vbnet/code/network/netmessagebuffersend.htm
maar daar staat het als :
success = NetMessageBufferSend(.sServerName, .sSendTo, .sSendFrom, .sMessage, ByVal Len(.sMessage))
en daar wordt ik ook niet echt wijzer van
Ik kan geen VB, maar als je niet begrijpt wat er staat ik je dit proberen uit te leggen want ik denk dat ik 't wel snap :+


je hebt de var. success, deze stuurt je bericht via de "NetMessageBufferSend" functie, bij deze functie zul je een aantal paramaters moeten meegeven die je in een var kunt opslaan.
deze zijn:
.sServerName : Naam van de server
.sSendTo : Ontvanger
.SSendFrom : Zender
.sMessage : Berichtje
en dat ByValLen(.sMessage) zal wel de grootte van de buffer zijn van het berichtje.

als het berichtje verstuurd is zal de var "success" bestaan en kun je iets maken van:
code:
1
2
if (success) { zeg berichtje verzonden }
if (!success) { zeg berichtje niet verzonden }

Nogmaals, 'k kan geen VB :)
Pagina: 1