求助:简单问题!~~~~~``

下面程序在调试时出错:   
  <%   
   
  if   Request("bsubmit")="抽奖>>"     then     
  user=Request("user")   
  num1=Request("num1")   
  Set   newconn=Server.CreateObject("ADODB.Connection")   
  DBPath=Server.MapPath("data\regest.mdb")   
  newconn.Open   "driver={Microsoft   Access   Driver   (*.mdb)};dbq="&DBPath   
  SQLcmd="Insert   Into     prize   (A_user,A_num)   Values"   
  SQLcmd=SQLcmd&"('"&user&"','"&num1&"')"   
  newconn.Execute   SQLcmd   
  Response.Redirect"ok1.asp"   
   
  end   if     
  %>   
   
   
  错误提示为:   
  Microsoft   VBScript   编译器错误   错误   '800a03f6'     
   
  缺少   'End'     
   
  /iisHelp/common/500-100.asp，行242     
   
  Microsoft   JScript   编译错误   错误   '800a03ed'     
   
  缺少   '('     
   
  /gsd/prize.asp，行277     
   
  if   Request("bsubmit")="抽奖>>"     then   
  -^   
   
  试了好久不知原因,请各位大虾帮忙啊~~~~~~~~~~