NotFound404 の回答履歴

全675件中141~160件表示
  • Windows7のログインでアクセスが拒否について

    Windows7なのですが、パソコンの電源を入れOSが起動後、 「Ctrl+Alt+Del」を押してログイン画面を表示させ ユーザIDとパスワードを入力すると赤い×点の「アクセスが拒否されました」 のメッセージが表示されてログインされません。 パソコンのリブートとシャットダウンを何回か繰り返すと ログインが可能となるのですが、その後、管理権限でのコマンド 実行ができない状態となります。 例えば、 DOSコマンドプロンプトを「管理者として実行」を選択して動かすと 「認識できないとか認証できないと」すみません。メッセージは忘れてしまいました。 とまともに使えない状態となります。 何が原因でしょうか。 どこを調べて改善すれば解消されますか。 お願いします。

  • ACCESS

    皆さんのお力添えを頂けますでしょうか? Microsoft ACCESSにおけるレコードの入力について 現在access2010を使い以下のプログラムを作成しています。 (1)テーブル : T_注文明細 (フィールド名)ー(データ型) ・注文ID ー オートナンバー ・商品No ー テキスト ・数量 ー 数値 (2)テーブル : T_注文数 数量として1~10までの数値が入れてあります。 (フィールド名)ー (データ型) ・数量 ー 数値 (3)テーブル: T_商品 (フィールド名)ー (データ型) ・商品Noーテキスト ・商品名ーテキスト ・金額ー通貨 (4)フォーム : F_商品一覧 商品リストが画像付き(商品1種類につき1画像)で示されており、画像をクリックすると 別のフォーム:F_商品○○(添付写真のようなフォームが商品毎に作成されている)へと進みます。 (5)フォーム : F_商品○○ コントロールボックスと、注文ボタンを配置しており それぞれボタンにコードを埋め込んでいます。 ・コントロールボックスについて 値集合ソース : T_注文数 値集合タイプ : テーブル/クエリ 上記(2)のT_注文数をソースに数量:1~10を選択します ・注文ボタンについて 以下の内容でコードを書いています。 Private Sub btn1_Click() Dim oRs As DAO.Recordset 'テーブル読み込み(レコードセット作成) Set oRs = CurrentDb.OpenRecordset("T_注文明細", dbOpenDynaset) 'レコードが見つかった場合 If oRs.NoMatch = False Then 'レコードの内容を書き換えます oRs.Edit oRs("数量").Value = Me.cmbsuuryou5.Value oRs("商品No").Value = "商品No○○" oRs.Update End If 'レコードセットの終了処理 oRs.Close Set oRs = Nothing MsgBox "注文しました。", vbOKOnly + vbInformation, "注文" End Sub 以上を踏まえ、現在下記の点で困っております 問題1: 数量を選択して、注文ボタンを押すとT_注文明細のフィールドに 内容が反映されますが、常に先頭のレコードが上書きされてしまいます。 希望は最新のレコードとしてテーブルに挿入され、既存のレコードを上書きすることなくレコード数を増やしたいのですが、うまくいき ません。 問題2: F_注文にて複数種類の商品をそれぞれ複数個注文した際に T _注文明細に複数のレコードが挿入(注文 ID,商品 No,数量)が挿入されてほしいのですが、 現状では問題 1と同様に、常に先頭のレコードの商品Noと数量だけが上書きされていまい、注文履歴が積み上がりません。 解決せずに困っております。 どなたか、ご教授頂けますでしょうか? よろしくお願いいたします。

  • アクセスのレポートページヘッダでの集計

    教えてください。 アクセスでのレポートのページヘッダにクエリ郵便の金額を入れています。金額の合計を出したく、=DSum("金額の合計","クエリ郵便")でできていたのですが、郵便を月ごとに表示したかったためクエリの日にち欄に 抽出条件に(Like [月を入力してください] & '*')と入力し入力した月だけの抽出をかけたところ合計がエラーになりました。レポートヘッダにレポートヘッダにある金額の合計をだしたいのですがどのようにしたらよろしいでしょうか

  • VBAでの画像情報取得について

    タイトルの通りなのですが、 画像の幅、高さ、ビットの深さの情報を取得したいです。 LoadPictureを使い、幅と高さは取得できたのですが、 ビットの深さを取得する方法がわかりません。 PixcelFormatのようなものはVBAに存在するのでしょうか。

  • もし該当のアクセスファイルが開いているのなら開かな

    エクセルからアクセスを開く方法を教えてください。 そして、 「もし該当のアクセスファイルが開いているのなら開かない」 と言う条件も付け加えたいです。 Sub test1() Dim strAcName As String Dim accApp As Object strAcName = "D:\ アクセスファイル名.mdb " 「GetObject」「CreateObject」どちらにしても結果は同じ? Set accApp = GetObject(strAcName) Set accApp = CreateObject(strAcName) 既にAccessファイルを開いている場合は、Visible = Trueにしたらエラーになる。 If Not accApp Is Nothing Then accApp.Visible = True accApp.OpenCurrentDatabase (strAcName) End If Set accApp = Nothing End Sub だと、 OpenCurrentDatabase の部分で、実行時エラー7867 既にこのデータベースは開いています。 になります。 だからってこの部分をコメントアウトすると 前回と同じように Set accApp = Nothingを通り越すと 折角開いたアクセスファイルが閉じてしまいます。 エクセルからアクセスを開く時にもハイパーリンクで Sub test2() Dim strAcName As String strAcName = "D:\ アクセスファイル名.mdb " ThisWorkbook.FollowHyperlink strAcName End Sub で開けたのですが、 「もし該当のアクセスファイルが開いているのなら開かない」 が出来ないので、 「GetObject」か「CreateObject」を 使って開くのかな?と思っています。

  • accessで電話番号にハイフンを追加する

    電話番号を識別してハイフンを追加したいです エクセルではこちらの方法が回答でありますがaccessでも可能でしょうか? http://soudan1.biglobe.ne.jp/qa2888873.html

  • Windows 7から10への無償アップグレード

    私は現在 Windows 7プロフェショナルを使っています。 Windows 10への無償アップグレードが期間限定で提供されると聞きましたが、Windows 10へのアップグレードはお勧めでしょうか? 注意しなければいけない点とかありませんか?使い勝手などで異なる点等ございますか? 7のサポート体制はまだ数年あるようなのでこのまま使い続けるか迷っています。

  • Win7シャットダウン時のプログラム実行がされない

    Windows7のシャットダウン時に バックアッププログラムを実行したいと思います。 バッチプログラムを作り単体では正常に動きました。 グループ・ポリシーを使って、コンピュータの終了時にコマンドを実行する http://www.atmarkit.co.jp/fwin2k/win2ktips/455cexec/cexec.html を参考にして、シャットダウンのローカルグループポリシーに 登録しても、実行がされません。 時間のかかるバックアップではなく、テキストファイルのコピーのような 簡単なバッチを作って試してみたところ WindowsXPでは、シャットダウンの途中でバッチが実行されましたが Windows7では、実行されないとわかりました。 gpupdate /force も実行してみましたがWindows7では バッチが動いてくれません。 Windows7では何か設定が必要なのでしょうか?

  • vbscripでaccdb→xlsxの対応について

    Windows Server2008R2上で cscript D:\aaaa.vbs で実行しているvbscriptにてサーバーの所定のフォルダに AccessD/B、EXCELブックを作成しています。 尚、Windows Server2008R2上にはOffice2013はインストールしておりません。 Microsoft.ACE.OLEDB12.0を再配布でインストールしています。 サーバー側で作成したAccessD/B EXCELブックを Office2013をインストールしてあるクライアントPCにて vbscriptにて作成したEXCELブック内の ・文字列の頭の空白 ・シート名 についてお伺いしたいのでよろしくお願いします。 -------------------------------------------------------------------- vbscriptの内容は以下のとおりです。 TEST.accdb内のTABLE1の全レコードをxlsx形式のEXCELブックに出力するために Set cnn = cat.ActiveConnection ・ Query = "select * into [Excel 12.0 Xml;DATABASE=TEST.accdb].[シート名] from [TABLE1]" cnn.Execute Query で実行しているのですが( Microsoft.ACE.OLEDB12.0 ) ■TABLE1のフィールドの内容は ○A12B95 (○は空白の意味です) なのですがEXCELには A12B95 と、文字列の頭の空白がカットされて出力されてしまいます。 ■シート名に()などの記号が含まれているとEXCELブック表示すると 「xxxx.xlsxの一部に問題が見つかりました。可能な限り内容を回復しますか・・・・・・・・・」 のメッセージが表示され、EXCELブックを開くと修復されますがシート名の記号が記号によっては 文字化けします。 以前は Access2003、Excel2003だったので( Microsoft.JET.OLEDB.4.0 ) TEST.mdb内のTABLE1の全レコードをxls形式のEXCELブックに出力しており Query = "select * into [Excel 8.0;DATABASE=TEST.mdb].[シート名] from [TABLE1]" cnn.Execute Query で正常に'○A12B95と出力できていました。 接頭辞「'」付きで また、シート名に()などの記号が含まれていても正常にシート名が作成され EXCELブック(xls)を開くことができました。 accdb形式のAccessD/BのテーブルをExcelのxls形式とxlsx形式に出力する場合とでは 文字列頭の空白処理やシート名の扱いが異なるのでしょうか。 ■試しに以下の処理をしてみましたが (1)accdb形式のAccessD/BのテーブルをAccess自体のメニューでエクスポートしてみましたが 文字列頭の空白は xls形式では・・・・'○A12B95 接頭辞「'」あり、空白○あり xlsx形式では・・・・A12B95 接頭辞「'」なし、空白○なし となってしまいます。 (2)EXCEL2013の詳細設定のLotus1-2-3形式のキー操作チェックボックスをオンにして(1)の エクスポートしてみましたが xlsx形式では・・・・'A12B95 「接頭辞「'」は付くものの、空白○なし となってしまいます。 (3)TEST.accdb内のTABLE1のレコードセットを作成し、テキスト項目には「'」を付けて 1レコード毎EXCELブック(xlsx)に行挿入( Addnew~Update )してみましたが EXCELブック(xlsx)を開きテキスト項目の内容を確認しましたところ '○A12B95  接頭辞「'」あり、空白○ありとなるものの Lenで文字数を確認すると 「'」を含めた文字数(8)になってしまいます。EXCELでは接頭辞「'」は文字扱いしないはずなのですが。 何故かテキスト項目のセルをクリックした後、再度Lenで文字数を確認すると文字数(7)になります。    ■ ○A12B95 はオーダー番号なので番号体系を変えることはできません。○の部分は空白以外もあります。 また、レコード件数も65,000件超のためxlsx形式でないと対処できません。 vbscriptで accdb形式のAccessD/B内のテーブルをxlsx形式のExcelに出力した場合に 文字列の頭の空白がなくならないよう、またシート名に記号()等を使っても 正常にEXCLEブックが開ける方法がございましたらご教示下さいますでしょうか。 できれば1件1件読み込んで処理する以外の方法が望ましいです。 レコード件数が多く以前その処理だと数十分~小一時間かかっていたので 上記方法select * into [Excel・・・に変更し数分で処理できるようになりましたので。 無理な場合は1件1件読み込んで処理する場合は上記(3)が改善できる方法があればと思います

  • 入力した文字列の正誤チェック

    下記の様に動作するマクロを組みたいのですが、自分なりにチャレンジして みましたが、意図した動作が実現できず困っています。ご教授お願い致します。 1.セルA1-A20にデータを入力。 2.予め作っておいた"確認"のコマンドボタンを押すと、入力した文字列が   "○○○○○-○"の7文字で構成される文字列になっているか確認し、   一つでも誤りがあれば"間違っています"、誤りがなければ"問題ありません"   と表示。※○に入る数値は、0-9の数字。 3.A1-A20のすべてのセルにデータを入力しない場合もあるので、空白が  存在した時点でプログラムを終了。 ※私が作ったプログラムは、すべてのセルに入力しないと誤った文字列が    入っているのに、"問題ありません"と表示されてしまいます。

  • 入力した文字列の正誤チェック

    下記の様に動作するマクロを組みたいのですが、自分なりにチャレンジして みましたが、意図した動作が実現できず困っています。ご教授お願い致します。 1.セルA1-A20にデータを入力。 2.予め作っておいた"確認"のコマンドボタンを押すと、入力した文字列が   "○○○○○-○"の7文字で構成される文字列になっているか確認し、   一つでも誤りがあれば"間違っています"、誤りがなければ"問題ありません"   と表示。※○に入る数値は、0-9の数字。 3.A1-A20のすべてのセルにデータを入力しない場合もあるので、空白が  存在した時点でプログラムを終了。 ※私が作ったプログラムは、すべてのセルに入力しないと誤った文字列が    入っているのに、"問題ありません"と表示されてしまいます。

  • 入力した文字列の正誤チェック

    下記の様に動作するマクロを組みたいのですが、自分なりにチャレンジして みましたが、意図した動作が実現できず困っています。ご教授お願い致します。 1.セルA1-A20にデータを入力。 2.予め作っておいた"確認"のコマンドボタンを押すと、入力した文字列が   "○○○○○-○"の7文字で構成される文字列になっているか確認し、   一つでも誤りがあれば"間違っています"、誤りがなければ"問題ありません"   と表示。※○に入る数値は、0-9の数字。 3.A1-A20のすべてのセルにデータを入力しない場合もあるので、空白が  存在した時点でプログラムを終了。 ※私が作ったプログラムは、すべてのセルに入力しないと誤った文字列が    入っているのに、"問題ありません"と表示されてしまいます。

  • パスワード付のエクセルファイルをアクセスから開く方

    アクセスからエクセルのファイルを開きたいのですがうまくできません。 エクセルにはパスワードがかかっています。 なので Dim xlApp As Object Dim xlWbk As Object Set xlApp = CreateObject("Excel.Application") xlApp.Visible = True Set xlWbk = xlApp.Workbooks.Open("C:\2010.xlsx", , , , Password:="0000") Set xlApp = Nothing としたのですが、エクセルファイルが立ち上がりパスワード入力画面が表示されます。 , , , , Password:="0000" が無視されているようです。 パスワード付のエクセルファイルをアクセスから開く方法をご教授ください。

  • 必ずナビゲーションウインドウが閉じた状態で開かれま

    アクセス2010です。 とあるアクセス.accdbを開くと、 必ずナビゲーションウインドウが閉じた状態で開かれます。 毎回F11を押して、表示させているのですが、 なぜ閉じた状態で開かれるのでしょうか? そういうい設定をしてしまったのでしょうか? テーブルのみのファイルの為、vbaは使っていません。

  • バックアップについて

    お世話になります。 昨日、以下の質問をさせて頂きました。 http://okwave.jp/qa/q8979077.html 検証の為、Windows7にてバックアップをとり、作成されたVHDファイルを マウントし、特定フォルダの削除が可能か、削除後、復元は問題無いかを 検証したいと考えております。 先ほど自分のPCにて(Win7Pro)、「バックアップと復元」を使って バックアップ元としてCドライブ直下にあるフォルダを、保存先として サーバー上のフォルダを指定しバックアップを実行致しました。 そうすると、そのバックアップ先のフォルダには、  ・ホスト名(種類:ファイルフォルダー)  ・MediaID.bin(種類:BINファイル) の2つだけ作成され、肝心のVHDファイルがありません。。 ※VHDファイルが作成されるという認識でした。 バックアップしたフォルダは  フォルダA    ファイルA1    ファイルB1  フォルダB    ファイルB1    ファイルB2  フォルダC    ファイルC1    ファイルC2 という階層です。 VHDファイルは何をバックアップすれば作成されるものなの でしょうか。 それともやり方が間違っているのでしょうか。 ご教示の程、宜しくお願い致します。

  • タスクスケジューラーを使っているのですが…

    Windows7です。 予定がある場合、タスクスケジューラーに「○時○分」にメッセージが表示されるよう、設定しています。 スケジュール通りにメッセージ自体は表示されるのですが、ウィンドウの前面に表示されるわけではありません。 色々なソフトを起動している場合、ソフトの陰に隠れて見逃してしまい、タスクバーを見て初めてメッセージが表示されていることを知ることが出来る状態です。 ソフト立ち上げ中でも、前面に表示させる設定はあるのでしょうか?

  • KB3021952また来ていますが、どうしたら?

    履歴を確認すると「成功」していて、1度インストールしています!! なのに、今日また(重要)として来ました!!!(同じ数字です) どうしたら良いのでしょうか??またインストールすべきなのでしょうか?? 「Windows7用InternetExplorer11の累積的なセキュリティ更新プログラム」です。 (公開)が、2月10日になっています。 よろしく、お願いします!!

  • KB3021952また来ていますが、どうしたら?

    履歴を確認すると「成功」していて、1度インストールしています!! なのに、今日また(重要)として来ました!!!(同じ数字です) どうしたら良いのでしょうか??またインストールすべきなのでしょうか?? 「Windows7用InternetExplorer11の累積的なセキュリティ更新プログラム」です。 (公開)が、2月10日になっています。 よろしく、お願いします!!

  • ディスプレイの拡大率取得

    コントローパネルのディスプレイから、「デスクトップ上のテキスト~~縮小拡大」の処 小 100% 中 125% 大 150% で変更ができますが、この拡大率をVBで取得する方法を教えて下さい。 アクセス2013 VBA使用です。

  • ディスプレイの拡大率取得

    コントローパネルのディスプレイから、「デスクトップ上のテキスト~~縮小拡大」の処 小 100% 中 125% 大 150% で変更ができますが、この拡大率をVBで取得する方法を教えて下さい。 アクセス2013 VBA使用です。