THE FOLLOWING EXAMPLE SHOWS WHAT A SIMPLE ADO.NET APPLICATION THAT CONNECTS TO THE NORTHWIND DATABASE AND RETURNS A LIST OF CATEGORIES WOULD LOOK LIKE. THE EXAMPLE WRITES THE OUTPUT TO THE CONSOLE, OR COMMAND PROMPT.
THE FOLLOWING EXAMPLE SHOWS WHAT A SIMPLE ADO.NET APPLICATION THAT CONNECTS TO THE NORTHWIND DATABASE AND RETURNS A LIST OF CATEGORIES. THE EXAMPLE WRITES THE OUTPUT TO THE CONSOLE, OR COMMAND PROMPT.
SQLCLIENT [VISUAL BASIC] IMPORTS SYSTEM IMPORTS SYSTEM.DATA IMPORTS SYSTEM.DATA.SQLCLIENT IMPORTS MICROSOFT.VISUALBASIC
PUBLIC CLASS SAMPLE
PUBLIC SHARED SUB MAIN() DIM NWINDCONN AS SQLCONNECTION = NEW SQLCONNECTION("DATA SOURCE=LOCALHOST;" & _ "USER ID=SA;PASSWORD=PWD;INITIAL CATALOG=NORTHWIND")
DIM CATCMD AS SQLCOMMAND = NWINDCONN.CREATECOMMAND() CATCMD.COMMANDTEXT = "SELECT CATEGORYID, CATEGORYNAME FROM CATEGORIES"
NWINDCONN.OPEN()
DIM MYREADER AS SQLDATAREADER = CATCMD.EXECUTEREADER()
DO WHILE MYREADER.READ() CONSOLE.WRITELINE(VBTAB & "{0}" & VBTAB & "{1}", MYREADER.GETINT32(0), MYREADER.GETSTRING(1)) LOOP
MYREADER.CLOSE() NWINDCONN.CLOSE() END SUB END CLASS [C#] USING SYSTEM; USING SYSTEM.DATA; USING SYSTEM.DATA.SQLCLIENT;
CLASS SAMPLE { PUBLIC STATIC VOID MAIN() { SQLCONNECTION NWINDCONN = NEW SQLCONNECTION("DATA SOURCE=LOCALHOST;USER ID=SA;PASSWORD=PWD;INITIAL CATALOG=NORTHWIND");
SQLCOMMAND CATCMD = NWINDCONN.CREATECOMMAND(); CATCMD.COMMANDTEXT = "SELECT CATEGORYID, CATEGORYNAME FROM CATEGORIES";
NWINDCONN.OPEN();
SQLDATAREADER MYREADER = CATCMD.EXECUTEREADER();
WHILE (MYREADER.READ()) { CONSOLE.WRITELINE(" {0} {1}", MYREADER.GETINT32(0), MYREADER.GETSTRING(1)); }
MYREADER.CLOSE(); NWINDCONN.CLOSE(); } } OLEDB [VISUAL BASIC] IMPORTS SYSTEM IMPORTS SYSTEM.DATA IMPORTS SYSTEM.DATA.OLEDB IMPORTS MICROSOFT.VISUALBASIC
PUBLIC CLASS SAMPLE
PUBLIC SHARED SUB MAIN() DIM NWINDCONN AS OLEDBCONNECTION = NEW OLEDBCONNECTION("PROVIDER=SQLOLEDB;DATA SOURCE=LOCALHOST;" & _ "USER ID=SA;PASSWORD=PWD;INITIAL CATALOG=NORTHWIND")
DIM CATCMD AS OLEDBCOMMAND = NWINDCONN.CREATECOMMAND() CATCMD.COMMANDTEXT = "SELECT CATEGORYID, CATEGORYNAME FROM CATEGORIES"
NWINDCONN.OPEN()
DIM MYREADER AS OLEDBDATAREADER = CATCMD.EXECUTEREADER()
DO WHILE MYREADER.READ() CONSOLE.WRITELINE(VBTAB & "{0}" & VBTAB & "{1}", MYREADER.GETINT32(0), MYREADER.GETSTRING(1)) LOOP
MYREADER.CLOSE() NWINDCONN.CLOSE() END SUB END CLASS [C#] USING SYSTEM; USING SYSTEM.DATA; USING SYSTEM.DATA.OLEDB;
CLASS SAMPLE { PUBLIC STATIC VOID MAIN() { OLEDBCONNECTION NWINDCONN = NEW OLEDBCONNECTION("PROVIDER=SQLOLEDB;DATA SOURCE=LOCALHOST;USER ID=SA;PASSWORD=PWD;INITIAL CATALOG=NORTHWIND");
OLEDBCOMMAND CATCMD = NWINDCONN.CREATECOMMAND(); CATCMD.COMMANDTEXT = "SELECT CATEGORYID, CATEGORYNAME FROM CATEGORIES";
NWINDCONN.OPEN();
OLEDBDATAREADER MYREADER = CATCMD.EXECUTEREADER();
WHILE (MYREADER.READ()) { CONSOLE.WRITELINE(" {0} {1}", MYREADER.GETINT32(0), MYREADER.GETSTRING(1)); }
MYREADER.CLOSE(); NWINDCONN.CLOSE(); } }
|