その他(データベース)

Access2013でレポートを開いたときに「パラメータの入力」ダイアログボックスが開いてしまいます。 どこかでクエリにない識別子を使っているからというのはわかるのですが、プロパティを見てもそれがどこで使われているのか見当がつきません。 使っている場所を簡単に調べる方法はありませんか？

エクセルで出勤予定の表を入力してます。 表 ｆ１｜ｆ２｜ｆ３｜ｆ４・・・・｜ｆ１９｜ｆ２０ 日付｜曜日｜◎｜✖・・・・｜合計数値（◎の合計）｜✖の合計 それをアクセスにリンクでデータを取得して そこからユニオンクエリにて結合してるのですが 現在はｆ３～ｆ１８は人の名前が入ってまして、ｆ１９以降は集計欄としてますが 人が増えた場合は横にデータを伸ばしてるので、ｆ１９も人名に変わる可能性があります なので、ｆ２２ぐらいまで結合しておきたいのです。←この時点で発想が怪しい気はしてます。 とりあえず、現状のｆ１９以降は抽出条件ではじけると思ってるので（？）ｆ１９以降の数値型をテキスト型にしておけばいいかなと思ってやってみたらうまくいきません ＊NULL文字の使い方が正しくないといわれます。 SQL select f1,f2,"f3" as name ,f3 from [2017年] where f3 in('◎','△','保') UNION・・・・省略 union select f1,f2,"f19" as name ,cstr(f19) from [2017年] where cstr(f19) in('◎','△','保') 最後の行を打たなければ正常に結合できるのですが・・・・ 解決方法を教えていただきたく、よろしくお願いいたします。

SQLiteで作ったテーブルで、データ型をcharで指定したフィールドに全角文字を代入すると、.headerをonにして、.modeでcolumnを指定したときのselect文での表示がずれてしまいます。 具体的には、全角文字を代入したフィールドの次のフィールドがずれて表示されるのです（画像参照）。 単に表示する上での問題なので、実質的な問題にはならないのですが、他人にSQLを教えるために使いたいと思っているので、できればきちんと表示させたいと思っています。 何かいい対処法はありますでしょうか。

表の数値の空白以外を整数にしたい場合（ＩＮＴを使用したい）の方法を教えて下さい。 ＩＮＴだけ使用すると、空白部分が０と表示されてしまいます。 空白は０ではなく、空白のままにしたいのです。 以上宜しくお願い致します。

運送屋さん等毎回（近くに来ているのですが、、、）電話があり，聞くとナビで間違えた家をしめしているようです。google mapで調べると他人の家を表示していました。このような時、どこに修正を申し込めばいいのでしょうか教えてください。

会員の非公開の個人情報データ（本名・電話・住所等）と公開される情報（ニックネーム、自己PR等）のデータがあったとして、この非公開と公開情報の編集更新画面は別だったとします。 データの正規化という面では同じテーブルにしても良いと思うのですが、情報の編集画面がそれぞれ別であればテーブルを分けたほうがよい？？ not null出来ないし

すいません。 http://qa.itmedia.co.jp/qa9245657.html で質問したのですがわかりにくいこのこの上ないと思うので、画像を添付させていただきました。 まるでかこった部分でできないものです。 関係するのは 点数　負割　入金　負担金　値引き　なのですが [点数]*[負割]＝負担金（四捨五入） が主な式で、これに負担金-入金＝値引き　という式はできています。 例外が負割が200の時で 200の時のみ、[点数]×3　という式にしたいのです これに出た数は　200以上の場合　　　例　600（点数）×3＝1800 答えは1800ですが、強制的に200にしたいんです。 200以下の場合　　45（点数）×3＝135（第一位四捨五入で140） としたいのです。 例外200の場合がうまくいかないので、お分かりになる方お知恵をお貸しください。お願いします。 私が考案して間違えている式は以下になります。 Private Sub 負担金_BeforeUpdate(Cancel As Integer) If [負割] = 200 Then 　　If [点数] * 3 > 200 = X Then 　　　　X = 200 　　Else 　　　　If ([点数] * 3 Mod 10) < 5 Then 　　　　　　X = [点数] * 3 - ([点数] * 3 Mod 10) 　　　　Else 　　　　　　X = [点数] * 3 - ([点数] * 3 Mod 10) + 10 　　　　End If 　　　　 If [負割] < 199 Then 　　If [点数] * [負割] Then 　　Else 　　　　If ([点数] * [負割] Mod 10) < 5 Then 　　　　　　X = [点数] * [負割] - ([点数] * [負割] Mod 10) 　　　　Else 　　　　　　X = [点数] * [負割] - ([点数] * [負割] Mod 10) + 10 　　　　End If Public Function Rounds(ByVal M As Currency, _ 　　　　　　　　　　　 ByVal A As Integer, _ 　　　　　　　　　　　 Optional D As Integer = 0) As Variant 　　Dim R As Currency 　 　　Select Case A 　　　　Case 0 ' 四捨五入 　　　　　　R = Fix(M * 10 ^ D + 0.5@) 　　　　Case 1 '切り捨て 　　　　　　R = Fix(M * 10 ^ D) 　　　　Case 2 ' 切り上げ 　　　　　　R = Rounds(M * 10 ^ D + 0.4@, 0) 　　End Select 　　Rounds = Sgn(M) * (R / 10 ^ D) End Function

