ボゴモロフ: 盟友・護衛・従業員の告白に見るソ連の領袖たち 
Богомолов А. - Вожди СССР в откровениях сратников, охраны и обслуги: быт, привычки и досуг первых лиц нащей страны. М.: Астрель, 2011. 320 с. 5170762347 L3646 税込価格 ¥3,360

Жизнь первых руководителей государств - детали работы и отдыха, всегда интересна для их подданных. Официальные сведения, биографии и «откровенные» интервью настолько выхолощены, что порою уже не верится, что вожди - это тоже люди из пота и крови. Эта книга, насквозь неофициальная, собрана на основе рассказов и воспоминаний тех, кто были рядом с первыми лицами днем и ночью. Эти люди, постоянно находившиеся рядом с первыми лицами, их семьями, гостями, занимались не только их безопасностью, но и всеми остальными сторонами жизни: бытовым обслуживанием, транспортом, связью, даже досугом своих подопечных. Таким образом, перед Вами предстанет образ жизни, быт, привычки первых лиц нашей страны. Автор - один из самых известных журналистов России, сотрудник газеты «Комсомольская правда», на основе сенсационных репортажей которой и сделана эта книга. のCARDKNMASテーブルから作成したクエリQ_CartTableからレコードを取得する Set RS= Server.CreateObject("ADODB.Recordset") sqlp= "SELECT * FROM Q_CartTable " sqlp=sqlp & " WHERE TCODE = '" & SKEY & "' " RS.Open sqlp, "DSN=nissosub" '取得したレコードの各フィールドを変数に代入する sCTRL_NO = rs("CTRL_NO") sTitle = left(rs("タイトル"),255) sPrice = rs("Price") rs.Close Set rs = Nothing 'CartTableにデータを追加する。 adCmdText=1 strInsert = "INSERT INTO CartTable (SessionID, 図書番号, カタログ番号, タイトル, Price) " strValues = " Values('" & Session.SessionID & "', '" & sCTRL_NO & "', '" & SKEY & "', '" & sTitle & _ "', '" & sPrice & "' )" strInsert = strInsert & " " & strValues 'データベースに接続する Set Cnn = Server.CreateObject("ADODB.Connection") Cnn.Open "DSN=Shopping" 'Commandオブジェクトを作成する Set Cmd = Server.CreateObject("ADODB.Command") 'Commandオブジェクトのプロパティを設定する Set Cmd.ActiveConnection = Cnn Cmd.CommandText = strInsert Cmd.CommandType = adCmdText 'コマンドの実行 Cmd.Execute Cnn.Close Set Cnn = Nothing Set Cmd = Nothing 'もとの画面に戻る 'Response.Redirect "L.asp" End Sub %>