Select Case TmaterialCatalog Case "Sub" Field="countryID" sql="Select Name From TCountry Where ID=" &SubID& "" Case "Sub0" Field="schoolID" sql="(Select Name From TCountry Where ID=(Select countryID From TSchool Where ID=" &SubID& "))+'-'+(Select Name From TSchool Where ID=" &SubID& ")"' Response.Write sql' Response.End Case Else Response.Write "<body bgColor='#D4D0C8'></body>" Response.End End Select
有错,这是为什么呢?
为了使开发进度加快,我只好用下面的代码:
Dim Field,sql,strsqlSelect Case TmaterialCatalog Case "Sub" Field="countryID" sql="Select Name From TCountry Where ID=" &SubID& "" Case "Sub0" Field="schoolID" strsql="Select Name From TCountry Where ID in (Select countryID From TSchool Where ID=" &SubID& ")" sql="Select Name From TSchool Where ID=" &SubID& "" 'sql="Select (Select Name From TCountry Where ID=(Select countryID From TSchool Where ID=" &SubID& "))+'-'+(Select Name From TSchool Where ID=" &SubID& ")"' Response.Write sql' Response.End Case Else Response.Write "<body bgColor='#D4D0C8'></body>" Response.End End Select
不知道,谁能帮助我一下,把Case "Sub0" 下面代码改下?
此内容由惯性聚合(RSS阅读器)自动聚合整理，仅供阅读参考。 原文来自 — 版权归原作者所有。