こんにちは。VBAで分からない点があるので教えてください。 下記なのですが、負割が[200]の時、[点数]×3で200を越えたら[負担金]フィールドの答えが200 それ以下は×3して四捨五入した数にしたいです。 それがどうしてもできません。 [負割]が200以外の場合は、[点数]×[負割]の出た数を四捨五入した答えを負担金フィールドに表示したいです。 お手数ですがどなたか教えてください。 Private Sub 負担金_BeforeUpdate(Cancel As Integer) If [負割] = 200 Then If [点数] * 3 > 200 = X Then X = 200 Else If ([点数] * 3 Mod 10) < 5 Then X = [点数] * 3 - ([点数] * 3 Mod 10) Else X = [点数] * 3 - ([点数] * 3 Mod 10) + 10 End If If [負割] < 199 Then If [点数] * [負割] Then Else If ([点数] * [負割] Mod 10) < 5 Then X = [点数] * [負割] - ([点数] * [負割] Mod 10) Else X = [点数] * [負割] - ([点数] * [負割] Mod 10) + 10 End If Public Function Rounds(ByVal M As Currency, _ ByVal A As Integer, _ Optional D As Integer = 0) As Variant Dim R As Currency Select Case A Case 0 ' 四捨五入 R = Fix(M * 10 ^ D + 0.5@) Case 1 '切り捨て R = Fix(M * 10 ^ D) Case 2 ' 切り上げ R = Rounds(M * 10 ^ D + 0.4@, 0) End Select Rounds = Sgn(M) * (R / 10 ^ D) End Function

図のようなテーブル「TBL_A」がCSVファイルの形で提供されます。この「TBL_A」は全レコードのテーブルあり「正」データばかりのマスターと考えてください。 このCSVデータをACCESSによみこみテーブル「TBL_A」としてあります。 「TBL_A」をいろいろな人が加工したり、抽出作業をしているのですが、「TBL_B」のような抽出をかけて渡してきた人がいたので、「データ（レコード）が足りないので、不一致クエリで足りないのを見つけておいてください」と頼んだところ、何度やってもみつけられないというので、自分でも試してみました。 図でいえば、ピンク色のレコード（行）をみつければいいのですが、Accessで不一致クエリをかけてみたところ、図の下部のようなデータしか抽出できませんでした。 やったことは2つ 1) TBL_Aを左にし、右にTBL_Bを右に配置し、不一致クエリウィザードでの矢印（→）で商品コードを紐付けた 2) 最初にTBL_AとTBL\Bをクエリで「商品コード」「価格」ぞれぞれ結びつけ（つまり２つの線）、「商品コード」「価格」を「クエリ1」として抽出。その「クエリ1」を上のTBL_Bの位置にもってきて、不一致クエリ。 どちらとも、結果は図の下のようになってしまいます。 図の上部のピンクの部分を確実に抜き出すには、どのようなクエリ（またはSELECT文）が必要でしょうか。 メモ： ・商品コードは「テキスト型」です。 ・商品コードが同じでも販売場所やいろいろな経緯で価格が違っていたり、返品の場合は返金するためマイナス金額がつくことがあり、商品コードと価格はかならずしも合致しません。 ・Accessは2010か2013を使っています。 ※今回はVBAの質問ではありません。

MSアクセス2013のSQLでLIKE検索時のエスケープ文字を別の文字に変更する ESCAPEキーワードを記述したら『演算子がありません』とエラーになったのですが 使えないんですか？ select * from テーブル where 項目 like 'abc' ESCAPE '#' ;

「fo物件登録一覧検索指定」フォーム内に、非対象/対象を区分するオプションフレームを設置、フレーム内に”対象”、”非対象”、”両方”のオプションボタンを設けています。「Qu物件登録一覧検索」クリエー内の非対象/対象フィールドには、以下の抽出条件を記入しました。結果、オプションボタンで”非対象”、”対象”を選択した時には正常に絞込みが行え、”両方”を選択した場合のみ、なにもリストが表示されない状況で、２日間ぐらい試行錯誤を繰り返し、IIF関数等いろいろ試していますが未だ堂々巡りです。 クエリの抽出条件は以下通りです。 フィールド名：対象非対象 抽出条件(1)：Switch([Forms]![fo物件検索指定]![オプションフレーム]=1,"対象",[Forms]![fo物件検索指定]![オプションフレーム]=2,"非対象") OR抽出条件(2)：Nz([Forms]![fo物件検索指定]![オプションフレーム]=3,True) ”対象”のオプション値＝1 ”非対象”のオプション値＝２ ”両方”のオプション値＝３ どうぞACCESS難民にどうかご教示をお願いします。

