[Code]
<%@ Import Namespace="System.Data.OleDb" %>
<Script Runat="server"> ' ---------- ' ----- ' Make Database Connection ' ----- ' ---------- Dim DatabaseSQLConnection As String = "Provider=SQLOLEDB; Data Source=SERVERNAME\SQLSERVER; Initial Catalog=YOURDATABASE; User Id=USERNAME; Password=PASSWORD;" Dim DatabaseConnection = New OleDbConnection(DatabaseSQLConnection) DatabaseConnection.Open() ' ---------- ' ----- ' Now Connect To Your Table By Running A SQL Command ' ----- ' ---------- Dim DatabaseSQL As String = "SELECT * FROM [YourTable]" Dim DatabaseCommand = New OleDbCommand(DatabaseSQL, DatabaseConnection) Dim DatabaseRead As OleDbDataReader = DatabaseCommand.ExecuteReader() ' ---------- ' ----- ' Done ' ----- ' ---------- ' ---------- ' ----- ' Now Generate The Results From Your Table ' ----- ' ---------- While DatabaseRead.Read() Response.Write ("<p>" & DatabaseRead("YourColumnNameInTable") & "</p>") End While ' ---------- ' ----- ' Done ' ----- ' ---------- ' ---------- ' ----- ' Now Terminate Your Table Connection ' ----- ' ---------- DatabaseRead.Close() ' ---------- ' ----- ' Done ' ----- ' ---------- ' ---------- ' ----- ' Finally Terminate Your Database Connection ' ----- ' ---------- DatabaseConnection.Close() ' ---------- ' ----- ' Done ' ----- ' ---------- </Script> |