急急急：：：刚开始是首页的图片显示为红叉，但现在当在newsproduct.asp改了点代码后又出现在图中出现的错误，请大家帮我解决，要是我说的不算完整的话，请大家回复，我再补充．多谢啦！

我网速太慢,看不到你的图片...
你复制出来吧...

错误代码如下：

　Microsoft VBcript 编译器错误　错误＇800a0401＇

　语句未结束
　
　/myweb/webchina/NewProduct.asp ,行2
　
　Const New_img=8 set rs_Product=server.createobject("adodb.recordset") sqltext="select top" & New_img & " * from Product where Passed=Ture order by UpdateTime desc" rs_Product.open sqltext,conn,1,1 if not rs_Product.EOF then



以上是错误信息，谢谢，帮我解决！！！

Const New_img=8 set rs_Product=server.createobject("adodb.recordset") sqltext="select top'" & New_img & "' * from Product where Passed=Ture order by UpdateTime desc" rs_Product.open sqltext,conn,1,1 if not rs_Product.EOF then


加个单引号试试.

Const New_img=8
Set rs_Product=server.createobject("adodb.recordset")
sqltext="select top "& New_img &" * from Product where Passed=Ture order by UpdateTime desc"
rs_Product.open sqltext,conn,1,1
if not rs_Product.EOF then
'这后面就没代码了么？
'还有就是写程序，也最好要注意规范。
'换行缩进是很重要的，太长的代码最好分行写。
'最好不要很多句代码写在一行里。

Const New_img=8 set rs_Product=server.createobject("adodb.recordset") sqltext="select top'" & New_img & "' * from Product where Passed=Ture order by UpdateTime desc" rs_Product.open sqltext,conn,1,1 if not rs_Product.EOF then


加个单引号试试.

Const New_img=8 set rs_Product=server.createobject("adodb.recordset") sqltext="select top'" & New_img & "' * from Product where Passed=Ture order by UpdateTime desc" rs_Product.open sqltext,conn,1,1 if not rs_Product.EOF then


加个单引号试试.

网速太慢,居然发了三个帖子.

回楼上,我到现在都学没看到楼主的图片...

你不会是用的无图模式吧.