Contact

[qmr55]

hey i found this on the forum in the trash about party p and i figured its perfect...wut i needed is a macro that looks throught my contact list and if the certain contact is found it does out "Contact Found" but its not working :?: :?:

i could not figure out the problem...any help?

Code:

Copy      Help

int w1
w1=win("Address Book" "50551")
act id(822w1)
key D
Acc a=acc("1" "LISTITEM" "" "" "" 0x1001)
str descr=a.Description
out descr
Acc b=acc("2" "LISTITEM" "" "" "" 0x1001)
str descrr=b.Description
out descrr
Acc c=acc("3" "LISTITEM" "" "" "" 0x1001)
str descrrr=c.Description
out descrrr
if(descr="Mike & Ann")
,if(descr="Mike & Ann") out "contact found"