ACCESS総合相談所 その１５
939 ：名無しさん＠そうだ選挙にいこう：2006/08/30(水) 11:44:16
>>938
なるほど。ありがとございました。
Set rs = db.OpenRecordset("SELECT * FROM Customers", dbOpenDynaset)
Set Me.Recordset = rs
の応用が自分には足りませんでした。
こんな感じですね。
Private Sub Form_Open(Cancel As Integer)
On Error Resume Next
Set DB = CurrentDb
'トランザクション処理開始
Set DBWS = DBEngine.Workspaces(0)
DBWS.BeginTrans
Set RS = DB.OpenRecordset("クエリ1", dbOpenDynaset)
Set Me.Recordset = RS
End Sub
'ロールバックボタン処理
Private Sub コマンド0_Click()
DBWS.Rollback
DBWS.BeginTrans
Me.Refresh
End Sub
なるほど。ありがとございました。
Set rs = db.OpenRecordset("SELECT * FROM Customers", dbOpenDynaset)
Set Me.Recordset = rs
の応用が自分には足りませんでした。
こんな感じですね。
Private Sub Form_Open(Cancel As Integer)
On Error Resume Next
Set DB = CurrentDb
'トランザクション処理開始
Set DBWS = DBEngine.Workspaces(0)
DBWS.BeginTrans
Set RS = DB.OpenRecordset("クエリ1", dbOpenDynaset)
Set Me.Recordset = RS
End Sub
'ロールバックボタン処理
Private Sub コマンド0_Click()
DBWS.Rollback
DBWS.BeginTrans
Me.Refresh
End Sub
940 ：名無しさん＠そうだ選挙にいこう：2006/08/30(水) 12:02:55
>>939
なんか、ちょっと違うな。エラーになる。（＾＾；
なんか、ちょっと違うな。エラーになる。（＾＾；
941 ：名無しさん＠そうだ選挙にいこう：2006/08/30(水) 12:20:49
>>939
Workspaceを使うとダメなのかな？
こんな感じにしました。
------------------------------------
Dim RS As DAO.Recordset
Dim DB As DAO.Database
------------------------------------
Private Sub Form_Open(Cancel As Integer)
Set DB = CurrentDb
'トランザクション処理開始
DBEngine.BeginTrans
Set RS = DB.OpenRecordset("クエリ1", dbOpenDynaset)
Set Me.Recordset = RS
End Sub
------------------------------------
'ロールバックボタン処理
Private Sub コマンド0_Click()
DBEngine.Rollback
DBEngine.BeginTrans
Me.Refresh
End Sub
------------------------------------
'コミットボタン処理
Private Sub コマンド1_Click()
DBEngine.CommitTrans
DBEngine.BeginTrans
End Sub
Workspaceを使うとダメなのかな？
こんな感じにしました。
------------------------------------
Dim RS As DAO.Recordset
Dim DB As DAO.Database
------------------------------------
Private Sub Form_Open(Cancel As Integer)
Set DB = CurrentDb
'トランザクション処理開始
DBEngine.BeginTrans
Set RS = DB.OpenRecordset("クエリ1", dbOpenDynaset)
Set Me.Recordset = RS
End Sub
------------------------------------
'ロールバックボタン処理
Private Sub コマンド0_Click()
DBEngine.Rollback
DBEngine.BeginTrans
Me.Refresh
End Sub
------------------------------------
'コミットボタン処理
Private Sub コマンド1_Click()
DBEngine.CommitTrans
DBEngine.BeginTrans
End Sub
942 ：名無しさん＠そうだ選挙にいこう：2006/08/30(水) 13:01:41
VistaはMSDEをサポートせず――影響するシステム数は膨大に？ (1/2)
デスクトップデータベース技術のMSDE 1.0および2000が、Windows VistaとLonghorn Serverではサポートされないことになった。
この影響を受けるアプリケーションの数は多いことが予想され、後継版への移行は厄介な作業になるかもしれない。
2006年08月30日 07時00分 更新
やっぱ桐にしとこ
デスクトップデータベース技術のMSDE 1.0および2000が、Windows VistaとLonghorn Serverではサポートされないことになった。
この影響を受けるアプリケーションの数は多いことが予想され、後継版への移行は厄介な作業になるかもしれない。
2006年08月30日 07時00分 更新
やっぱ桐にしとこ
943 ：名無しさん＠そうだ選挙にいこう：2006/08/30(水) 13:30:36
サポートしない＝動作しない
だと困るでしょうね
サポートしなくても、通常動作するなら、影響は小さいと思いますが。
Vistaのベータ版だとどうなんでしょうかね？
だと困るでしょうね
サポートしなくても、通常動作するなら、影響は小さいと思いますが。
Vistaのベータ版だとどうなんでしょうかね？
944 ：名無しさん＠そうだ選挙にいこう：2006/08/30(水) 23:19:44
>>931
Access2000で確認。バージョンは古いが、ADO2.1がデフォで参照設定済み。
CurrentDBは、既にオープンしてる自身のMDBだからCloseは無駄。
内部変数なんだから、基本は関数抜ければ解放されるはず。なので、Nothing
も無駄。それでも後処理なんていうなら、.Netでも確保したメモリは自分で解放
しような。別に間違いとはいわんよ。好きにすれば。
Access2000で確認。バージョンは古いが、ADO2.1がデフォで参照設定済み。
CurrentDBは、既にオープンしてる自身のMDBだからCloseは無駄。
内部変数なんだから、基本は関数抜ければ解放されるはず。なので、Nothing
も無駄。それでも後処理なんていうなら、.Netでも確保したメモリは自分で解放
しような。別に間違いとはいわんよ。好きにすれば。
945 ：名無しさん＠そうだ選挙にいこう：2006/08/30(水) 23:20:31
946 ：名無しさん＠そうだ選挙にいこう：2006/08/31(木) 00:17:59
弁解はいいから必要なこと書いてあげたら？
弁解所じゃなく相談所なんだから。
弁解所じゃなく相談所なんだから。
947 ：名無しさん＠そうだ選挙にいこう：2006/08/31(木) 01:54:37
>>943
お前は頭大丈夫か？
お前は頭大丈夫か？
948 ：名無しさん＠そうだ選挙にいこう：2006/08/31(木) 01:58:26
>>947
それだけ？他にはないの？
それだけ？他にはないの？
949 ：名無しさん＠そうだ選挙にいこう：2006/08/31(木) 02:06:56
ストレス解消所だね、ここっ！笑
プログラマーとかＳＥって、そんな人が多いの？
プログラマーとかＳＥって、そんな人が多いの？
950 ：名無しさん＠そうだ選挙にいこう：2006/08/31(木) 02:08:00
２ちゃんなんか見る人は
みんなそんなもんだよ
みんなそんなもんだよ
951 ：名無しさん＠そうだ選挙にいこう：2006/08/31(木) 02:24:00
952 ：名無しさん＠そうだ選挙にいこう：2006/08/31(木) 02:37:41
946は親切心で言ったわけじゃないとおもうぞ
953 ：名無しさん＠そうだ選挙にいこう：2006/08/31(木) 07:22:08
>>944
回答してあげてるか、
どんな風に回答されているのかは、わかりませんが、
自己弁護には必死なタイプじゃないですか？
回答した書込み、自己弁護したときの書込み、行数とか比べてみて、自己分析してみては？
自覚しているならいいのですが。
回答してあげてるか、
どんな風に回答されているのかは、わかりませんが、
自己弁護には必死なタイプじゃないですか？
回答した書込み、自己弁護したときの書込み、行数とか比べてみて、自己分析してみては？
自覚しているならいいのですが。
954 ：名無しさん＠そうだ選挙にいこう：2006/08/31(木) 09:12:52
うつになったり、
突然、大声出して、怒り出したり、
シカト、無言になったり、
仕事来なくなったり、
いろんな人いるよ。
神経使う仕事ではある。
突然、大声出して、怒り出したり、
シカト、無言になったり、
仕事来なくなったり、
いろんな人いるよ。
神経使う仕事ではある。
955 ：名無しさん＠そうだ選挙にいこう：2006/08/31(木) 11:37:09
【 システム環境 . 】 Windows**, Access2000
【 VBAが使えるか .】 はい
【 VBAでの回答 】 可
【 検索キーワード 】
フォームのヘッダにDTPickerやカレンダーなどのOLE(ActiveX)コントロールがある場合、
レコード０件だと、参照できなくなってエラーになるようで、
格好悪いのですが、
１レコードのダミーテーブルを表示させるよう切り替えたり
Me.詳細.Visible = False
など処置していますが、
もっと簡単な方法、対策とかありますか？
【 VBAが使えるか .】 はい
【 VBAでの回答 】 可
【 検索キーワード 】
フォームのヘッダにDTPickerやカレンダーなどのOLE(ActiveX)コントロールがある場合、
レコード０件だと、参照できなくなってエラーになるようで、
格好悪いのですが、
１レコードのダミーテーブルを表示させるよう切り替えたり
Me.詳細.Visible = False
など処置していますが、
もっと簡単な方法、対策とかありますか？
956 ：moko：2006/08/31(木) 12:51:57
WinXp Ac97
テーブル名、クエリ名等が文字化けします。
中身は、異常ないのですが・・・
どうしたら直るのでしょうか？？？
教えてください。
テーブル名、クエリ名等が文字化けします。
中身は、異常ないのですが・・・
どうしたら直るのでしょうか？？？
教えてください。
957 ：名無しさん＠そうだ選挙にいこう：2006/08/31(木) 14:02:31
>>956
新規に作成したmdbや他のmdbも文字化けしますか？
その特定のmdbだけ文字化けしますか？
最適化/修復を行ったらどうなりますか？
その特定のmdbだけの問題なら、ファイルが壊れて無理なのかも？
新規に作成したmdbや他のmdbも文字化けしますか？
その特定のmdbだけ文字化けしますか？
最適化/修復を行ったらどうなりますか？
その特定のmdbだけの問題なら、ファイルが壊れて無理なのかも？
958 ：名無しさん＠そうだ選挙にいこう：2006/08/31(木) 14:06:44
959 ：名無しさん＠そうだ選挙にいこう：2006/08/31(木) 14:43:13
>>944
＞既にオープンしてる自身のMDBだからCloseは無駄。
Closeは無駄じゃない。
排他ロックかかる場合があり、エラーとなる場合があるので、
Closeはすべき。
Nothingは、経験、確認してないが、
なんらかの不具合につながる場合もあるかもしれない。
不具合やエラーを経験してないだけで、
無駄、不要という間違った認識はやめたほうがいい。
＞既にオープンしてる自身のMDBだからCloseは無駄。
Closeは無駄じゃない。
排他ロックかかる場合があり、エラーとなる場合があるので、
Closeはすべき。
Nothingは、経験、確認してないが、
なんらかの不具合につながる場合もあるかもしれない。
不具合やエラーを経験してないだけで、
無駄、不要という間違った認識はやめたほうがいい。
960 ：名無しさん＠そうだ選挙にいこう：2006/09/01(金) 00:33:53
キレのいいやつ出したときでも、トイレ出る前にはお尻拭こうよ、ね
961 ：名無しさん＠そうだ選挙にいこう：2006/09/01(金) 00:41:33
962 ：名無しさん＠そうだ選挙にいこう：2006/09/01(金) 05:47:17
また弁解してら
963 ：名無しさん＠そうだ選挙にいこう：2006/09/01(金) 09:28:43
やっぱり、Accessだ。馬鹿ばっか。
964 ：名無しさん＠そうだ選挙にいこう：2006/09/01(金) 09:50:52
Access to you
965 ：名無しさん＠そうだ選挙にいこう：2006/09/01(金) 10:42:03
桐の工作員が覗きに来てるよ
966 ：名無しさん＠そうだ選挙にいこう：2006/09/02(土) 08:51:29
>>947
MSがMSの製品についてサポートしないっていうときは、動きません。
の意味だとは思うが、MS以外のメーカーが95,98用のアプリを
2000,XPではサポートしない 云々 いってる場合には実際動作する
ケースが多かったんで、943はそのイメージでいってるんだろぉよ。
MSがMSの製品についてサポートしないっていうときは、動きません。
の意味だとは思うが、MS以外のメーカーが95,98用のアプリを
2000,XPではサポートしない 云々 いってる場合には実際動作する
ケースが多かったんで、943はそのイメージでいってるんだろぉよ。
967 ：名無しさん＠そうだ選挙にいこう：2006/09/02(土) 10:20:28
Virtual PC は XP Home でサポートされていないし、
ご丁寧に警告文まで表示されるよね。
ご丁寧に警告文まで表示されるよね。
968 ：名無しさん＠そうだ選挙にいこう：2006/09/02(土) 20:10:10
ACCESS総合相談所 その１６ 【桐にしとけ】
http://pc8.2ch.net/test/read.cgi/bsoft/1157195290/
http://pc8.2ch.net/test/read.cgi/bsoft/1157195290/
969 ：名無しさん＠そうだ選挙にいこう：2006/09/02(土) 20:39:40
>>967
サポートされてますよ
サポートされてますよ
970 ：名無しさん＠そうだ選挙にいこう：2006/09/02(土) 22:01:03
久々に桐にしとけ復活か。
Access2007だめぽだしな。
Access2007だめぽだしな。
971 ：名無しさん＠そうだ選挙にいこう：2006/09/02(土) 23:33:44
梅
972 ：名無しさん＠そうだ選挙にいこう：2006/09/03(日) 07:56:47
産め
973 ：名無しさん＠そうだ選挙にいこう：2006/09/03(日) 14:40:12
ume
974 ：名無しさん＠そうだ選挙にいこう：2006/09/03(日) 22:21:23
hoge
975 ：名無しさん＠そうだ選挙にいこう：2006/09/04(月) 11:08:07
MSDEって無料だし、セキュリティ弱いからサポート外になったのでは？
MSDEがダメならSQL Server もダメだと思うけど。
で、Vista で MSDE 試してみた人いるの？
まー、わかっていることは、
桐は、Vista にアナウンスもされない。
MSDEがダメならSQL Server もダメだと思うけど。
で、Vista で MSDE 試してみた人いるの？
まー、わかっていることは、
桐は、Vista にアナウンスもされない。
976 ：名無しさん＠そうだ選挙にいこう：2006/09/04(月) 11:33:32
●VistaはMSDEをサポートせず――影響するシステム数は膨大に？
http://www.itmedia.co.jp/enterprise/articles/0608/30/news010.html
OSアップグレードだから、動作しない場合があっても不思議じゃない。
古い無料ソフトだから、サポートしないのも仕方ないし。
影響が多くて、Access や VB など修正や作り直しがあっても、
ソフト業界の仕事が増えるから、逆にその方がいいかな。
だからと言って、桐へ移行するとはとても思えない。
桐の良し悪しは、別としても。
大半は、そのまま新しいAccessやVBへアップグレードするでしょうし、
オープンソースへの移行は増えるでしょう。
古いソフトが使えないからといってWindowsを捨てる会社は、ほとんどないからね。
http://www.itmedia.co.jp/enterprise/articles/0608/30/news010.html
OSアップグレードだから、動作しない場合があっても不思議じゃない。
古い無料ソフトだから、サポートしないのも仕方ないし。
影響が多くて、Access や VB など修正や作り直しがあっても、
ソフト業界の仕事が増えるから、逆にその方がいいかな。
だからと言って、桐へ移行するとはとても思えない。
桐の良し悪しは、別としても。
大半は、そのまま新しいAccessやVBへアップグレードするでしょうし、
オープンソースへの移行は増えるでしょう。
古いソフトが使えないからといってWindowsを捨てる会社は、ほとんどないからね。
977 ：名無しさん＠そうだ選挙にいこう：2006/09/04(月) 22:40:26
Access2007とこれを組み合わせて遊んでみた、結構使える。
http://www.sharepointtrial.com/welcome.aspx
時代は、SharePoint だぜ。
Access単独だったら桐のが良いと思う、特に2007ではAccess単独はダメダメ。
http://www.sharepointtrial.com/welcome.aspx
時代は、SharePoint だぜ。
Access単独だったら桐のが良いと思う、特に2007ではAccess単独はダメダメ。
978 ：名無しさん＠そうだ選挙にいこう：2006/09/05(火) 00:24:13
使い物にならんよ
979 ：名無しさん＠そうだ選挙にいこう：2006/09/05(火) 09:33:28
>>978
詳しく！
詳しく！
980 ：名無しさん＠そうだ選挙にいこう：2006/09/05(火) 15:20:08
OS：XP Pro
Accessバージョン：2000
アクセスを起動したときにエクセルを同時に自動で立ち上げるマクロを考えたのですが
添削をお願いいたします。
Sub AutoExec()
Workbooks.Open Filename:="W:\Template\3Item_DB\XXX.xls"
End Sub
ヒントでも結構ですので宜しくお願いいたします。
Accessバージョン：2000
アクセスを起動したときにエクセルを同時に自動で立ち上げるマクロを考えたのですが
添削をお願いいたします。
Sub AutoExec()
Workbooks.Open Filename:="W:\Template\3Item_DB\XXX.xls"
End Sub
ヒントでも結構ですので宜しくお願いいたします。
981 ：名無しさん＠そうだ選挙にいこう：2006/09/05(火) 19:13:04
>>980
添削はスレ違いです。
添削はスレ違いです。
982 ：名無しさん＠そうだ選挙にいこう：2006/09/05(火) 19:21:52
.bat で両方立ち上げたら？
983 ：名無しさん＠そうだ選挙にいこう：2006/09/05(火) 20:48:56
産め
984 ：名無しさん＠そうだ選挙にいこう：2006/09/05(火) 21:38:39
旨めえ
985 ：名無しさん＠そうだ選挙にいこう：2006/09/06(水) 08:26:13
そっか、もうすぐ出産だしな
986 ：名無しさん＠そうだ選挙にいこう：2006/09/06(水) 10:19:11
梅
987 ：名無しさん＠そうだ選挙にいこう：2006/09/06(水) 21:41:57
2007はパーソナル向けですウメ
従業員に入力させたらフォームやクエリを壊しますウメ
シェアポイントと連携しなければ使えませんウメ
零細企業じゃWebは無意味ですウメ
しょって会社の経理処理には使えませんウメ
従業員に入力させたらフォームやクエリを壊しますウメ
シェアポイントと連携しなければ使えませんウメ
零細企業じゃWebは無意味ですウメ
しょって会社の経理処理には使えませんウメ
早く産め