字段问题

[tcy9]

dim cs(30)
for h=1 to 30
if cs(h)<>"" then
s="and "&h&"="&sqlstr(cs(h))
else
s=""
end if
next
上面是我写的一段代码，s是一条SQL语句的一部分，那个表里边的字段是以1-30命名 的，我想做的是，如果cs(h)不等于空的话，就把SQL语名加上“and 字段名=H的值必须等于CS（h）”这一句,不知道我这个想法能不能实现，如果能实现的话，怎么实现呢？

[zcwmxn]

哥们，你是不是少了空格？
s="and "&h&"="&sqlstr(cs(h))
===========》
s=" and "&h&"="&sqlstr(cs(h))

[QQgenie]

得先有段代码为cs(30)数组赋值,再接for h=1 to ...

[tcy9]

在上面我已经为CS（30）数组赋值了，就是S赋值这一段我不知道是不是有错误

[wanghui0380]

dim cs(30)
sql="select * form xxx where 1=1 and "//and后有空格
for h=0 to 29
if cs(h)<>"" then
sql=sql+h+"='"&cs(h)&"'and "
end if
next
sql=sql+"1=1"

[tcy9]

我原来的SQL语句是这们写的：
sql="SELECT * FROM cp where flbh='"&flbh&"'and cdbh='"&cdbh&"'and ppbh='"&ppbh&"'"
加上了上面的一段以后提示：
类型不匹配: '[string: "SELECT * FROM cp whe"]'

[wanghui0380]

dim cs(30)
sql="SELECT * FROM cp where flbh='"&flbh&"'and cdbh='"&cdbh&"'and "
for h=0 to 29
if cs(h)<>"" then
sql=sql+h+"='"&cs(h)&"' and "//这里我不知道h是什么类型的，我用的是字符型
end if
next
sql=sql+"1=1"
response.write sql//把sql打出来看看，有什么不对

[wanghui0380]

对了 dim cs(30) 是从0-29的，如果你要1-30，dim(31)程序改为

dim cs(30)
sql="SELECT * FROM cp where flbh='"&flbh&"'and cdbh='"&cdbh&"'and "
for h=1 to 30
if cs(h)<>"" then
sql=sql+h+"='"&cs(h)&"' and "//这里我不知道h是什么类型的，我用的是字符型
end if
next
sql=sql+"1=1"
response.write sql//把sql打出来看看，看看有什么不对，如果语法没问题，把他带入，查询分析器中分析，看看字段条件有没有问题

[possible_Y]

dim cs(30)
sql="select * form cp where flbh='"&flbh&"'and cdbh='"&cdbh&"'and ppbh='"&ppbh&"'"
for h=0 to 29
if cs(h)<>"" then
sql=sql & " and [" & h & "]='" & cs(h) & "'"
end if
next

[wanghui0380]

写错了，上面应该为dim(31)

[possible_Y]

dim cs(30) 是从0-30的,vb和c++不一样的