VB。。。语法错误，帮忙看看，谢谢

Question

本帖最后由 ext_8745 于 2010-01-06 14:32:08 编辑

Answer 1

后面加空格
Sql = "update total set total.处理情况=case " & _
    "when dpt.Description like '%无人%' then 1 " & _
    "when dpt.Description like '%空号%' then 2 " & _
    "when dpt.Description like '%服务区%' then 3 " & _
    "when dpt.Description like '%其它%' then 4 " & _
    "when dpt.Description like '%拔号%' then 5 " & _
    "when dpt.Description like '%非%' then 6 " & _
    "when dpt.Description like '%集体%' + '%宿舍%' then 7 " & _
    "when dpt.Description like '%学校%' + '%宿舍%' then 8 " & _
    "when dpt.Description like '%语言%' then 9 " & _
    "when dpt.Description like '%开始%' + '%拒访%' then 10 " & _
    "when dpt.Description like '' then 11 " & _
    "when dpt.Description like '%另约%' then 12 " & _
    "when dpt.Description like '%无法%' then 13 " & _
    "when dpt.Description like '%成功%' then 14 " & _
    "when dpt.Description like '%S1%' then 15 " & _
    "when dpt.Description like '%S2%' then 16 " & _
    "when dpt.Description like '%已满%' then 30 " & _
    "when dpt.Description like '%拒访%' + '%中%' then 31 " & _
    "Else total.处理情况 End " & _
    "from DISPOSITION dpt,号码总库 total " & _
    "Where total.处理情况 = dpt.disposcode "