Question

我们在我们的网站上有一个搜索页面，我们在Windows Server 2003上使用ASP Classic。现在我们已经迁移到Windows Server 2012，我们需要创建一个新的搜索页面，因为代码在Windows Server 2012上不起作用搜索服务。有没有人遇到这个。我一直在努力寻找有关如何做到这一点的好信息。如果可能，有人可以展示一些关于如何完成的编码示例吗？提前谢谢。

Answer 1

    <%
    'Setup ADO objects.
    Set adoCommand    = CreateObject("ADODB.Command")
    Set adoConnection = CreateObject("ADODB.Connection")
    adoConnection.Open "Provider=Search.CollatorDSO;Extended Properties='Application=Windows';"
    Set adoCommand.ActiveConnection = adoConnection

    strQuery = "SELECT Top 1000 System.ItemPathDisplay FROM SYSTEMINDEX"

    adoCommand.CommandText = strQuery
    adoCommand.Properties("Page Size") = 10
    adoCommand.Properties("Timeout") = 30
    adoCommand.Properties("Cache Results") = False

    ' Run the query.
    Set adoRecordset = adoCommand.Execute


    adoRecordset.MoveFirst
Do Until adoRecordset.EOF
    response.write(adoRecordset.Fields.Item("System.ItemPathDisplay")& "<br />")
    adoRecordset.MoveNext
Loop

    ' Clean up.
    adoRecordset.Close
    adoConnection.Close
    %>

如何为我的网站编写搜索页面

1 个答案: