January 5th, 2005, 06:07 AM
|
 |
Contributing User
|
|
Join Date: Jul 2004
Location: staffordshire
Posts: 280
Time spent in forums: 2 Days 13 h 3 m 59 sec
Reputation Power: 5
|
|
server config??
hi all,
New to this area, I have been having a few problems with Server.CreateObject("IXSSO.Query") componant on 2003 but was working fine on 2000 is this somthing that I need to config on serveror maybe it is my code:
The below code does not fall over it just does not bring back the results you would expect eg NEVER finds anything therefor it either does not produce a catalog or it does not search the catalog that it has produced.
code:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Index Server Example Search Results Page</title>
</head>
<body>
<%
Dim sSearchString
Dim oQuery
sSearchString = Request.Form("query")
Const SEARCH_CATALOG = "T_Search" 'remember to change this
%>
<%
Set oQuery = Server.CreateObject("IXSSO.Query")
oQuery.Catalog = SEARCH_CATALOG
'oQuery.Query = "@all " & sSearchString & " AND NOT #path *_* AND NOT #path *downloads* AND NOT #path *images* AND NOT #filename *.class AND NOT #filename *.asa AND NOT #filename *.css AND NOT #filename *postinfo.html"
oQuery.Query = sSearchString
'response.Write (sSearchString)
'response.End
oQuery.MaxRecords = 200
oQuery.SortBy = "rank[d]"
oQuery.Columns = "DocAuthor, vpath, doctitle, FileName, Path, Write, Size, Rank, Create, Characterization, DocCategory"
Set oRS = oQuery.CreateRecordSet("nonsequential")
%>
<%
If oRS.EOF Then
Response.Write "No pages were found for the query <b><i>" & sSearchString & "</i></b>"
Else
Do While Not oRS.EOF
Response.write "<b>FileName:</b> " & oRS("FileName") & "<br>"
Response.write "<b>doctitle:</b> " & oRS("doctitle") & "<br>"
Response.write "<b>Size:</b> " & oRS("Size") & "<br>"
Response.write "<b>Create:</b> " & oRS("Create") & "<br>"
Response.write "<b>Write:</b> " & oRS("Write") & "<br>"
Response.write "<b>Characterization:</b> " & oRS("Characterization") & "<hr>"
oRS.MoveNext
Loop
End If
%>
<%
Set oRS = nothing
Set oQuery = nothing
%>
</body>
</html>
I would be V grateful if someone cold help
sess
|
ASP Free Forums Sponsor:
Del.icio.us
Digg
Google
Spurl
Blink
Furl
Simpy
Y! MyWeb
Linear Mode
