<%@LANGUAGE="VBSCRIPT"%> <% ' FileName="Connection_ado_conn_string.htm" ' Type="ADO" ' DesigntimeType="ADO" ' HTTP="false" ' Catalog="" ' Schema="" Dim MM_strConn_STRING MM_strConn_STRING = "PROVIDER=SQLOLEDB.1;SERVER=.;UID=cuid;PWD=M@du7l@;DATABASE=ewis" set conn = Server.CreateObject("ADODB.Connection") conn.open MM_strConn_STRING %> E-W Information Systems Ltd.
 
<% Dim rs_news_s Dim rs_news_s_numRows Set rs_news_s = Server.CreateObject("ADODB.Recordset") rs_news_s.ActiveConnection = MM_strConn_STRING rs_news_s.Source = "SELECT TOP 10* FROM dbo.ewis_news_events ORDER BY newsID DESC " rs_news_s.CursorType = 2 rs_news_s.CursorLocation = 2 rs_news_s.LockType = 3 rs_news_s.Open() %>
  Financial Services
  Telecommunication
  Government Sector
  Travel & Transportation
  Retail / Manufacturing
  Hospitality
  Education
  Healthcare
  Utilities
 
 
  © 2009 E-W Information Systems Ltd. All Rights Reserved.