在修改路径时,发现BUG一处,不知是不是
If LinkType=1 Then
If IsNull(DoMain) Or DoMain="" Then
DatePathStr=Conn.execute("Select MF_Domain from FS_MF_Config")(0) &"/"& RsNewsObj("SavePath")&"/"&RsNewsObj("ClassEName")&"/"&RsNewsObj("FileName")&"."&RsNewsObj("NewsFileExtName")
if instr(lcase(DatePathStr),"http://")=0 then
DatePathStr="http://"&Replace(DatePathStr,"//","/")
else
DatePathStr="http://"&Replace(mid(DatePathStr,len("http://")+1),"//","/")
end if
Elseif Not IsNull(DoMain) And (DoMain <> "") then
DatePathStr = DoMain &"/" & RsNewsObj("FileName") & "." & RsNewsObj("NewsFileExtName")
if instr(lcase(DatePathStr),"http://")=0 then DatePathStr="http://"&Replace(DatePathStr,"//","/")
End if
ElseIf LinkType=0 then
'DatePathStr =RsNewsObj("SavePath")&"/"&RsNewsObj("ClassEName")&RsNewsObj("SaveNewsPath")&"/" & RsNewsObj("FileName") & "." & RsNewsObj("NewsFileExtName")(06年11月7日shj修改)
DatePathStr =RsNewsObj("SavePath")&"/"&RsNewsObj("SaveNewsPath")&"/" & RsNewsObj("FileName") & "." & RsNewsObj("NewsFileExtName")
End if
上面当路径由绝对路径改为相对路径时或者相对改为绝对路径时, 新闻路径不一致,会导致新闻打不开
官方看看代码
[此贴子已经被作者于2006-11-7 16:12:02编辑过]