<%Set DataConn = Server.CreateObject("ADODB.Connection")
DataConn.Open "Provider=SQLOLEDB;SERVER=200.234.197.44;DATABASE=bolsacar;UID=bolsacar_data;PWD=b0ls4m01;"
Set RsMontadora = DataConn.execute("Select * from fabricantes order by Nome_Fabricante Asc")
%>