Sean McWherter's Blog: 2009

Thursday, November 19, 2009

Hi Country Off Road Fuel Tank Skid for LR3

I installed this tonight. It complements the Mantec front sump guard, Rasta 4x4 transfer case guard, and Rover Specialties stage I sliders I already have. The install was a bit bewildering. It was ordered to work with the parts I have so I was told it would be custom fit for my application.
At first attempt it looked like there was no way it was designed to work with my setup. It seemed to hang far too low. Upon further review I could see that the intended install was to have quite a bit of space between this skid plate and the factory LR3 tank plate.
The plate is made well and is very solid. I assume that the space in between the two skid plates (factory and HCOR) is to absorb flex when the weight of the vehicle is on the plate. I have a huge concern with my new dramatically lower break-over angle. There is one bit of steel welded on that looks to be for mating with the High Country center diff mount that I don’t own.
After I determine for sure that this adds no strength to my configuration, I’ll grind that bit off. that will give me an extra inch of clearance and get my break-over angle back to very close to the factory spec. Pictures below.

Wednesday, October 28, 2009

Grant EXECUTE Permissions on all Stored Procedures to a Single User

I needed a quick way to grant EXEC rights to a read only reporting user I have in a SQL database. With this I was able to do it for all the SP’s that met my wildcard.

-- Originally written by Jeremiah Peschka on SQLServerPedia.com
DECLARE @sql AS NVARCHAR(MAX);
DECLARE @newline AS NVARCHAR(2);
DECLARE @user_name AS NVARCHAR(100);
DECLARE @sproc_name_pattern AS NVARCHAR(10);

SET @sql = N''
SET @newline = NCHAR(13) + NCHAR(10);
SET @user_name = N'jeremiah';
-- escaping _ prevents it from matching any single character
-- including the wildcard makes this much more portable between DBs
SET @sproc_name_pattern = N'sproc[_]%';

-- using QUOTENAME will properly escape any object names with spaces
-- or other funky characters
SELECT @sql = @sql
              + N'GRANT EXECUTE ON '
              + QUOTENAME(OBJECT_SCHEMA_NAME([object_id])) + '.'
              + QUOTENAME([name])
              + N' TO '
              + QUOTENAME(@user_name)
              + N';'
              + @newline + @newline
  FROM sys.procedures
 WHERE [name] LIKE @sproc_name_pattern;

-- this is my version of debug code, I usually run it once with the PRINT intact
-- before I actually use sp_executesql
--PRINT @sql;

EXEC sp_executesql @sql;

Add alternating row color to SQL Server Reporting services report

I was looking for a way to do this easily in SQL Reporting services. Not as easy as Excel but this gets the job done. You can multi-select cells and add it as the background for all of them which is very handy. Credit to Michael Haren on stackoverflow.

Go to the table row's BackgroundColor property and choose "Expression..."

Use this expression:

=IIf(RowNumber(Nothing) Mod 2 = 0, "Silver", "Transparent")

Friday, October 23, 2009

How to Search All Stored Procedures for Text

I needed to look through my hundreds of stored procedures to find which of them contained a reference to a specific table. In the past I’ve used desktop applications like Toad from Quest to do this, but I didn’t have an install handy so I tried to find something lighter. You can run this query to show all procedures that contain the word “TESTSEARCH”. You can comment out the routine type in the where clause to also return functions with your search string.

SELECT ROUTINE_NAME, ROUTINE_DEFINITION 
    FROM INFORMATION_SCHEMA.ROUTINES 
    WHERE ROUTINE_DEFINITION LIKE '%TESTSEARCH%' 
    AND ROUTINE_TYPE='PROCEDURE'

Monday, October 12, 2009

Gold Mountain and John Bull Trail in the LR3

^th

Tuesday, September 29, 2009

How to Remove Special Characters from Text String in MS SQL (T-SQL)

Was looking for a better solution than a mile long REPLACE statement, found this. Originally written by Christian d’Heureuse, modified slightly by me. Removes all characters except: 0-9, a-z, A-Z, and spaces (remove “or @c = 32” if you want to also remove spaces).

