End If
        MoveTo lnsX+20, lnsY+20
        Delay 200
        RightClick 1
                        Delay 15000
                KeyPress "N", 1
        Delay 1500
        FindPic 0,0,600,450,"Attachment:\QQ.bmp",0.8,QQX,QQY
If QQX > 0 And QQY > 0 Then
End If
        MoveTo QQX, QQY+100
        RightClick 1
        Delay 1500
        KeyPress "W", 3
        Goto wc
                                                    Else
                        End If
                                                            Else
                            End If
End Sub