日期:2009-09-09  浏览次数:20538 次

怎么实现这个功能大家肯定早都知道了,放上来是给自己留个备份
使用:


private void button1_Click_1(object sender, System.EventArgs e)...{ string[] servers = DBGrep.SqlLocator.GetServers(); foreach ( string s in servers ) ...{ this.listBox1.Items.Add(s); }}类的代码using System;using System.Text;using System.Windows.Forms;using System.Runtime.InteropServices;namespace DBGrep...{ public class SqlLocator ...{ [DllImport("odbc32.dll")] private static extern short SQLAllocHandle(short hType, IntPtr inputHandle, out IntPtr outputHandle); [DllImport("odbc32.dll")] private static extern short SQLSetEnvAttr(IntPtr henv, int attribute, IntPtr valuePtr, int strLength); [DllImport("odbc32.dll")] private static extern short SQLFreehandle(short hType, IntPtr handle); [DllImport("odbc32.dll",CharSet=CharSet.Ansi)] private static extern short SQLBrowseConnect(IntPtr hconn, StringBuilder inString, short inStringLength, StringBuilder outString, short outStringLength, out short outLengthNeeded); private const short SQL_HANDLE_ENV = 1; private const short SQL_HANDLE_DBC = 2; private const int SQL_ATTR_ODBC_VERSION = 200; private const int SQL_OV_ODBC3 = 3; private const short SQL_SUCCESS = 0; private const short SQL_NEED_DATA = 99; private const short DEFAULT_RESULT_SIZE = 1024; private const string SQL_DRIVER_STR = "DRIVER=SQL SERVER"; private SqlLocator()...{} public static string[] GetServers() ...{ string[] retval = null; string txt = string.Empty; IntPtr henv = IntPtr.Zero; IntPtr hconn = IntPtr.Zero; StringBuilder inString = new StringBuilder(SQL_DRIVER_STR); StringBuilder outString = new StringBuilder(DEFAULT_RESULT_SIZE); short inStringLength = (short) inString.Length; short lenNeeded = 0; try ...{ if (SQL_SUCCESS == SQLAllocHandle(SQL_HANDLE_ENV, henv, out henv)) ...{ if (SQL_SUCCESS == SQLSetEnvAttr(henv,SQL_ATTR_ODBC_VERSION,(IntPtr)SQL_OV_ODBC3,0)) ...{ if (SQL_SUCCESS == SQLAllocHandle(SQL_HANDLE_DBC, henv, out hconn)) ...{ if (SQL_NEED_DATA == SQLBrowseConnect(hconn, inString, inStringLength, outString, DEFAULT_RESULT_SIZE, out lenNeeded)) ...{ if (DEFAULT_RESULT_SIZE < lenNeeded) ...{ outString.Capacity = lenNeeded; if (SQL_NEED_DATA != SQLBrowseConnect(hconn, inString, inStringLength, outString, lenNeeded,out lenNeeded)) ...{ throw new ApplicationException("Unabled to aquire SQL Servers from ODBC driver."); } } txt = outString.ToString(); int start = txt.IndexOf("{") + 1; int len = txt.IndexOf("}") - start; if ((start > 0) && (len > 0)) ...{ txt = txt.Substring(start,len); } else ...{ txt = string.Empty; } } } } } } catch (Exception ex) ...{ //Throw away any error if we are not in debug mode#if (DEBUG) MessageBox.Show(ex.Message,"Acquire SQL Servier List Error");#endif txt = string.Empty; } finally ...{ if (hconn != IntPtr.Zero) ...{ SQLFreehandle(SQL_HANDLE_DBC,hconn); } if (henv != IntPtr.Zero) ...{ SQLFreehandle(SQL_HANDLE_ENV,hconn); } } if (txt.Length > 0) ...{ retval = txt.Split(",".ToCharArray()); } return retval; } }}