% set Conn = server.createObject ("ADODB.connection") connString = "DRIVER={MySQL ODBC 3.51 Driver}; SERVER=localhost; DATABASE=andan2_andanolive; UID=andan2_bjs;PASSWORD=bilbo1; OPTION=3" Conn.Open(connString) SQL = "SELECT * FROM Startup WHERE Page = 'Home'" Set RS = Conn.Execute(SQL) HomePageText = RS("Article") RS.Close Set RS = Nothing Conn.Close Set Conn = Nothing %>
|