φ(..) ビボ~6 φ(..)

主にAccess、VBAに関する備忘録

2012-01-01から1年間の記事一覧

64bit Windows のコンパネでは 32bit ODBC の設定ができない

32bit版Officeは、32bit版のODBCを参照する。 コンパネのODBCアドミニストレータは64bit版を扱う。→ 32bit版OfficeのODBC設定は、32bit版の ODBCアドミニストレータで行う。 %windir%\SysWOW64\odbcad32.exe 参考: MySQL ODBCが接続できない!?Windows7 64…

Access2000 Adp のCommandTimeout

CurrentProject.Connection.CommandTimeOut で設定してもダメなようです。 Dim ADOCmd As ADODB.Command Set ADOCmd = New ADODB.Command With ADOCmd .CommandText = "xxx" .ActiveConnection = CurrentProject.Connection .CommandTimeout = 0 .Execute En…

管理者ユーザーでログオンしているのにAdministraor権限を要求される場合

普通にコントロールパネルを覗いただけでは存在していないように見える Administrator というアカウントを見えるようにしてやればよいようです。 [スタート] [コンピューター]を右クリック [管理] [ローカルユーザーとグループ] [ユーザー] ユーザー『Admini…

どうしてもODBC接続できないときに調べ忘れそうなこと

こんなこともあるよ、という意味でメモ。 SQL Server側のプロパティ(リモート接続許可、権限など)はキチンとできている、 構成マネージャーのTCP/IP設定、FWのポート開け、などなど 心当たりの設定はキチンとできているにも関わらず、ODBC接続に失敗する場…

ソリューションパッケージウィザードで追加のインストール

パッケージ内の \Files\Setup\Setup.ini [ChainedInstall_n]オプションに追加する。セットアップ設定ファイル (Office 2003 Editions リソース キット)

列を追加するとき、既に存在するかチェック

IF EXISTS(SELECT * FROM sys.columns WHERE Name = N'ColumnName' AND Object_ID = OBJECT_ID(N'TableName')) /* 存在するときの処理 */ ELSE /* 存在しないときの処理 */

Windows7で拡張子CHMのヘルプが開けない場合

文書番号: 917607 Windows ヘルプ形式 (WinHlp32.exe) で作成されたヘルプを開くことができない - Microsoft サポート

HTML文字セット

Etc

HTML 文字セット - MSDN ライブラリ

各ユーザーフォルダの環境変数

■図01 User Shell Foldersキーの内容 展開可能な文字列値 データ値 内容 移動 {374DE290-123F-4565-9164-39C4925E467B} %USERPROFILE% \ Downloads ダウンロードフォルダのデータを格納 ○ AppData %USERPROFILE% \ AppData\Roaming アプリケーションデータを…

NULL文字のせいでテキストファイルがインポートできないとき

NULL文字を空白に置き換える処理 Sub WriteNewTextFile() Dim characterArray() As Byte Dim fileLen As Long Dim strOrigFile As String Dim strNewFile As String Dim MyString As String Dim fs As Object 'Change the path and the names of the files a…

Management Studio でテーブルデザインの変更ができないとき

[ツール]-[オプション]-[デザイナー] □テーブルの再作成を必要とする変更をできないようにする の、チェックをはずす。

全角/半角混在のテキストからバイト指定で文字列を切り出す

VBA

Dim buf AS String Open "TESTFILE.TXT" For Input As #1 Do Until EOF(1) Line Input #1, buf '100バイト目から4桁取り出す Debug.Print StrConv(MidB(StrConv(buf, vbFromUnicode), 100, 4), vbUnicode) Loop Close #1 vbUpperCase 1 文字列を大文字に変換…

古いCOBOLソースに16進で書かれた日本語を調べるには

Etc

こういうの ⇒ NX"404040404040"以下のサイトからブラウザの検索機能を使ってみる 文字コードについて - ASH

参照設定

ダイアログ ボックス : Microsoft Office(バージョン) Object Library FileSystemObject : Microsoft Scripting Runtime

フォルダ、ファイルの選択ダイアログ

[参照] ダイアログ ボックス(ファイル参照) '[参照] ダイアログ ボックスの FileDialog オブジェクトを作成します。 Dim fd As FileDialog Set fd = Application.FileDialog(msoFileDialogFilePicker) '選択した各アイテムのパスを保存す変数を宣言します。 …

行削除に関するイベントについて

Accessのフォームからレコードを削除しようとすると、次のような順番でイベントが発生します。 Delete/レコード削除時イベント Deleteキーなどの操作によって、レコードが削除されようとしたときに発生します。 レコードが実際に削除される前に発生するもの…

JOIN を利用したDELETE

【例】 商品マスタと商品単価マスタがあり、商品単価が登録されていない商品を、商品マスタからすべて削除したい。 ・商品マスタ 商品コード商品名00001あんぱん00002メロンパン00003クリームパン ・商品単価マスタ 商品コード適用開始日単価000012008040112…

Windows7でのSendkeys、Enterキー問題

以下、暫定処置として Access2000: Sendkeys {Esc} の箇所で 実行時エラー '70':書き込みできません。が出る問題 UACを無効にする VB6: Enterキー移動ができなくなる問題 UACを無効にする。 EXEのプロパティを開き、互換性でXPを選ぶ。