// 循环取得所有SQL Server服务器

        i := 0;

        j := dwEntriesRead;

        while i < j do

        begin

          if pCurSvrInfo = nil then

            Break;

          with AList do

            Add(pCurSvrInfo^.sv100_name);

          Inc(i);

          Inc(pCurSvrInfo);

        end;

      end;

    finally

      if Assigned(pReturnSvrInfo) then

        NetApiBufferFree(pReturnSvrInfo);

    end;

  except

    Result := False;

  end;

end;

三、      SQLBrowseConnect

描述：ODBC函数（Microsoft Open Database Connectivity，开放式数据库连接），存在于odbc32.dll文件中；通过SQLBrowseConnect函数可返回连接字符串信息，包括DSN、DRIVER、SERVER、UID、PWD、APP、WSID、DATABASE、LANGUAGE等信息。在函数GetODBCInfo 中传入itServer、itDatabase、itLanguage可分别取得“服务器”、“数据库”及“语言”等信息列表，其中itDatabase、itLanguage默认取本地信息，取远程信息请自行修改“''''Driver={SQL Server};SERVER=(local);UID=sa;PWD=''''”连接字符串。

列表类型：列举装有“客户端”和“服务端”的计算机。

适用条件：由于MDAC 2.6 、2.6 SP1、2.7和Microsoft ODBC Driver for SQL Server 2000

上一页  [1] [2] [3] [4] [5] [6] [7] [8]  下一页