More Snowmobile Links
Sledfreak.com Fun online snowmobile community based in PA
Canada's top hunting & fishing outfitters
Arctiva - Complete line of premium snowmobile clothing.
Bender Racing - Yamaha Performance Products
Bikeman Performance - Performance shop/ Engine work
Black Magic Racing - Actic Cat performance parts
Boss Seats - An aftermarket lightweight seat manufacturer.
Bottom Line Traction - Traction Products
Boyesen - RAD Valves for Polaris and Arctic Cat
Camoplast -Tracks - Challenger, Predator, Adventure
Snow Hawk - Manufacturers of the Snow Hawk
SnowmobileWorld.com - Snowmobile Enthusiast site
maximumsled.com - Snowmobile Enthusiast site
SnowmobileFanatics.com - Snowmobile Enthusiast site
AD Boivin - "Expert" Suspension, ETS upgrade kits for Arctic Cat & Ski-Doo C-7 & SC-10
Advant-edge Motorsport - Premium Yamaha Upgrades
All Sport Polaris - Polaris Performance Shop specializing in Western/Mountain applications.
Advanced Racing Technologies - Quality Engine Work - Boring & honing, re-sleeving, porting, etc . . .
C&A Pro -High performance skis, Penske shocks & Hi-Tech Performance clutching upgrades
Carbon Tech - Carbon Fiber Reeds
Collett Electronics - Helmet communicaton radios
Crazy Mountain Extreme - Mountain Sled Manufacturer
Rox speedfx.com - Running board traction devices, bar risers, graphics kits, handguards
Dayco - Snowmobile drive belts
Dennis Kirk - Snowmobile Catalog Retailer
Depot Star - Kwik Klamp Sled Tie Downs
Dalton Industries - Clutching experts - race & trail
D&D - Performance Parts and Services for Snowmobiles
Dennis Kirk - Snowmobile Parts & Accessories
Diamond S Manufacturing - Titanium Tube Chassis, and Lightweight Hoods
Dyna Slides - Grooved hyfax
Dyno Port- Pipe Manufacturing and Sales - Performance Products
Energy Release - Antifriction Engine & Metal Conditioners
Engine-Tech - Engine Shop - Engine Mods
Erlandson Performance - Clutch Kits and Performance Products
Exhaust Gas Technologies - Snowmobile instruments
Fett Brothers Performance - Twin cylinder specialists - after market products
Fast - Blade snowmobile, M-10 suspension, BLT front suspensions
FastTrac - Traction Products
Floe International - Trailers and Enclosures
Frontier Films - 2 Stroke Cold Smoke Movies - Snowmobile action movies
Fuel Pack - Saddle bag fuel tanks
FXR - Snowmobile Clothing
Gates - Snowmobile drive belts
Guyco Industries - Hot Shots Electric Foot heaters for Snowmobiling! Can be trimmed to fit all boot sizes.
Goodwin Performance - Clutch kits & tuning, shock specialists, wide range of aftermarket parts
Grip N Rip Racing - Iso Vibe, Handlebar Anti-Vibe Inserts, Tank Tamer - a padded tank cover for Y2K Cats with the "big" tank.
Haydays Grass Drags - The SNO-BARONS Haydays Grass Drags in Lino Lakes, MN
High Performance Engineering - Parts, Accessories, and Performance Products for all four brands.
Hi-Tech Performance - Clutching Upgrades
Holtzman Engineering- Vari Flow, Tempa Flow, and Dyna Flow carburetor modifications
Hotseat Performance - Performance Products for Polaris
Husky Fabrication - Tire mounts for your enclosed trailer
Holz Racing Products - Performance Products
Klim Aggressive Sled Wear- Performance Products
Kinetic - Balancing and Machining, Clutches, handlebar riser kits, left hand throttles
LA Sleeve - Cylinder Sleeving
Lefty's - Left hand throttle kits
Land & Sea - "DynoMite" Engine Dyno
Mar-Lift - Snowmobile Lifts
Maxima Racing Oils- Performance, and racing lubrications
MCB - Traction and other Snowmobile Products.
Micro Belmont Engineering - Performance Clutching
Moto tassinari - VForce 3 Reeds
Maxima Products - High Performance Engine Lubricants & Products
Millenium Technologies - Cylinder Repair
MBRP - Silencers, Wide Kits, Torque Rods, Performance Products
Mountain Performance, Inc. - Performance Products and Services for Yamaha
mxzx-revzone.com - Clutch Kits for Ski-Doos
Northern Lites- Lightweight / High Performance Aftermarket Products
Outlaw Composites - Lightweight hoods
Parts Unlimited - Everything Snowmobiling
Performance Engineering- Custom Billet Parts - Hyperlite clutch, Belt Drive, and billet wheels
Precision Performance Products - Snowmobile Performance Products and Services
Pro - Vue - Prescription Goggle Lenses
PSI Performance - Snowmobile Performance Products and Services
R&L Company - Track Punching
Ripco - Handleballs
RydeFX - Shocks and Ryde FX Products
R.U. Outside - Winter Clothing
RWS Distribution - Snowbobile Lift
RV Sports - Arctic Cat parts, accessories, clothing
Simmons, Inc. - Plastic "Flexi" Skis
Saber Traction - Traction Products
Simon's CPR- Clutch Kits, Trail Pipes, Porting and Big Bores
Stalker Radar - Radar equipment
Snoclamp - Snowmobile Lock Down system for trailering and storing.
Sno-Stuff - Snowmobile accessories
SNOMO-GEAR - Snowmobile Catalog Retailer
Sno-Tek Components - New Steering and Suspension Systems and other Performance Products
Snowmobile USA - Show and Sale - Snowmobile shows
Speedwerx - Pipes, and Clutch Kits
Specialty Sleds - REV Long Track Kits, and other Snowmobile products, and kits
Survival On Snow - Winter Survival Equipment
Super Torquer Systems, Inc. - Heel Clicker Flyweights and Clutch Kit
Specialty Sleds - Custom Mtn Sleds, and specialty parts
Sportech - Windshields, bags, & many other snowmobile accessories
Starting Line Products - Pipes, Skis, Accessories, parts & services
Straightline Performance - Clutch Kits, Crank repairing and Rebuilding - engine Mods
Swain Tech Coatings - Ceramic Coating and Performance Engine Products
Thunder Products - Thunder "Heavy Hitter" Shift Kit, Dial-A-Jet, UFO Carb upgrade
Timbersled Products - Barkbusters - All new trailing arm and spindle design.
Tison Performance - M-10 Billet Arms, Titanium Springs, Mountain and High Performance Sleds.
Torco - Racing Oils
Tracks U.S.A. (Bruce Vruwink Sno-Parts) - Low prices on Camoplast tracks
TSR - Two Stroke Engine Hop-UP Software
Union Bay Racing - Billet Series Motors - Ski-Doo, Polaris, Yamaha
US Chrome - High Performance Aluminum Cylinder Repair
VibraTech - Harmonic Fluid Dampers for crankshaft
Vintagesleds.com - Everything you ever wanted to know about old snowmobiles but where afraid to ask.
Wells Cargo - Enclosed Trailers
Wiseco - High Performance Pistons
Woody's - Traction Products
WSA Racing - Racing Federation
<% ' # THE FOLLOWING BLOCK IS USED TO RETRIEVE AND DISPLAY LINK INFORMATION. ' # PLACE THIS ENTIRE BLOCK IN THE AREA YOU WANT THE DATA TO BE DISPLAYED. ' # Dimensioning variables - DO NOT MODIFY! Dim UserKey Dim ThisPage Dim CategoryColumns Dim LinksPerPage Dim OpenInNewWindow Dim PostingString Dim PassedQuery Dim AllowSearch Dim ErrorString Dim ResultString ' # // Finished dimensioning variables. ' # MODIFY THE VARIABLES BELOW: ' # Enter your user key below (provided to you by LinksMaster.com): UserKey = "811127162005-PN4AWNQ0AZ" ' # The following variable defines how many columns are used to display categories CategoryColumns = 2 ' # The following variable defines how many links to display per page LinksPerPage = 25 ' # The following variable defines whether links are opened in a new window ' # (1 = Yes, 0 = No) OpenInNewWindow = 1 ' # The following variable determines whether the search function is enabled ' # for your links page (1 = Yes, 0 = No) AllowSearch = 1 ' # DO NOT MODIFY ANYTHING IN THIS BLOCK!! ' --------------------------------------------------------------------------------- ' # The following variable is sent to the LinksMaster server in order to ' # generate working links on your page: ThisPage = Request.ServerVariables("SCRIPT_NAME") ' # Generate the data to post to the LinksMaster.com server PostingString = "UserKey=" & UserKey PostingString = PostingString & "&ScriptName=" & ThisPage PostingString = PostingString & "&CatCols=" & CategoryColumns PostingString = PostingString & "&LinksPerPage=" & LinksPerPage PostingString = PostingString & "&OpenInNewWindow=" & OpenInNewWindow PostingString = PostingString & "&AllowSearch=" & AllowSearch ' # pass through any querystring data to LinksMaster to allow paging PassedQuery = Request.QueryString ' --------------------------------------------------------------------------------- If GetLinksMasterData(PassedQuery, PostingString, ResultString, ErrorString) Then Response.Write ResultString Else ' here we are just dumping error info to the page. You can clean this up to ' fit your site Response.Write ErrorString End If Function GetLinksMasterData(strQuery, strPost, ByRef strResponse, ByRef strError) Dim hObj Dim ComponentString Set hObj = Nothing On Error Resume Next Set hObj = Server.CreateObject("WinHttp.WinHttpRequest.5.1") ComponentString = "" & vbCrLf On Error Resume Next If hObj Is Nothing Then Set hObj = Server.CreateObject("WinHttp.WinHttpRequest.5") ComponentString = "" & vbCrLf End If On Error Resume Next If hObj Is Nothing Then If TryMSXML(strQuery, strPost, strResponse, strError) Then ' the MSXML function will return the data GetLinksMasterData = True Else ' we don't need to supply error information, since the error string ' is passed ByRef, the MSXML function will supply the data GetLinksMasterData = False End If Else hObj.Open "POST", "http://www.LinksMaster.com/bin/dumplinks.asp?" & strQuery, False hObj.SetRequestHeader "Content-type", "application/x-www-form-urlencoded" hObj.Send strPost If hObj.Status <> 200 Then strError = "Error: Status=" & hObj.Status & " Text=" & hObj.ResponseText GetLinksMasterData = False Else strResponse = ComponentString & hObj.responseText GetLinksMasterData = True End If End If End Function Function TryMSXML(strQuery, strPost, ByRef strResponse, ByRef strError) Dim hObj Set hObj = Nothing ' let's see if the server supports the XMLHTTP component, various versions On Error Resume Next Set hObj = Server.CreateObject("Msxml2.ServerXMLHTTP") ComponentString = "" & vbCrLf On Error Resume Next If hObj Is Nothing Then Set hObj = Server.CreateObject("Msxml2.ServerXMLHTTP.4.0") ComponentString = "" & vbCrLf End If On Error Resume Next If hObj Is Nothing Then Set hObj = Server.CreateObject("Microsoft.XMLHTTP") ComponentString = "" & vbCrLf End If On Error Resume Next If hObj Is Nothing Then strError = "No support for HTTP requests found." TryMSXML = False Else ' # Open connection to LinksMaster.com server, sending the UserKey information via POST ' # Also, pass through the querystring information (contains category, link information) hObj.open "POST", "http://www.LinksMaster.com/bin/dumplinks.asp?" & strQuery, false hObj.setRequestHeader "Content-type", "application/x-www-form-urlencoded" hObj.Send strPost If hObj.status <> 200 Then ' # error! strError = "Error: Status=" & hObj.status & " Text='" & hObj.responseText & "'" TryMSXML = False Else ' # We should have received the links information from the server, ' # the following line will return the data by reference: strResponse = ComponentString & hObj.responseText TryMSXML = True End If Set hObj = Nothing End If End Function ' # //FINSIHED LinksMaster.COM SCRIPT BLOCK %>