Windows_Router Memo/MSSQL2014 Express のバックアップ(No.3)

バックアップ一覧
差分を表示
現在との差分を表示
ソースを表示
Windows_Router Memo/MSSQL2014 Express へ行く。
- 1 (2015-01-31 (土) 08:31:38)
- 2 (2015-01-31 (土) 08:32:12)
- 3 (2015-02-01 (日) 00:25:30)
- 4 (2015-02-01 (日) 04:13:11)
- 5 (2015-02-01 (日) 09:49:15)

MSSQL 2014 Express †

更新日2016-03-06 (日) 09:30:20

↑

ユーザによるアクセス権制御 †

条件

ユーザ認証はWindows認証

以下のように設定するとADグループの営業部に属するメンバーがデータベースTESTを Read/Writeできる。

ロールメンバーシップpublicはすべてが属し消すことができない

スキーマ：テーブル、ビュー、および制約などのSQLオブジェクトの集まりである
dbo(データベースオーナ):データベース作成者名でsaで作成した場合のスキーマ名

↑

Excel VBAからアクセス †

ホスト:WIN2008R2SQL
DB名:SQLEXPRESS
DB:TEST
テーブル:Table_1
認証：Windows認証
表示場所:Sheet2のA1から

Private Sub CommandButton21_Click()

' Create a connection object.
Dim cnPubs As ADODB.Connection
Set cnPubs = New ADODB.Connection

' Provide the connection string.
Dim strConn As String

'Use the SQL Server OLE DB Provider.
strConn = "PROVIDER=SQLOLEDB;"

'Connect to the Pubs database on the local server.
' SOURCE=(ホストサーバ名)\(データベースサーバ名);INITIAL CATALOG=(データベース);"
'strConn = strConn & "DATA SOURCE=(local);INITIAL CATALOG=pubs;"
strConn = strConn & "DATA SOURCE=WIN2008R2SQL\SQLEXPRESS;INITIAL CATALOG=TEST;"

'Use an integrated login.
'Windows認証 "INTEGRATED SECURITY=sspi" こちらがよい
'OR "Trusted_Connection = Yes"でもWindows認証OKみたい
strConn = strConn & " INTEGRATED SECURITY=sspi;"

'Now open the connection.
cnPubs.Open strConn

'--------------------------

' Create a recordset object.
Dim rsPubs As ADODB.Recordset
Set rsPubs = New ADODB.Recordset

With rsPubs
    ' Assign the Connection object.
    .ActiveConnection = cnPubs
    ' Extract the required records.(SQLの発行)
    
    '.Open "SELECT * FROM Authors"
    .Open "SELECT * FROM Table_1 Where ID=3"
    ' Copy the records into cell A1 on Sheet1.
    Sheet2.Range("A1").CopyFromRecordset rsPubs
    
    ' Tidy up
    .Close
End With

cnPubs.Close
Set rsPubs = Nothing
Set cnPubs = Nothing

End Sub

↑

Excelにインポート †

その他のデータソース→SQLサーバ

サーバ名:WIN2008R2SQL\SQLEXPRESS
Windows認証を使用する

使用するデータが含まれているデータベースを選択：TEST
指定したテーブルに接続（チェック）

接続ファイル名：このファイルを実行すると同じことができる
フレンドリ名：WIN2008R2SQL_SQLEXPRESS TEST Table_1

完了