%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim rsMetaStuff Dim rsMetaStuff_cmd Dim rsMetaStuff_numRows Set rsMetaStuff_cmd = Server.CreateObject ("ADODB.Command") rsMetaStuff_cmd.ActiveConnection = MM_connJoeMedia_STRING rsMetaStuff_cmd.CommandText = "SELECT * FROM dbo.KeywordTable" rsMetaStuff_cmd.Prepared = true Set rsMetaStuff = rsMetaStuff_cmd.Execute rsMetaStuff_numRows = 0 %>
© LUCA Sunscreen, LLC
|