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

How to code a search page for my website

我们的网站上有一个搜索页面,是我们在 Windows Server 2003 上使用 ASP Classic 制作的。现在我们已经迁移到 Windows Server 2012,我们需要制作一个新的搜索页面,因为代码将无法在 Windows Server 2012 搜索服务上运行。 有没有人遇到过这个。我一直在努力寻找有关如何执行此操作的良好信息。如果可能的话,有人可以展示一些代码示例来说明这是如何完成的吗?
提前谢谢你。

    <%
    '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
    %>