% searchstring = Request("searchstring") searchtype = Request("searchtype") Set Connection = Server.CreateObject("ADODB.Connection") Connection.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\websites\customspeechusa.com\db\csbbs.mdb" If searchtype = "message" Then set RS= connection.execute("SELECT generalid,GeneralName,GeneralDate,GeneralSubject,CountofDetailID FROM qryMTMeetingMain WHERE FirstOfGeneralMessage LIKE '%" & searchstring & "%'" & "ORDER BY GeneralDate DESC") Else If searchtype = "subject" Then set RS= connection.execute("SELECT generalid,GeneralName,GeneralDate,GeneralSubject,CountofDetailID FROM qryMTMeetingMain WHERE GeneralSubject LIKE '%" & searchstring & "%'" & "ORDER BY GeneralDate DESC") Else IF searchtype = "name" Then set RS= connection.execute("SELECT generalid,GeneralName,GeneralDate,GeneralSubject,CountofDetailID FROM qryMTMeetingMain WHERE GeneralName LIKE '%" & searchstring & "%'" & "ORDER BY GeneralDate DESC") Else set RS= connection.execute("SELECT generalid,GeneralName,GeneralDate,GeneralSubject,CountofDetailID FROM qryMTMeetingMain WHERE GeneralID > 366 ORDER BY GeneralDate DESC") End If End If End If %>


| <%If searchstring = "" Then%>
The opinions expressed on any Learning Center bulletin board forum, user group, or list, are those of the author(s) and not Custom Speech USA, Inc. Information obtained from these sources is not guaranteed for accuracy or completeness. Custom Speech USA, Inc. is not liable for any use or misuse of information contained in any message or response. If you post a message or response, you agree not to submit information that you know to be false, misleading, or in violation of any law, and you agree to hold Custom Speech USA, Inc. harmless concerning the content of any message or response. Custom Speech USA, Inc. reserves the right to withhold, edit, or remove any message or response in whole or in part for any reason.<%End If%> |