|
Täna on liiga kiire päev (kui töölt lahkusin, leidsin eksamiveebilehelt vea, mis polnud viga, mis lihtsalt võimaldas mul leida soovitud andmed, ja nüüd töötan kõvasti, et koodi kirjutada... ) Pole palju öelda, tänane tehniline artikkel, lihtsustatult öeldes, eile kirjutatud SQL-koodi tükk Kasutatakse CREATE-skripti genereerimiseks, mis sisaldab 2. taseme kontosid andmebaasis SQL2012
Stsenaarium on järgmine:
[mw_shl_code=sql,true] KASUTA [master] MINE
/* Tegevjuht usp_addcontaindbuser 'dba_TEST51ak' */ loo proc usp_addcontaindbuser( @dbname Varchar(50)
) kui Sea nocount peal deklareeri @password Varchar(50) deklareeri @password2 Varchar(50) deklareeri @sqlstr varchar(max)
komplekt @password=lower(left(newid(),8)) komplekt @password2=lower(left(newid(),8)) Seade @sqlstr=' --Kirjuta konto number KASUTA ['+@dbname+'] MINE LOO KASUTAJA ['+@dbname+'_cw] PAROOLIGA PASSWORD=N'''+@password+'''', DEFAULT_SCHEMA=[dbo] MINE KASUTA ['+@dbname+'] MINE MUUDA ROLLI [db_datawriter] LISA LIIGE ['+@dbname+'_cw] MINE KASUTA ['+@dbname+'] MINE MUUDA ROLLI [db_exec] LISA LIIGE ['+@dbname+'_cw] MINE --Loe aruannet KASUTA ['+@dbname+'] MINE LOO KASUTAJA ['+@dbname+'_cr] PAROOLIGA PASSWORD=N'''+@password2+''', DEFAULT_SCHEMA=[dbo] MINE KASUTA ['+@dbname+'] MINE MUUDA ROLLI [db_datareader] LISA LIIGE ['+@dbname+'_cr] MINE KASUTA ['+@dbname+'] MINE MUUDA ROLLI [db_exec] LISA LIIGE ['+@dbname+'_cr] MINE
' print (@sqlstr) Print '--write account number uid:'+@dbname+'_cw pwd:'+@password Prindi '--loe konto numbrit UID:'+@dbname+'_cr PWD:'+@password2 mine[/mw_shl_code]
|