Internet Help/Search Tools:
AltaVista
| Ask Jeeves
| Biography.com
| Dogpile
| Excite
GoTo.com
| HotBot
| InfoSeek
| KingsNet
| Looksmart
| Lycos
MapBlast
| Merriam-Webster
| Metacrawler
| MiningCo.com
Thunderstone
| Snap.com
| Yahoo
| Yahooligans
| Webcrawler
<% dim Conn dim Cmd dim sqlText dim rsWebLinks set Conn = Server.CreateObject ("ADODB.Connection") Conn.Open "DSN=WebLinks;UID=Web;PWD=Links;" set Cmd = CreateObject ("ADODB.Command") cmd.ActiveConnection = Conn set rsWebLinks = Server.CreateObject ("ADODB.Recordset") sqlText = "Select * from WebLinks.dbo.WebLinks where PostedDate <= '" & Date & "' and ExpirationDate > '" & Date & "'" cmd.CommandText = sqlText rsWebLinks.Open cmd while rsWebLinks.EOF <> True rsWebLinks.MoveNext Wend set Conn = nothing set Cmd = nothing %>
Web Design by Javier Vega
Copyright © Kings County Office of Education
