民族风俗风俗习惯|民族风俗禁忌|饮食文化|传统节日|民族服饰|建筑特色|民族体育|文化艺术游易天下中国旅游网

处理 SSI 文件时出错
民族风俗风俗习惯|民族风俗禁忌|饮食文化|传统节日|民族服饰|建筑特色|民族体育|文化艺术游易天下中国旅游网 <% Sub Art(Colum) Set rs2=conn.Execute("Select top 10 ID,Title,Stitle,Path,FileName,BiaotiArt,UBiaotiArt From Art Where (Colum_id='"&Colum&"' or Fu_Colum='"&Colum&"') and ArtCheck=0 and del=0 order by DGArt desc,ID desc") Response.Write("")& vbcrlf For x=1 to 2 Response.Write("")& vbcrlf Next rs2.close Set rs2=nothing Response.Write("

")& vbcrlf For i=1 to 5 IF Not (rs2.Eof or rs2.Bof) Then IF rs2("BiaotiArt")=true Then Response.Write("·"&Left(rs2("Title"),9)&"
"&vbcrlf) Else Response.Write("·"&Left(rs2("Title"),9)&"
"&vbcrlf) End IF rs2.movenext End IF Next Response.Write("

")& vbcrlf End Sub Call Cts.ArtMore(375,"fs_1_[Page]","/fengshu/","","") Call Cts.ArtMore(208,"fs_2_[Page]","/fengshu/","","") Call Cts.ArtMore(374,"fs_3_[Page]","/fengshu/","","") Call Cts.ArtMore(269,"fs_4_[Page]","/fengshu/","","") Call Cts.ArtMore(304,"fs_5_[Page]","/fengshu/","","") %>