TECHS のデータを読むための
「読み取り専用ログイン」作成手順

$pw = Read-Host "ff_readonly のパスワード" -AsSecureString
New-LocalUser -Name 'ff_readonly' -Password $pw -PasswordNeverExpires -AccountNeverExpires `
  -Description '生産管理システム連携用（読み取り専用）'

-- ① Windows アカウントを「ログイン」として登録（パスワードは SQL 側で持ちません）
USE [master];
GO
CREATE LOGIN [TECHS-SERVER\ff_readonly] FROM WINDOWS
    WITH DEFAULT_DATABASE = [TECHS6];
GO

-- ② TECHS6 で「読むだけ」の権限
USE [TECHS6];
GO
CREATE USER [TECHS-SERVER\ff_readonly] FOR LOGIN [TECHS-SERVER\ff_readonly];
GO
ALTER ROLE [db_datareader] ADD MEMBER [TECHS-SERVER\ff_readonly];
GO

-- ③ 念のため書き込みを明示的に禁止
DENY INSERT, UPDATE, DELETE TO [TECHS-SERVER\ff_readonly];
GO

-- 【事前確認】設定は変更しません。調べるだけです。

-- ① 認証モード
SELECT CASE SERVERPROPERTY('IsIntegratedSecurityOnly')
         WHEN 1 THEN N'△ Windows認証のみ → 別紙の設定が必要'
         ELSE N'○ 混在モード → このまま進めます' END AS [1_認証モード];
GO

-- ② TCP/IP とポート番号
--    ループバック(127.0.0.1 / ::1)を除外しています。TCP/IP を無効にしても
--    管理用接続(DAC)がループバックの1434で待ち受けたままになるため、
--    除外しないと「TCP有効・ポート1434」と誤って表示されます。
SELECT CASE WHEN EXISTS (SELECT 1 FROM sys.dm_tcp_listener_states
                          WHERE type_desc = 'TSQL' AND state_desc = 'ONLINE'
                            AND ip_address NOT IN ('127.0.0.1', '::1'))
         THEN N'○ 有効' ELSE N'△ 無効 → 別紙の設定が必要' END AS [2_TCP接続],
       (SELECT TOP 1 CAST(port AS nvarchar(10))
          FROM sys.dm_tcp_listener_states
         WHERE type_desc = 'TSQL' AND state_desc = 'ONLINE'
           AND ip_address NOT IN ('127.0.0.1', '::1')
         ORDER BY is_ipv4 DESC) AS [3_ポート番号];
GO

-- ③ ポート番号が固定か自動か
--    「自動」の場合、サーバーを再起動するたびに番号が変わります。今は
--    つながっても、次にサーバーを再起動した日に夜間同期が止まります。
DECLARE @dyn nvarchar(50), @static nvarchar(50);
EXEC master.dbo.xp_instance_regread N'HKEY_LOCAL_MACHINE',
     N'Software\Microsoft\MSSQLServer\MSSQLServer\SuperSocketNetLib\Tcp\IPAll',
     N'TcpDynamicPorts', @dyn OUTPUT;
EXEC master.dbo.xp_instance_regread N'HKEY_LOCAL_MACHINE',
     N'Software\Microsoft\MSSQLServer\MSSQLServer\SuperSocketNetLib\Tcp\IPAll',
     N'TcpPort', @static OUTPUT;
SELECT CASE WHEN ISNULL(@static, '') <> '' THEN N'○ 固定'
            WHEN ISNULL(@dyn, '')    <> '' THEN N'△ 自動（再起動で変わる）→ 別紙の設定が必要'
            ELSE N'－ 判定できませんでした' END AS [4_ポート種別];
GO

-- ④ サーバーの情報
SELECT @@SERVERNAME                                        AS [5_サーバー名],
       ISNULL(CAST(SERVERPROPERTY('InstanceName') AS nvarchar(128)),
              N'（既定のインスタンス）')                    AS [6_インスタンス名],
       CAST(SERVERPROPERTY('ProductVersion') AS nvarchar(32)) AS [7_バージョン];
GO

-- ⑤ データベースの一覧（TECHS6 があるか確認）
SELECT name AS [8_データベース名]
  FROM sys.databases
 WHERE database_id > 4
 ORDER BY name;
GO

-- ① サーバーに「ログイン」を作る
USE [master];
GO
CREATE LOGIN [ff_readonly]
    WITH PASSWORD = N'ここに決めたパスワードを入れる',
         DEFAULT_DATABASE = [TECHS6],
         CHECK_EXPIRATION = OFF,
         CHECK_POLICY = ON;
GO

-- ② TECHS6 で「読むだけ」の権限を与える
USE [TECHS6];
GO
CREATE USER [ff_readonly] FOR LOGIN [ff_readonly];
GO
ALTER ROLE [db_datareader] ADD MEMBER [ff_readonly];
GO

-- ③ 念のため、書き込みを明示的に禁止する
DENY INSERT, UPDATE, DELETE TO [ff_readonly];
GO

USE [TECHS6];
SELECT r.name AS [権限], m.name AS [利用者]
FROM sys.database_role_members rm
JOIN sys.database_principals r ON rm.role_principal_id = r.principal_id
JOIN sys.database_principals m ON rm.member_principal_id = m.principal_id
WHERE m.name = 'ff_readonly';

# 下の3つを、手順4の結果の値に書き換えてください
$server   = "TECHS-SERVER"
$port     = "1433"
$database = "TECHS6"

$pw = Read-Host "ff_readonly のパスワードを入力" -AsSecureString
$plain = [Runtime.InteropServices.Marshal]::PtrToStringAuto(
           [Runtime.InteropServices.Marshal]::SecureStringToBSTR($pw))
# tcp: を付けるのが重要です。付けないと、サーバー機の上で実行したときに
# ネットワークを使わない接続(共有メモリ)になり、TCP が無効でも「成功」して
# しまいます。テストの意味がなくなります。
$cs = "Data Source=tcp:$server,$port;Initial Catalog=$database;User ID=ff_readonly;" +
      "Password=$plain;Encrypt=True;TrustServerCertificate=True;Connect Timeout=10"
try {
  $conn = New-Object System.Data.SqlClient.SqlConnection $cs
  $conn.Open()
  $cmd = $conn.CreateCommand()
  $cmd.CommandText = "SELECT COUNT(*) FROM sys.tables"
  Write-Host "○ 成功しました。読み取れたテーブル数:" $cmd.ExecuteScalar() -ForegroundColor Green
  $conn.Close()
} catch {
  Write-Host "× 失敗しました:" $_.Exception.Message -ForegroundColor Red
}

USE [TECHS6];
GO
DROP USER [ff_readonly];
GO
USE [master];
GO
DROP LOGIN [ff_readonly];
GO