<%@ Language=VBScript %> <% Response.Buffer=True%> <% Set conn = Server.CreateObject("ADODB.Connection") ConnStr = "DSN=ahma;UID=Admin" Conn.Open ConnStr 'Response.Write "In Here" 'Response.End %> <% strPageID = "GPOindex" mySQL = "SELECT * FROM MetaTags WHERE PageName = '" mySQL = mySQL + strPageID mySQL = mySQL + "' AND Type = 1 " Set RS1 = Server.CreateObject("ADODB.RecordSet") 'Response.Write "
" + mbrSQL 'Response.End set RS1 = Conn.Execute(mySQL) strTitle = "American Hardware Manufacturers Association (AHMA)" strKeywords = "Hardware, Manufacturers, Association, American, AHMA, Hardlines" strDescription = "The American Hardware Manufacturers Association mission is to be the worlds leading resource on and about the U.S. manufacturing segment of the worldwide consumer hardware/home improvement marketplace." do Until RS1.EOF strTitle = RS1("Title") strKeywords = RS1("Keywords") strDescription = RS1("Description") RS1.movenext Loop %> <% conn.Close Set conn = Nothing %> <% Set conn = Server.CreateObject("ADODB.Connection") ConnStr = "DSN=ahmaNOTD;UID=Admin" Conn.Open ConnStr %> <% mySQL = "SELECT * FROM NewsOfTheDay ORDER BY ID DESC " 'Response.Write mySQL 'Response.End if mySQL <> "" then ' Response.Write " I made it into the program and here is my SQL: " ' Response.Write "
" + mySQL ' Response.End Set RSdata = Server.CreateObject("ADODB.RecordSet") 'Response.Write "
" + mySQL 'Response.End set RSdata = Conn.Execute(mySQL) end if If NOT RSdata.EOF then strDept = RSdata("ID") End If 'Response.Write "
Dept " & strDept 'Response.End %> <% conn.Close Set conn = Nothing %> AHMA / USA Pavilion International Hardware Fair / Practical World

H. D. Hudson Asia Ltd.

H. D. Hudson Asia Ltd. is a subsidiary of “Hudson USA”. Manufacturing facilities for “Hudson” Brand Sprayers are located in USA and China. We are a designer and manufacturer of “Hudson” brand Sprayers which includes - Compression, Backpack, Battery Operated, Hand, Trolley, Foam, Bleach
EZ Applicator Deck & Fence Staining System, Trombone.


Follow Us on Connect on Sign Up for AHMA Updates

© 2010 American Hardware Manufacturers Association. All Rights Reserved.