Is this the correct way to sniff for WAP devices (cell phones, pdas, etc)?

Code:
If (Instr(1,Lcase(Request.ServerVariables("HTTP_ACCEPT")),"wap") <> 0) Then
Thanks,