/****** Object:  UserDefinedFunction [dbo].[RemoveSpecialChars]    Script Date: 09/29/2009 09:48:45 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
create function [dbo].[RemoveSpecialChars] (@s varchar(256)) returns varchar(256)
   with schemabinding
begin
   if @s is null
      return null
   declare @s2 varchar(256)
   set @s2 = ''
   declare @l int
   set @l = len(@s)
   declare @p int
   set @p = 1
   while @p <= @l begin
      declare @c int
      set @c = ascii(substring(@s, @p, 1))
      if @c between 48 and 57 or @c between 65 and 90 or @c between 97 and 122 or @c = 32
         set @s2 = @s2 + char(@c)
      set @p = @p + 1
      end
   if len(@s2) = 0
      return null
   return @s2
   end

Thursday, September 17, 2009

Unable to Import Text File to SQL, “Truncated Data” Error

There seems to be a bug or at least an oversight in all versions of MS SQL wherein you cannot import from a text file to a table if SQL doesn’t like the data in the source file. I’ve tried everything from saving the text to an Excel sheet in a trimmed column to selecting only certain columns for import, nothing ever works. Even saving the bad column to a memo or nvarchar(max) field doesn’t work. This week I found a work around.
These are the errors you might see:
Messages Error 0xc020901c: Data Flow Task: There was an error with output column "English String" (18) on output "Excel Source Output" (9). The column status returned was: "Text was truncated or one or more characters had no match in the target code page.". (SQL Server Import and Export Wizard)
Error 0xc020902a: Data Flow Task: The "output column "English String" (18)" failed because truncation occurred, and the truncation row disposition on "output column "English String" (18)" specifies failure on truncation. A truncation error occurred on the specified object of the specified component. (SQL Server Import and Export Wizard)
Error 0xc0047038: Data Flow Task: The PrimeOutput method on component "Source - Sheet1$" (1) returned error code 0xC020902A. The component returned a failure code when the pipeline engine called PrimeOutput(). The meaning of the failure code is defined by the component, but the error is fatal and the pipeline stopped executing. (SQL Server Import and Export Wizard)
Error 0xc0047021: Data Flow Task: Thread "SourceThread0" has exited with error code 0xC0047038. (SQL Server Import and Export Wizard)
Error 0xc0047039: Data Flow Task: Thread "WorkThread0" received a shutdown signal and is terminating. The user requested a shutdown, or an error in another thread is causing the pipeline to shutdown. (SQL Server Import and Export Wizard)
Error 0xc0047021: Data Flow Task: Thread "WorkThread0" has exited with error code 0xC0047039. (SQL Server Import and Export Wizard)

SOLUTION:

You can increase the number of rows sampled by increasing the value of TypeGuessRows under the HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\Engines\Excel registry key and changing it to 0. This will force it to scan all rows. Even when working with 500k+ records this takes less than a second for me.
NOTE: Restart SQL Management studio after your change!
Screen shot below shows the location on my Windows 7 x64 box.

Wednesday, August 19, 2009

Creating XML Sitemap from MS SQL

As anyone that has tried to create a sitemap for a decent sized site knows, no tool you can pull off the shelf really works. When you are dealing with hundreds of thousands of URLs on your site, tools that follow your site and try and create an XML sitemap just don’t work very well.
If you want to provide a sitemap to the search engines that have just the URL’s you want and none of the junk or various permutations of a URL a BOT is bound to find, you have just one choice and that is to programmatically develop a file with the output you desire.
I could find no utility on the market that would allow you to feed it a T-SQL query and have it output an XML sitemap. Maybe some day I’ll write it. For now I can accomplish my needs with the stored procedure below.
So what we have here is a stored procedure that does the following:

Creates seven sitemaps based on seven different queries. Each sitemap has a specific type of page we want the search engines to follow.
Outputs the sitemap to an XML file encoded in UTF-16 (only format MS SQL supports unfortunately).
Converts the files from UTF-16 to UTF-8
Finally, deletes and names the files

I use the various sitemaps here each for a different purpose. I have one for each domain I manage of the following: product URL’s, category URL’s, and category URL’s restricted to brands.
I used the SQL XML RAW capability to output my query in an XML format. This works REALLY well.
The most time consuming part was trying to cheat my way into getting a UTF-8 formatted file since MS SQL just can’t do anything but UTF-16. There are easier ways to do this in Linux, in Windows I had to find a tool I could use from a command line. I ended up finding a great tool for converting various types of documents from one encoding to another. It’s called Unifier by Melody-Soft.
At this point all that was left was renaming the files to be in a standard format. I do this with xp_cmdshell as you can see in my SP below.

USE [CART]
GO
/****** Object:  StoredProcedure [dbo].[Sp_CreateSitemaps2]    Script Date: 08/19/2009 12:16:34 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- =============================================
-- Author:        Sean McWherter
-- Create date: 8-10-09
-- Description:    Generates all sitemaps
-- =============================================
ALTER PROCEDURE [dbo].[Sp_CreateSitemaps] 
AS
BEGIN
    -- SET NOCOUNT ON added to prevent extra result sets from
    -- interfering with SELECT statements.
    SET NOCOUNT ON;
--PS PRODUCTS
DECLARE @x_psproduct xml
DECLARE @strXML_psproduct varchar(MAX)
SET @x_psproduct=(
 
select  --top 200
'http://www.petstore.com/' + replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(case when WebParent is not null then ParentDesc else description end, ' - ', '_'),'-','_') + 
'_' + replace(LongName, '-', '_') +
'-' + replace(ManufacturerName, '-', '_') +
'-' + idProduct +
'-' + a.GPCat4,
'®',''),'.',''),'/','_'),',',''),'& ',''),' ','_'),'&','_'),'™',''),':',''),'>',''),'<',''),'%','_') +
'-vi.html' as loc,
'daily' as changefreq
--, idproduct, parentdesc, longname, manufacturername
from MDCART_products a inner join MDCART_CategoriesGP b on a.GpCat4 = b.GPCat1 inner join MDCART_Manufacturers c on a.ManufacturerCode = c.ManufacturerCode
where ((a.idProduct = WebParent and ParentDesc is not null)  or WebParent is null) and LongName is not null and description is not null and ManufacturerName is not null and a.GpCat4 is not null and Visable = 1
and LEFT(gpcat4,2) in (select distinct LEFT(gpcat4,2) cats  from MDCART_products where active <> 0 and gpcat4 is not null)
order by a.idProduct desc
for xml raw('url'), ELEMENTS)
 
SET @strXML_psproduct= '<?xml version="1.0" encoding="UTF-8"?>
<urlset      xmlns="http://www.sitemaps.org/schemas/sitemap/0.9"      xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"      xsi:schemaLocation="http://www.sitemaps.org/schemas/sitemap/0.9            http://www.sitemaps.org/schemas/sitemap/0.9/sitemap.xsd">'
+ CONVERT(varchar(MAX),@x_psproduct) + '</urlset>'
 
--PS CATEGORY FEED
DECLARE @x_pscategory xml
DECLARE @strXML_pscategory varchar(MAX)
SET @x_pscategory=(
 
select  --top 250 
'http://www.petstore.com/' + replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(LongName, ' - ', '_'),'-','_') + 
'-' + GPCat1,
'®',''),'.',''),'/','_'),',',''),'& ',''),' ','_'),'&','_'),'™',''),':',''),'>',''),'<',''),'%','_') +
'-ct.html' as loc,
'hourly' as changefreq
from  MDCART_CategoriesGP 
where  Visable = 1 and LongName is not null and GPCat1 is not null
and LEFT(GPCat1,2) in (select distinct LEFT(gpcat4,2) cats  from MDCART_products where active <> 0 and gpcat4 is not null)
order by gpcat1 
for xml raw('url'), ELEMENTS)
 
SET @strXML_pscategory= '<?xml version="1.0" encoding="UTF-8"?>
<urlset      xmlns="http://www.sitemaps.org/schemas/sitemap/0.9"      xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"      xsi:schemaLocation="http://www.sitemaps.org/schemas/sitemap/0.9            http://www.sitemaps.org/schemas/sitemap/0.9/sitemap.xsd">'
+ CONVERT(varchar(MAX),@x_pscategory) + '</urlset>'
 
--PS CATEGORY W/ BRAND FEED
DECLARE @x_pscategory_brand xml
DECLARE @strXML_pscategory_brand varchar(MAX)
SET @x_pscategory_brand=(
 
select  --top 250 
'http://www.petstore.com/' + replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(ManufacturerName, ' - ', '_'),'-','_') + 
'-' + LongName +
'-' + ManufacturerCode +
'-' + GPCat1,
'®',''),'.',''),'/','_'),',',''),'& ',''),' ','_'),'&','_'),'™',''),':',''),'>',''),'<',''),'%','_') +
'-ct.html' as loc,
'hourly' as changefreq
from ( SELECT DISTINCT b.ManufacturerName, c.LongName, b.ManufacturerCode, c.GPCat1
        FROM  MDCART_products AS a INNER JOIN MDCART_Manufacturers AS b ON a.ManufacturerCode = b.ManufacturerCode INNER JOIN 
                MDCART_CategoriesGP AS c ON a.GpCat4 = c.GPCat1 
        where ManufacturerName is not null and LongName is not null and description is not null and b.ManufacturerCode is not null and c.GPCat1 is not null and Visable =1 
        and LEFT(c.GPCat1,2) in (select distinct LEFT(gpcat4,2) cats  from MDCART_products where active <> 0 and gpcat4 is not null)) as a1
order by ManufacturerName, LongName 
for xml raw('url'), ELEMENTS)
 
SET @strXML_pscategory_brand= '<?xml version="1.0" encoding="UTF-8"?>
<urlset      xmlns="http://www.sitemaps.org/schemas/sitemap/0.9"      xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"      xsi:schemaLocation="http://www.sitemaps.org/schemas/sitemap/0.9            http://www.sitemaps.org/schemas/sitemap/0.9/sitemap.xsd">'
+ CONVERT(varchar(MAX),@x_pscategory_brand) + '</urlset>'
 
--MD PRODUCTS
DECLARE @x_mdproduct xml
DECLARE @strXML_mdproduct varchar(MAX)
SET @x_mdproduct=(
 
select  --top 200
'http://www.marinedepot.com/' + replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(case when WebParent is not null then ParentDesc else description end, ' - ', '_'),'-','_') + 
'_' + replace(LongName, '-', '_') +
'-' + replace(ManufacturerName, '-', '_') +
'-' + idProduct +
'-' + a.GPCat1,
'®',''),'.',''),'/','_'),',',''),'& ',''),' ','_'),'&','_'),'™',''),':',''),'>',''),'<',''),'%','_') +
'-vi.html' as loc,
'daily' as changefreq
--, idproduct, parentdesc, longname, manufacturername
from MDCART_products a inner join MDCART_CategoriesGP b on a.GPCat1 = b.GPCat1 inner join MDCART_Manufacturers c on a.ManufacturerCode = c.ManufacturerCode
where ((a.idProduct = WebParent and ParentDesc is not null)  or WebParent is null) and LongName is not null and description is not null and ManufacturerName is not null and a.GPCat1 is not null and Visable = 1
and LEFT(a.GPCat1,2) in (select distinct LEFT(gpcat1,2) cats  from MDCART_products where active = -1 and gpcat1 is not null)
order by a.idProduct desc
for xml raw('url'), ELEMENTS)
 
SET @strXML_mdproduct= '<?xml version="1.0" encoding="UTF-8"?>
<urlset      xmlns="http://www.sitemaps.org/schemas/sitemap/0.9"      xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"      xsi:schemaLocation="http://www.sitemaps.org/schemas/sitemap/0.9            http://www.sitemaps.org/schemas/sitemap/0.9/sitemap.xsd">'
+ CONVERT(varchar(MAX),@x_mdproduct) + '</urlset>'
 
--MD CATEGORY FEED
DECLARE @x_mdcategory xml
DECLARE @strXML_mdcategory varchar(MAX)
SET @x_mdcategory=(
 
select  --top 250 
'http://www.marinedepot.com/' + replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(LongName, ' - ', '_'),'-','_') + 
'-' + GPCat1,
'®',''),'.',''),'/','_'),',',''),'& ',''),' ','_'),'&','_'),'™',''),'>',''),'<',''),'%','_') +
'-ct.html' as loc,
'hourly' as changefreq
from  MDCART_CategoriesGP 
where  Visable = 1 and LongName is not null  and GPCat1 is not null
and LEFT(GPCat1,2) in (select distinct LEFT(gpcat1,2) cats  from MDCART_products where active = -1 and gpcat1 is not null)
order by gpcat1 
for xml raw('url'), ELEMENTS)
 
SET @strXML_mdcategory= '<?xml version="1.0" encoding="UTF-8"?>
<urlset      xmlns="http://www.sitemaps.org/schemas/sitemap/0.9"      xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"      xsi:schemaLocation="http://www.sitemaps.org/schemas/sitemap/0.9            http://www.sitemaps.org/schemas/sitemap/0.9/sitemap.xsd">'
+ CONVERT(varchar(MAX),@x_mdcategory) + '</urlset>'
 
--MD CATEGORY W/ BRAND FEED
DECLARE @x_mdcategory_brand xml
DECLARE @strXML_mdcategory_brand varchar(MAX)
SET @x_mdcategory_brand=(
 
select  --top 250 
'http://www.marinedepot.com/' + replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(ManufacturerName, ' - ', '_'),'-','_') + 
'-' + LongName +
'-' + ManufacturerCode +
'-' + GPCat1,
'®',''),'.',''),'/','_'),',',''),'& ',''),' ','_'),'&','_'),'™',''),':',''),'>',''),'<',''),'%','_') +
'-ct.html' as loc,
'hourly' as changefreq
from ( SELECT DISTINCT b.ManufacturerName, c.LongName, b.ManufacturerCode, c.GPCat1
        FROM  MDCART_products AS a INNER JOIN MDCART_Manufacturers AS b ON a.ManufacturerCode = b.ManufacturerCode INNER JOIN 
                MDCART_CategoriesGP AS c ON a.gpcat1 = c.GPCat1 
        where ManufacturerName is not null and LongName is not null and description is not null and b.ManufacturerCode is not null and c.GPCat1 is not null and Visable =1 
        and LEFT(c.GPCat1,2) in (select distinct LEFT(gpcat1,2) cats  from MDCART_products where active = -1 and gpcat1 is not null)) as a1
order by ManufacturerName, LongName 
for xml raw('url'), ELEMENTS)
 
SET @strXML_mdcategory_brand= '<?xml version="1.0" encoding="UTF-8"?>
<urlset      xmlns="http://www.sitemaps.org/schemas/sitemap/0.9"      xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"      xsi:schemaLocation="http://www.sitemaps.org/schemas/sitemap/0.9            http://www.sitemaps.org/schemas/sitemap/0.9/sitemap.xsd">'
+ CONVERT(varchar(MAX),@x_mdcategory_brand) + '</urlset>'
 
--MD AQUARIUM PAGE FEED
DECLARE @x_mdaquarium xml
DECLARE @strXML_mdaquarium varchar(MAX)
SET @x_mdaquarium=(
 
select  --top 250 
'http://www.marinedepot.com/' + replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(idPage, ' - ', '_'),'-','_'),
'®',''),'.',''),'/','_'),',',''),'& ',''),' ','_'),'&','_'),'™',''),':',''),'>',''),'<',''),'%','_') +
'-ap.html' as loc,
'daily' as changefreq
from MDCART_Aquarium_Page
order by idPage
for xml raw('url'), ELEMENTS)
 
SET @strXML_mdaquarium= '<?xml version="1.0" encoding="UTF-8"?>
<urlset      xmlns="http://www.sitemaps.org/schemas/sitemap/0.9"      xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"      xsi:schemaLocation="http://www.sitemaps.org/schemas/sitemap/0.9            http://www.sitemaps.org/schemas/sitemap/0.9/sitemap.xsd">'
+ CONVERT(varchar(MAX),@x_mdaquarium) + '</urlset>'
------- OUTPUT
exec xp_cmdshell 'del \\servername\sitemappath\SiteMaps\*.xml', no_output
exec spWriteStringToFile @strXML_psproduct, '\\sangbe\WWW_Live\petstore.com\IMD\SiteMaps', 'utf16-psproduct.xml'
exec spWriteStringToFile @strXML_pscategory, '\\sangbe\WWW_Live\petstore.com\IMD\SiteMaps', 'utf16-pscategory.xml'
exec spWriteStringToFile @strXML_pscategory_brand, '\\sangbe\WWW_Live\petstore.com\IMD\SiteMaps', 'utf16-pscategory_brand.xml'
exec spWriteStringToFile @strXML_mdproduct, '\\sangbe\WWW_Live\petstore.com\IMD\SiteMaps', 'utf16-mdproduct.xml'
exec spWriteStringToFile @strXML_mdcategory, '\\sangbe\WWW_Live\petstore.com\IMD\SiteMaps', 'utf16-mdcategory.xml'
exec spWriteStringToFile @strXML_mdcategory_brand, '\\sangbe\WWW_Live\petstore.com\IMD\SiteMaps', 'utf16-mdcategory_brand.xml'
exec spWriteStringToFile @strXML_mdaquarium, '\\sangbe\WWW_Live\petstore.com\IMD\SiteMaps', 'utf16-mdaquarium.xml'
exec xp_cmdshell 'C:\Unifier\xunifier.exe /c "\\servername\sitemappath\SiteMaps\config1.ucp" /l "\\servername\sitemappath\SiteMaps\sitemapconversion.log" /y "\\servername\sitemappath\SiteMaps\utf16*.xml"', no_output
exec xp_cmdshell 'rename \\servername\sitemappath\SiteMaps\output_utf16-psproduct.xml psproduct.xml', no_output
exec xp_cmdshell 'rename \\servername\sitemappath\SiteMaps\output_utf16-pscategory.xml pscategory.xml', no_output
exec xp_cmdshell 'rename \\servername\sitemappath\SiteMaps\output_utf16-pscategory_brand.xml pscategory_brand.xml', no_output
exec xp_cmdshell 'rename \\servername\sitemappath\SiteMaps\output_utf16-mdproduct.xml mdproduct.xml', no_output
exec xp_cmdshell 'rename \\servername\sitemappath\SiteMaps\output_utf16-mdcategory.xml mdcategory.xml', no_output
exec xp_cmdshell 'rename \\servername\sitemappath\SiteMaps\output_utf16-mdcategory_brand.xml mdcategory_brand.xml', no_output
exec xp_cmdshell 'rename \\servername\sitemappath\SiteMaps\output_utf16-mdaquarium.xml mdaquarium.xml', no_output
exec xp_cmdshell 'del \\servername\sitemappath\SiteMaps\utf16*.xml', no_output
END

Finally this last snippet shows the syntax I used for pinging the biggest search engines to let them know I’ve updated my sitemap. I have a SQL job that runs nightly. It first executes this SP, then pings each search engine. Below is a sample for Google. Just create a step in your job formatted like you see below to run this javascript.

var WebAddress = "http://www.google.com/webmasters/tools/ping?sitemap=http://www.marinedepot.com/sitemapfolder/mdaquarium.xml";
function main()
{
    var xmlHttpRequest = CreateObject("Microsoft.XMLHTTP");   
    xmlHttpRequest.open("GET", WebAddress, false);
}
 
var WebAddress2 = "http://www.google.com/webmasters/tools/ping?sitemap=http://www.marinedepot.com/sitemapfolder/mdaquarium.xml";
function main2()
{
    var xmlHttpRequest2 = CreateObject("Microsoft.XMLHTTP");   
    xmlHttpRequest2.open("GET", WebAddress2, false);
}
 
var WebAddress3 = "http://www.google.com/webmasters/tools/ping?sitemap=http://www.marinedepot.com/sitemapfolder/mdcategory_brand.xml";
function main3()
{
    var xmlHttpRequest3 = CreateObject("Microsoft.XMLHTTP");   
    xmlHttpRequest3.open("GET", WebAddress3, false);
}
 
var WebAddress4 = "http://www.google.com/webmasters/tools/ping?sitemap=http://www.marinedepot.com/sitemapfolder/mdproduct.xml";
function main4()
{
    var xmlHttpRequest4 = CreateObject("Microsoft.XMLHTTP");   
    xmlHttpRequest4.open("GET", WebAddress4, false);
}
 
var WebAddress5 = "http://www.google.com/webmasters/tools/ping?sitemap=http://www.petstore.com/sitemapfolder/pscategory.xml";
function main5()
{
    var xmlHttpRequest5 = CreateObject("Microsoft.XMLHTTP");   
    xmlHttpRequest5.open("GET", WebAddress5, false);
}
 
var WebAddress6 = "http://www.google.com/webmasters/tools/ping?sitemap=http://www.petstore.com/sitemapfolder/pscategory_brand.xml";
function main6()
{
    var xmlHttpRequest6 = CreateObject("Microsoft.XMLHTTP");   
    xmlHttpRequest6.open("GET", WebAddress6, false);
}
 
var WebAddress7 = "http://www.google.com/webmasters/tools/ping?sitemap=http://www.petstore.com/sitemapfolder/psproduct.xml";
function main7()
{
    var xmlHttpRequest7 = CreateObject("Microsoft.XMLHTTP");   
    xmlHttpRequest7.open("GET", WebAddress7, false);
}

Sean McWherter's Blog