問題タブ [ms-access-2013]

タイトルにあるように、Access 2013 でのフォーム ログインについて誰か助けてくれませんか。各ユーザー ID でログインが成功するたびに、ユーザー名テーブル (datetype datetime) のタイムスタンプを更新したいだけです。もう1つの問題は、ログインに3回失敗するたびにユーザーログインフォームをロックしたいことです。

ちょっとした問題に直面しています。vb.net とアクセスで小さなプログラムを作成しています。

挿入クエリを使用してテーブルを作成しましたが、クエリビルダーからクエリを実行すると機能し、データはデータベースに保存されますが、コードを使用して保存すると、に表示されますが、保存されdatagridviewませんデータベースに。誰でも私を助けてもらえますか？よろしくお願いいたします。

私のコード:

私は Access を初めて使用し、Access 2013 を使用しています。 Employees を持つ Employees というテーブルFirst_NameとLast_Name、Full_Name. と をプルし、それをフィールドに連結するクエリがFirst_NameありますLast_Name。Full_Name

フォームに移動して新しい従業員を追加Full_Nameし、従業員テーブルのフィールドを保存をクリックすると、 and が取得されず、Firs_NameそのLast_Nameフィールドに入力されます。何が欠けているのかわかりません。Full_Name新入社員を入れたら、畑に行って、そこにあるドロップダウンに行かなければなりませんFull_Name。そこに自動的に入れたいと思いますFull_Name。

序文として、私は Access 2003 でコードを書いていますが、Access 2013 を使用するユーザーがいるため、両方と互換性がある必要があります。Application.FileSearch を使用してディレクトリ内の多数のファイルをループするループがあります。これは新しいバージョンの Access では推奨されていないことを理解しているため、「For Each」を使用してファイルをループする必要があります。

変更するコードは次のとおりです。

そして、ここに私がそれを置き換えるコードがあります：

このコードは、各ファイルをループしてから、ファイルに変更を加える Process() 関数を起動します。したがって、私がそれを機能させる方法は、アクティブなファイルを「SourceCode.txt」という名前に変更し、Process() 関数がその名前のファイルを操作することを認識していることです。次に、ファイルを元のファイル名で「処理済み」サブフォルダーに移動します。

これは元のコードではうまくいきました。Process() を起動する前に、ファイルの名前を「SourceCode.txt」に変更する方法が見つからないことを除いて、新しいコードはほとんど機能しているようです。いくつかの方法を試しましたが、エラーが発生し続けます。上記のコードでは、「f1.Name = strFileName」を試しました。これにより、「許可が拒否されました」というエラーが表示されます。別の方法として FileCopy を使用してから、元のファイルに対して Kill コマンドを使用しようとしましたが、Kill コマンドはエラーを返しました。FileSystemObject がファイルをロックしているため、ファイルを移動または強制終了できないと思われます。しかし、古いバージョンのコードは問題なく移動できました。

私のデータベースには 28 個の接続されたテーブルがあります。これらのテーブルのうち 10 個は、マルチタブ フォームを使用して見積もりを作成するために使用されます。記入したら、レポートに印刷する必要があります。レポートは、多くのサブ レポートに分割されています... そのうちの 31 ～ 32 個です。次に、フォームを印刷するか、PDF にエクスポートする必要があります。

16 Gig RAM と 8 コア CPU を搭載した PC を実行しています。

メイン レポートの RecordSource を設定するには、次のコードを使用します。

[Forms]![frmHub2]![Combo0].[Value]の値をSQL 定義に挿入するには、VBA を使用する必要がありました。

機能するもの

フォームが読み込まれ、以前のジョブを選択して更新し、レポート ビューでレポートを表示できます。

ないもの

1. レポート ビューから印刷プレビューに移動しようとすると、「システム リソースが超過しました」というエラーが表示されます。
2. 印刷プレビュー モードで直接開くと、正常に表示できますが、印刷しようとすると同じエラーが発生し、複数回発生します (サブ レポートの処理中に発生していると思われます)。部分的な用紙が印刷され、まったく印刷されない場合もあります。

何かご意見は？

いつものように、私は質問に答え、画像を投稿し、状況を理解するために必要なことは何でもします.

Access 2013 で資産データベースを再構築しています。主キー (資産のシリアル番号) を持つ 1 つのテーブルと、22 の他のフィールドがあります。テーブルを手動で編集しないように、テーブルで使用するフォームを設計しています。後で説明する「Status:」フィールドはテーブルに存在しません。レコードが存在するかどうかを表示するユーザーフレンドリーな方法です。

最終的な目標は、2 つのケースを処理するフォームを作成することです。ユーザーは PK を入力してタブ キーを押します。それで：

• PK が存在する場合、他の 22 のフィールドから情報を取得してフォームのフィールドに入力し (1:1)、'Status:' を 'Existing' に更新します。
• PK が存在しない場合は、「ステータス:」が「新規」に変更され、すべてのフィールドが空白になります。

フォームのほとんどのフィールドはコンボ ボックスです。2 つのテキスト フィールドと 1 つの日付/時刻フィールドがあります。

ユーザーがフォームの操作を完了し、必要な変更を行うと、下部に [保存] ボタンが表示され、PK で示される行にフォームの内容がすべて書き込まれます。

フォームの PK フィールドで Access 2013 の LostFocus() イベントを使用して部分的な解決策を見つけました。MS Access の経験はほとんどなく、DBA の経験は中程度で、VBA プログラミングの経験はありません。この解決策は実行できると確信しています。私の質問は、解決策をハードコーディングする以外の方法で解決できますか? フォームの作成についても調べてみましたが、必要に応じて機能するものが見つからなかったので、これを実現できるツールがあれば、それで問題ありません。