「負割」というフィールドがあり、0、1、2、3、200という数字が1つ選択できます。これを選択すると、「点数」というフィールドの数字と掛算されます。この合計額が「負担金」というフィールドに表示されるのですが、 ・0,1,2,3のどれかを選択した場合、 IIf(([点数]*[負割] Mod 10)<5,[点数]*[負割]-([点数]*[負割] Mod 10),[点数]*[負割]-([点数]*[負割] Mod 10)+10)) で四捨五入されます。 ・200という数字が選択されると、「点数」×「3」の合計が199まではそのまま計算された数字で表示されますが、200や200を超えても「200」にしかならない。という式を作りたいと思っています。 できないことはこの「200」という数字が選択されたときの関数で IIf([負割]>199,(IIf([点数]*3)>200,200,(IIf(([点数]*3 Mod 10)<5,[点数]*3-([点数]*3 Mod 10),[点数]*3-([点数]*3 Mod 10)+10))),(IIf(([点数]*[負割] Mod 10)<5,[点数]*[負割]-([点数]*[負割] Mod 10),[点数]*[負割]-([点数]*[負割] Mod 10)+10))) このように導き出したのですが、関数が正しくありません。 間違っているのがわかる方、いらっしゃったら教えてください。お願いします。

下記の記事で「APサーバはデータベースのトランザクション管理を行う」という記述がありますが、それはDBサーバの役割ではないでしょうか？ なにかAPサーバとDBサーバで管理の仕方が異なるのでしょうか？ もっというと、この2サーバでDBから取り出したデータの編集/加工方法は どのように変わるのでしょうか？ https://thinkit.co.jp/free/tech/6/1/1.html

MYSQLであろうがPostgreSQLであろうが、同じですか?

If Nz(DLookup("[主キー]", strテーブル名, "[主キー] = '" & str主キー & "'"), False) = True Then bl_未転記データ = True 'ないならば Else bl_未転記データ = False 'あるならば End If このコードはどこがおかしいですか？ テーブルに主キーがあるかどうかを調べたいのですが あってもなくても、 bl_未転記データ = False 'あるならば になってしまいます。

Sub test() Dim DB As Database Dim T As TableDef Dim myTable As String myTable = "Table1" Set DB = OpenDatabase(CurrentProject.FullName) For Each T In DB.TableDefs If T.Name = myTable Then DoCmd.DeleteObject acTable, myTable Exit For End If Next DB.Close Set DB = Nothing End Sub これを実行しようとすると Dim DB As Database の部分で コンパイルエラー プロジェクトではなく、ユーザ定義型を指定してください。 と言うエラーになります。 Dim DB As Objectにすればエラーにならずに進みますが 何が原因なのでしょうか？

filemaker から SQLserver へ データ移行するのに最適な方法、参考情報を教えてください filemaker8.5で作られた購入品の管理システムがあり 集計の為に慣れた、SQLSEVERやEXCELを利用したいために、 filemaker8.5のマクロでSQLserverへ出力マクロを作り、日に数回処理を行っています filemakerは入力などの面はなかなかバカに出来ない使い勝手なのですが 集計を行うには良い情報が無い・集計出来ないと思われる情報ばかりなことから 実現出来たのが上記の通りなのです filemaker自体の不具合やこの手法の汎用性のなさからデータ移行したいテーブルがあるにも関わらずなかなか進んでいません 根本的に違う、適切な方法があるのではとモヤモヤ思いながら、時間が取れ次第集計環境を作っていますので、ぜひアドバイスお願いします

よく書店に行くと店内にその本が置いているかどうかみる検索システムが 置いてありますがあれをweb上からみることはできないのでしょうか？ 　例えば人工知能だったりのテーマでどんな本があるかを調べるのに 図書館の横断検索を使うのですが書店にはそういうものがネット書店、あるいは ごく一部の古本屋を検索するものはあるのですが実際の本屋を横断検索する ものがないような感じがします。 　店内は見られるのに少し残念です。

アクセス２０１０です。 アクセスのフォームのデータシートビューの文字のサイズを8以下にしたいのですが 手作業では不可能のようです。 なのでVBAで行ないたいのですが どのようなコードを書けばいいでしょうか？

データベースで何かすることをトランザクションと言うのでしょうか?