高手请进!这样的问题如何解决?

[undercontrol]

<% @ language="vbscript" %>
<% response.buffer=false %>

<!--#include file="adovbs.inc" -->
<!--#include file="connectsqldb.asp" -->

<% Dim Rs,sqlStr,Todaydate,DeptName

DeptName="我是中国人"
Set rs=server.createobject("adodb.recordset")
Todaydate=year(date())&"-"&month(date())&"-"&day(date())
%>

<%
function JudgeRdInOut(Byval TbName)
dim sqlstr,rss
Set rss=server.createobject("adodb.recordset")
response.write lenB(deptname)
response.write "<br>"
sqlstr="select Subdept_name from "& TbName &" where Subdept_name='"&DeptName&"' and chart_date='"&Todaydate&"'"

set rss=cnn.execute(sqlstr,,adcmdtext)
response.write lenB(sqlstr)
response.write "<br>"

response.write sqlstr
response.write rss.fields("subdept_name").value

response.end

if Not rss.eof then
rss.close
set rss=nothing

JudgeRdInOut=1
else
rss.close
set rss=nothing

JudgeRdInOut=0
end if

end function
%>
测试结果:分别占用字节数为:10和182，"response.write sqlstr"能正确显示查询字符串；并且能正确显示查询结果。
但是当代码改为：
<% @ language="vbscript" %>
<% response.buffer=false %>

<!--#include file="adovbs.inc" -->
<!--#include file="connectsqldb.asp" -->

<% Dim Rs,sqlStr,Todaydate,DeptName

DeptName=Trim(request.form("HdDeptName"))
Set rs=server.createobject("adodb.recordset")
Todaydate=year(date())&"-"&month(date())&"-"&day(date())
%>

<%
function JudgeRdInOut(Byval TbName)
dim sqlstr,rss
Set rss=server.createobject("adodb.recordset")
response.write lenB(deptname)
response.write "<br>"
sqlstr="select Subdept_name from "& TbName &" where Subdept_name='"&DeptName&"' and chart_date='"&Todaydate&"'"

set rss=cnn.execute(sqlstr,,adcmdtext)
response.write lenB(sqlstr)
response.write "<br>"

response.write sqlstr
response.write rss.fields("subdept_name").value

response.end

if Not rss.eof then
rss.close
set rss=nothing

JudgeRdInOut=1
else
rss.close
set rss=nothing

JudgeRdInOut=0
end if

end function
%>
测试结果:分别占用字节数为:80和252，"response.write sqlstr"能正确显示查询字符串；但无法找到查询结果，也就是查询不成功！很显然MSSQL对252字节的变体变量无法正确解析。
任何才能避免这样的问题，正确得到结果呢？？

[街头小贩]

汗！看不太明白的意思

[undercontrol]

可能我的表诉不是太清楚
当代码修改后,其实DeptName=Trim(request.form("HdDeptName"))从表单中获得的仍然是"我是中国人"
这个字符,这从打印出的查询字符串可以证实.用response.write在屏幕上显示两次都是一样的.
To:
cxy89173(晓勇)
该用怎样的方法呢?

[look4sword]

不明白你为什么要拿80个字符去查询，简单问题复杂化！

[cxy89173]

帮你顶一下。

[cxy89173]

怎么会有这么大？别用这么不常规的做法。