主题:contentlinking组件问题.!!请高手指教!
<%
thesubj=server.htmlencode(request.form("subject"))
if thesubj="" then thesubj="无标题"
thepost="<html><head><title>"&thesubj&"</title></head><body>"
thepost=thepost&"发表日期:"&now&"<hr>"
thepost=thepost&server.htmlencode(request.form("posting"))
thepost=thepost&"<!-- #include file=""4-3-2.inc""-->"
thepost=thepost&"</body></html>"
'创建一个新的文件名
set mylinks=server.CreateObject("MSWC.NextLink")
thename="item"&mylinks.GetlistCount("news.txt")+1&".asp"
thenamepath=server.MapPath(thename)
'保存该发表内容到文件中
set myfileobj=server.CreateObject("scripting.filesystemobject")
set myoutstream=myfileobj.createtextfile(thenamepath,2)
myoutstream.write thepost
myoutstream.close
'对内容连接组件所需文本文件的更新
thenews=server.MapPath("news.txt")
set mynews=myfileobj.opentextfile(thenews,8,true)
mynews.writeline thename&vbtab&thesubj
mynews.close
%>
错误类型:
MSWC.NextLink (0x80004005)
错误: 无效的内容链接库列表文件
是不是没有创建到.?
但这句不是建了吗?set mylinks=server.CreateObject("MSWC.NextLink")
..本人刚学ASP.
thesubj=server.htmlencode(request.form("subject"))
if thesubj="" then thesubj="无标题"
thepost="<html><head><title>"&thesubj&"</title></head><body>"
thepost=thepost&"发表日期:"&now&"<hr>"
thepost=thepost&server.htmlencode(request.form("posting"))
thepost=thepost&"<!-- #include file=""4-3-2.inc""-->"
thepost=thepost&"</body></html>"
'创建一个新的文件名
set mylinks=server.CreateObject("MSWC.NextLink")
thename="item"&mylinks.GetlistCount("news.txt")+1&".asp"
thenamepath=server.MapPath(thename)
'保存该发表内容到文件中
set myfileobj=server.CreateObject("scripting.filesystemobject")
set myoutstream=myfileobj.createtextfile(thenamepath,2)
myoutstream.write thepost
myoutstream.close
'对内容连接组件所需文本文件的更新
thenews=server.MapPath("news.txt")
set mynews=myfileobj.opentextfile(thenews,8,true)
mynews.writeline thename&vbtab&thesubj
mynews.close
%>
错误类型:
MSWC.NextLink (0x80004005)
错误: 无效的内容链接库列表文件
是不是没有创建到.?
但这句不是建了吗?set mylinks=server.CreateObject("MSWC.NextLink")
..本人刚学ASP.