shohei blog

暇人＼(^o^)／速報 : 【動画あり】震災の影響で6,500km離れたカナダに流れ着いたハーレーの持ち主が判明　「戻ってくれてありがとう」 – ライブドアブログ.

株式会社クラウドワークス.

彼女ができて3ヶ月だけど、もう限界かもしれない.

VIPPERな俺 : ダンブルドア「」←一番言わなさそうな事言わせてみようか。.

森庄ホーム – gion-morisyo Jimdoページ.

—————-ここから———————-

種別を選んでください

個人会員 ¥5,000 JPY法人会員 ¥20,000 JPY

—————-ここまで————

・タイムスタンプをSQLに埋め込みたい時は変換する

Dim NowText as string

NowText = now()
NowText = Replace(NowText,”/”,”-“)

・接続はこんな感じ

Dim oDoc
Dim Connection

‘ フォームオブジェクト取得
oDoc = ThisComponent

‘ 接続を取得
oForm = oDoc.getDrawPage().getForms().getByName(“MainForm”)
Connection = oForm.ActiveConnection

‘SQLを発行する
Statement = Connection.createStatement()
ResultSet = Statement.executeQuery(“SELECT “”HOGE”” FROM tbl_FugaFuga”)

‘ 接続を閉じる
ResultSet.Close()
Statement.Close()