Question

下的一个网站源码，放到二级目录版面出错，找到定义路径的地方，但不知道怎么修改，求助！

msql="select * from Ay_System"
Set rss=Server.CreateObject("Adodb.Recordset")
rss.Open msql, Conn
if not rss.eof then
ay_license=trim(rss("bLicense") & "")
ay_directory=trim(rss("bDirectory") & "")
If ay_directory="/" Then
ay_directory=""
Else
If Left(ay_directory,1)<>"/" And ay_directory<>"" Then
ay_directory="/" & ay_directory
End if
If Left(Len(ay_directory)-1,1)="/" Then
ay_directory=Left(ay_directory,Len(ay_directory)-1)
End if
“ay_directory”就是网站目录，就这点分了，先感谢~

Answer 1

不知道具体是什么出错，不过从这些程序上可以看到一个地方错了。
就是倒数第三行Left(Len(ay_directory)-1,1)="/"这个表达式，从程序思路上来看，应该是这样吧：
Right(ay_directory,1)="/"

追问

放到二级目录的话，里面的链接还是指向根目录的，图片什么的路径都是

追答

像这样的程序，应该可以在后台设置程序目录的，你看看有没有。

追问

就是后台没有的啊，要不你留个邮箱，我发给你看看啊，谢啦

追答

那你在你上面的程序后面加一行试试看：
ay_directory="/二级目录名"&ay_directory