<% set OBJdbConn = Application("ncw") cnt = -1 Set field = OBJdbConn.Execute("ncw_dev.ticker_get 4") Do While Not field.EOF cnt = cnt + 1 redim preserve desc(cnt), desturl(cnt), size(cnt), style(cnt), textcolor(cnt), loadwhere(cnt) desc(cnt)=field("text") desturl(cnt)=field("desturl") size(cnt)=field("fontsize") style(cnt)=field("style") textcolor(cnt)=field("color") loadwhere(cnt)=field("loadwhere") field.MoveNext Loop field.Close Set field = Nothing %>
www.NCwaterways.com
Business Assistance
Marinas & Boatyards
Boat Builders
Marine Construction
Other Marine Businesses
Notices - News &
TradeWinds
Training & Certification
Find Legislators
Manufacturing Help Links
Boat Builders
