MADOKA YORIKO／円より子ネット

<% Option Explicit Dim cn Dim rs Dim sql Dim EMail Dim DatabaseFileName Dim ConnString Dim Conn Dim Rec Dim Value If Request.ServerVariables("REQUEST_METHOD") = "POST" Then Set cn = Application("DatabaseConnection") Set rs = Server.CreateObject("ADODB.Recordset") rs.Open "会員", cn, adOpenKeyset, adLockOptimistic, adCmdTable rs.AddNew ' Value = Request.form("name") ' rs("名前").Value = Value ' Value = Request.form("tel") ' rs("電話").Value = Value Value = Request.form("email") rs("メール").Value = Value 'rs("DATE_TIME").Value = FormatDateTime(rs("DATE_TIME").Value, vbShortDate) & " " & FormatDateTime(rs("DATE_TIME").Value, vbShortTime) rs("DATE_TIME") = Year(Now()) & "/" & Month(Now()) & "/" & Day(Now()) & " " & Hour(Time) & ":" & Minute(Time) rs("HOST").Value = request("REMOTE_HOST") rs.Update rs.Close Dim cdoConfig Dim cdoMessage Dim adoFields dim strText Set cdoConfig = Server.CreateObject("CDO.Configuration") Set cdoMessage = Server.CreateObject("CDO.Message") ' CDO.Configration Set adoFields = cdoConfig.Fields adoFields(cdoSendUsingMethod) = cdoSendUsingPort adoFields(cdoSMTPServer) = "127.0.0.1" adoFields(cdoSMTPServerPort) = 25 adoFields(cdoSMTPConnectionTimeout) = 30 adoFields.Update ' CDO.Message Set adoFields = cdoMessage.Fields adoFields(cdoContentTransferEncoding) = cdo7bit adoFields.Update With cdoMessage Set .Configuration = cdoConfig .From = """円より子ネット"" " .Subject = "円より子メールマガジン登録結果" With .BodyPart .Charset = cdoISO_2022_JP .ContentTransferEncoding = cdo7bit End With .To = "info@madoka-club.jp" ' .To = "mukai@kazoku-mondai.co.jp" ' .To = "nishi-k@systemsoft.co.jp" .BCC = "nishi-k@systemsoft.co.jp" strText = strText & "円より子メールマガジン登録結果" & vbCrLf strText = strText & "*********************************************************" & vbCrLf strText = strText & "■内容■" & vbCrLf & vbCrLf strText = strText & "●E-mail： " & Request.form("email") & vbCrLf strText = strText & "*********************************************************" & vbCrLf & vbCrLf .TextBody = strText .Send End With Response.Redirect "thankyou.htm" Response.end End If %> MADOKA YORIKO／円より子ネット

画像をクリックすると拡大します。

「民主党政権をめざして─円より子と語る会」　2006年10月17日（火）開催！！
公正な社会、ともに生きる国をめざし、円より子は政権交代に全力を尽くします。民主党政権を実現し、日本を変えましょう。みなさまと共に、政権奪取プランを語りたいと思います。

第１部　鼎談　「世界の平和構築のために」　１８：３０～

パネリスト：　重村智計（早大教授）、星浩（朝日新聞編集委員）、円より子（参議院議員）
大切な人が平和に安心して暮らせる世の中であってほしい。世界中の人々がそう願っています。しかし、今も世界中で紛争は続いています。世界の平和構築のために、私達は何をすべきなのでしょうか。

第２部　パネリスト参加懇親会　１９：００～

日時：　１０月１７日（火）１８：００開場、１８：３０開宴　　
場所：　日本海運倶楽部（東京都千代田区平河町２－６－４、電話３２６４－１８２５、東京メトロ半蔵門線・有楽町線・南北線永田町駅徒歩１分）　　
会費：　２０，０００円

●電話でのお申し込み
03-3261-1835　　「がんばれ円より子クラブ事務局」
月曜～金曜　10:00～17:30（祝日除く）

●FAXでのお申し込み
03-3261-1836　　「がんばれ円より子クラブ事務局」
住所・氏名・職業・電話番号をご記入ください。

お申し込み受付後、パーティー券と会費納入用の振込用紙を郵送させていただきます。会費は事前にお振込みいただくか、当日会場にてお支払いください。

発起人：　赤松良子（元文部大臣）、小沢一郎（民主党代表）、菅直人（民主党代表代行）、関本忠弘（国際社会経済研究所理事長）、高木剛（連合会長）、野田佳彦（民主党元国対委員長）、羽田孜（元内閣総理大臣、民主党最高顧問）、鳩山由紀夫（民主党幹事長）、早房長治（地球市民ジャーナリスト工房代表）、宮崎勇（㈱大和総研名誉顧問）（５０音順）

このパーティーは、政治資金規正法第８条の２に規定する政治資金パーティーです。
　

	TOPへもどる
このホームページの全ての著作権は円より子事務所に属しています。 Copyright © YORIKO MADOKA All Rights Reserved.