这问题真奇怪了，越简单越难搞，究竟哪里有问题?
我把它简化到这样，还出错！
sql="SELECT sum(case when stype='PI' then qty else 0 end) as 入库量 FROM stock"
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open sql,conn,1,1

错误提示：
Microsoft OLE DB Provider for Visual FoxPro 错误 '80040e14'
Function name is missing ).

yms123 版主：
我的理解，这个和数据库没有关系吧，应该是提示语法错误！
sql="SELECT sum(qty) as 入库量 FROM stock"  这样就不出错！

stype 字符型

8楼正解！
多谢了！