webForumDet fria alternativet

OK automatiskt

.NET

10 svar · 315 visningar · startad av Qimen

Medlem sedan juni 20015 009 inlägg
Frågan#1

Hej

Kan man göra så att om datorn tar imot ett meddelande till datorn (ex. via net send) så ska metoden automatiskt "trycka" ok så att meddelandet försvinner? :)

Medlem sedan sep. 20005 700 inlägg
#2

Varför vill man det? Trycka OK på alla meddelanderutor eller bara just från net send? I det senare fallet finns det betydligt enklare sätt att bli av med dessa ;)

Medlem sedan juni 20015 009 inlägg
#3

Hehe jo det är just bara från net send. Hur kan man blocka så att man inte kan ta emot då? Snackade med en som sa att man fick göra en funktion i programmet som auto tryckte ok. Men Hur kan man annars göra det?

Medlem sedan sep. 20005 700 inlägg
#4

Öppna Services (Tjänster), leta upp Messenger, stäng av tjänsten och se till att den inte startas igång automatiskt.

Medlem sedan juni 20015 009 inlägg
#5

Gein skrev:

Öppna Services (Tjänster), leta upp Messenger, stäng av tjänsten och se till att den inte startas igång automatiskt.

Mjo men nu gäller det ett program som ska köras på datorer där man inte har den möjligheten. Därför jag kollar på alternativa lösningar. :)

Medlem sedan juni 20022 599 inlägg
#6

Om du inte vill stänga av Messenger Servicen så kan du kanske prova den här:

http://www.clearlight.com/~rtvsoft/RtvReco.htm

Medlem sedan juni 20015 009 inlägg
#7

niko skrev:

Om du inte vill stänga av Messenger Servicen så kan du kanske prova den här:

http://www.clearlight.com/~rtvsoft/RtvReco.htm

Likadant där, måste på något sätt bygga in det i programmet.

Medlem sedan juni 20022 599 inlägg
#8

Du kan få lite pseudokod i VB som du kan Googla/bygga vidare på:

do While true
	dinafönster = EnumWindows()
	for each fönster in dinafönster
		if GetWindowText(fönster) = "Messenger Service" then
			dinKnapp = FindWindow(fönster, "OK")
			SendMessage(dinKnapp, WM_MOUSEDOWN)
			SendMessage(dinKnapp, WM_MOUSEUP)
		end if
	next fönster
	Sleep EN_LITEN_STUND
loop
Medlem sedan juni 20015 009 inlägg
#9

Ok, ska testa när jag kommer hem.

/r Hmm tydligen måste jag deklarera EnumWindows men jag vet inte riktigt hur (nybörjare på vb ;) ), sökte en del på google och hitta en hel del men inget som jag fick rätt på. Hur ska jag lösa detta? :)

Medlem sedan juni 20022 599 inlägg
#10

Jag ändrade i den här:

http://www.thescarms.com/VBasic/EnumWindows.asp

Nu dödar den alla fönster med texten "Messenger Service" eller "Tjänsten Messenger" en gång varannan sekund. Men du kan ju ändra som du vill ha det.

Medlem sedan juni 20015 009 inlägg
#11

Tack niko för din insats! Fick det att fungera som det skulle. :)

253 ms totalt · 4 externa anrop · v20260731065814-full.1dc6f849
120 ms — deklarationer (db)
0 ms — hämta statistik (cache)
129 ms — hämta tråd, inlägg och bilagor (db)
122 ms — ändringar (db)