使用替换Access和ASP时崩溃

时间:2017-11-08 21:00:56

标签: asp-classic ms-access-2007

我非常沮丧,我觉得好像我犯了一个非常基本的错误。我已经多次检查并重新检查了代码,用Google搜索了这次崩溃,但找不到任何内容。

我正在尝试从Access数据库在ASP中创建详细信息提取页面,但只要我的提取查询包含,我的屏幕就会崩溃 a 替换功能。

旁注:查询在Access中完美运行 - 只有当我尝试在ASP代码中运行它时才会发生崩溃

The dabase can be downloaded in this link

这是代码:

strSQL = "SELECT * FROM myQueryReplace"
Set objAdoCon = Server.CreateObject("ADODB.Connection")
objAdoCon.Open strDatabaseConnectionExtract
Set objRec = Server.CreateObject("ADODB.Recordset")
objRec.Open strSQL, objAdoCon
'Check If the RecordSet object returned any records'
If (NOT (objRec.EOF)) AND (NOT (objRec.BOF)) Then
    %><table><%
    For Each subVarColumn in objRec.Fields%>
        <th align='center' bgcolor='#b0c4de'  height='50'><%=subVarColumn.name%></th><%
    Next
    Do Until objRec.EOF%>
            <tr class="highlightTableBody"><%
            For Each subVarColumn in objRec.Fields%>
                <td style="text-align: center;"><%=subVarColumn.value%></td><%
            Next%>
            </tr><%
        objRec.MoveNext
    Loop
    %></table><%
End If
Set objRec = Nothing
Set objAdoCon = Nothing

我想要的是能够打印具有“替换”的查询

1 个答案:

答案 0 :(得分:-1)

我刚刚检查过你说的方式。并下载了数据库并设置了您提供的asp页面和代码,并且它以您想要的方式完美地工作

见下面的截图.. http://prntscr.com/h8boyj

连接字符串我用过..

Provider = Microsoft.ACE.OLEDB.12.0; Data Source = [database path]; Persist Security Info = False;