%@LANGUAGE="VBSCRIPT"%> <% Dim HomePa Dim HomePa_cmd Dim HomePa_numRows Set HomePa_cmd = Server.CreateObject ("ADODB.Command") HomePa_cmd.ActiveConnection = MM_test_STRING HomePa_cmd.CommandText = "SELECT * FROM dbo.HomePage" HomePa_cmd.Prepared = true Set HomePa = HomePa_cmd.Execute HomePa_numRows = 0 %>