我继承了一个网站并将其移至新主机。 我已将数据库迁移到新主机,并已开始调整数据库查询的代码。
我有一个新闻故事部分,当我在ntext故事记录之前显示日期时间记录时,我没有得到任何故事记录。我所做的只是删除日期时间,它显示正常。除了不显示新闻报道主体外,我没有任何错误。
感谢您的帮助。首先连接的东西,如果有点相关,那么我的问题区域附近有一个片段。
更新了代码,以便在HTML出现问题时显示更多信息,但我认为不是这样。
<!DOCTYPE html><head>
<%
ErrorMessage = ""
StoryID = Request("StoryID")
%>
<%
Dim Connection
Dim ConnString
Dim Recordset
Dim SQL
ConnString = "Driver={SQL Server};SERVER=.\MSSQLSERVER2012;UID=gmax;PWD=Testing123;DATABASE=growmaxa_"
SQL = "SELECT * FROM NewsStory WHERE ID = " & StoryID
Set Connection = Server.CreateObject("ADODB.Connection")
Set Recordset = Server.CreateObject("ADODB.Recordset")
Connection.Open ConnString
Recordset.Open SQL,Connection
%>
<title>News Story: <%= Recordset("Headline") %></title>
<p> </p>
<div style="float:left;
width:500px;
margin-top:10px;
padding: 0px 10px 30px 0px;
display:inline;
border-top-right-radius: 20px;
border-style:solid;
border-width: 1px 1px 0px 0px;
border-color: #0C0C89;">
<p style="font-size:xx-large;"><%=Recordset("Headline")%></p>
<%If Len(Recordset("Summary"))>0 Then response.write"<BR><H3>"&Recordset("Summary")&"</H3>"%>
<p><%=Recordset("CreatedDate")%></p>
<p><%=Recordset("Story")%></p>
答案 0 :(得分:1)
对于使用古代司机的经典ASP,有几件事可能会有所帮助。
可能听起来很奇怪,但多年来我已经看到它实际上解决了这些问题的案例。
因此,使用这些提示,代码将如下所示:
<%
SQL = "SELECT Headline, Summary, CreatedDate, Story FROM NewsStory WHERE ID = "
SQL = SQL + StoryID
Set Connection = Server.CreateObject("ADODB.Connection")
Set Recordset = Server.CreateObject("ADODB.Recordset")
Connection.Open ConnString
Recordset.Open SQL,Connection
Dim strHeadline, strSummary, dtCreatedDate, strStory
strHeadline = Recordset("Headline")
strSummary = Recordset("Summary")
dtCreatedDate = Recordset("CreatedDate")
strStory = Recordset("Story")
Recordset.Close
%>
<p style="font-size:xx-large;">
<%=strHeadline%> </p>
<% If Len(strSummary)>0 Then response.write "<BR><H3>" & strSummary & "</H3>" %>
<%=dtCreatedDate%></B><BR><BR>
<p><%=strStory %></p>