layy の回答履歴

全2138件中681~700件表示
  • Access テーブル設計お願いします

    架空のコンピュータ保守会社のデータベースを作るように課題を出されたのですが テーブル設計をどう作れば良いのか分かりません。 契約している顧客から出張作業を行うような会社のリレーショナル型データベースの管理システムを作りたいと思っています。 主に点検、修理、整備、移設・・・などの作業をしていく形で 訪問、保守履歴を記録できるようにし、契約者の検索や、請求書発行、作業予定表の表示などができるようにしたいです。 どのようなテーブルが必要になってくるのか教えてください。 具体的に○○表(○○○、○○○、○○○、○○○)という形でお願いします。

    • Finaly
    • 回答数2
  • 簡単なオリジナルCDを作りたい!

    こんばんは。 今度、学校のプレゼンで音楽をBGMとして流します。 中身はクリスマスSONGやオーケストラなどを組み合わせたものが良いのですが 私は、パソコンに強くありません…。 CDを買ってきたら、簡単に自分で編集して作成できると思うのですが、そのやりかたが一つも分かりません。 事前に何かソフトをインストールしなくてはいけないのでしょうか? どなたか分かりやすく教えていただけませんか? お願いいたします!

  • JR西日本新幹線沿線で子供が楽しめる体験型スポット

    12月23日、JR西日本の新幹線乗り放題切符で11歳、8歳、5歳の子供を連れて新大阪ー博多間を往復し、1-2箇所途中下車の予定です。体験型含むお勧めスポットお教えください。 12月23日、JR西日本が出している 日帰り新幹線乗り放題切符を使って小学6年(男)、3年(女)、幼稚園年中(男)を連れ、まず、朝早く新大阪から博多へ行き、帰路に1-2箇所立ち寄って新大阪に帰ろうと思います。現在の候補は、博多でラーメンを食べ、新山口に行って、レンタカーを借りて鍾乳洞見物に行き、新山口にもどり、岡山に行き、きびだんごを食べ、新大阪に戻るという計画です。 子供たちはオリジナルの服を作ったり?陶器を作ったり?といったような、観光客相手の、子供でも参加できる体験型のお店や大阪近辺にはないご当地自慢の場所に行きたいと申しております。お勧めスポットをぜひご教示ください。 なお、福岡タワー、姫路城はあまり興味がなく、長男は広島に修学旅行で参りましたので、それ以外のところに行きたいとのことです。

  • VBAのデバックをどなたかお手伝いください。

    もちろん自分でも調べてはいるのですが、急いでいるため、もしどなたか教えてくだされば大変助かります。 この(下記の)Then 以降からがわかりません。 Do Until rs.EOF '該当レコードあり If rs!MCD = "3162" Then '--------------------------------------------- strcriteria = "CAT = '" & rs!CAT & "'" ' --- A rs2.Find strcriteria, 0, adSearchForward If rs2.EOF Then ' Else rs!仕入単価世代1 = rs!仕入単価 rs!仕入単価 = rs2!discount End If '--------------------------------------------- rs!更新日 = Now() rs.Update End If 情報が不足していればお答えします。どうぞ宜しくお願いいたします。 (補足)これより前に入力されているのは以下のものです。 Dim cn As ADODB.Connection Dim cn2 As ADODB.Connection Dim rs As ADODB.Recordset Dim rs2 As ADODB.Recordset Dim strmsg As String Dim lngRet As Long Dim strcriteria As String Set cn = CurrentProject.Connection Set rs = New ADODB.Recordset Set cn2 = CurrentProject.Connection Set rs2 = New ADODB.Recordset rs.Open "商品2_T", cn, adOpenKeyset, adLockOptimistic rs2.Open "商品2_T25discountてすと", cn2, adOpenKeyset, adLockOptimistic

    • ami0607
    • 回答数19
  • エクセルで順位付けする方法を教えて下さい

    エクセルで順位付けする方法を教えて下さい。 (A列)にクラス、(B列)に学籍番号、(C列)に得点が記載された1つの表があるとします。表にはクラス、学籍番号、得点、順に並んでいないところを、関数で順位付けしたいと考えています。表示結果として、クラス毎で得点の低い順に表示したいと考えています。 具体的には、 元々の表 (A列) (B列) (C列)  A組   8   57  B組   4   41  A組   6   42  C組   3   83  C組   6   73  B組   2   83 結果の表 (A列) (B列) (C列)  A組   6   42  A組   8   57  B組   4   41  B組   2   83  C組   6   73  C組   3   83 非常に煩雑な関数になりそうですが、お力をお貸しいただきたく宜しくお願いいたします。        

  • エクセルで順位付けする方法を教えて下さい

    エクセルで順位付けする方法を教えて下さい。 (A列)にクラス、(B列)に学籍番号、(C列)に得点が記載された1つの表があるとします。表にはクラス、学籍番号、得点、順に並んでいないところを、関数で順位付けしたいと考えています。表示結果として、クラス毎で得点の低い順に表示したいと考えています。 具体的には、 元々の表 (A列) (B列) (C列)  A組   8   57  B組   4   41  A組   6   42  C組   3   83  C組   6   73  B組   2   83 結果の表 (A列) (B列) (C列)  A組   6   42  A組   8   57  B組   4   41  B組   2   83  C組   6   73  C組   3   83 非常に煩雑な関数になりそうですが、お力をお貸しいただきたく宜しくお願いいたします。        

  • ACCESS条件により自動に連番付与させるには

    処理月   |処理日 |値 |番号付与 2010/12/01|2010/12/01|Is Not Null|1 2010/12/01|2010/12/01|Is Not Null|1 2010/12/01|2010/12/02|Is Not Null|2 2010/12/01|2010/12/02|Null | 2010/12/01|2010/12/02|Is Not Null|2 2010/12/01|2010/12/01|Is Not Null|1 2010/12/01|2010/12/05|Is Not Null|3 2010/12/01|2010/12/05|Is Not Null|3 2010/12/01|2010/12/05|Null | 2010/12/01|2010/12/10|Is Not Null|4 2010/12/01|2010/12/10|Null |4 2010/12/01|2010/12/10|Is Not Null|4 2011/01/01|2010/01/05|Is Not Null|1 2011/01/01|2010/01/05|Null | 2011/01/01|2010/01/05|Is Not Null|1 2011/01/01|2010/01/05|Is Not Null|1 処理月に対してスタート 処理日にたいして値があれば番号を自動付与 *処理月の値が変更されれば番号は1から自動付与 分かる方願います

    • BSR123
    • 回答数5
  • VBAのデバックをどなたかお手伝いください。

    もちろん自分でも調べてはいるのですが、急いでいるため、もしどなたか教えてくだされば大変助かります。 この(下記の)Then 以降からがわかりません。 Do Until rs.EOF '該当レコードあり If rs!MCD = "3162" Then '--------------------------------------------- strcriteria = "CAT = '" & rs!CAT & "'" ' --- A rs2.Find strcriteria, 0, adSearchForward If rs2.EOF Then ' Else rs!仕入単価世代1 = rs!仕入単価 rs!仕入単価 = rs2!discount End If '--------------------------------------------- rs!更新日 = Now() rs.Update End If 情報が不足していればお答えします。どうぞ宜しくお願いいたします。 (補足)これより前に入力されているのは以下のものです。 Dim cn As ADODB.Connection Dim cn2 As ADODB.Connection Dim rs As ADODB.Recordset Dim rs2 As ADODB.Recordset Dim strmsg As String Dim lngRet As Long Dim strcriteria As String Set cn = CurrentProject.Connection Set rs = New ADODB.Recordset Set cn2 = CurrentProject.Connection Set rs2 = New ADODB.Recordset rs.Open "商品2_T", cn, adOpenKeyset, adLockOptimistic rs2.Open "商品2_T25discountてすと", cn2, adOpenKeyset, adLockOptimistic

    • ami0607
    • 回答数19
  • クエリーの抽出条件について

    「作表条件」というフォームにテキストボックスとして「日付1」、「日付2」を設置しています。 元のテーブルには「日付」という項目があり、「日付1」から「日付2」までのデータを抽出するため、 クエリの条件式に Between Nz([Forms]![作表条件]![日付1],#1800/01/01#) And Nz([Forms]![作表条件]![日付2],#9999/12/31#) と記述しています。 ただ、元のテーブルの日付がNULL値の場合があり、その場合「日付1」および「日付2」が空欄だとNULL値のレコードが抽出されません。 「日付」がNULLの場合でも抽出できるようにするには、どのようにすればよいでしょうか? どなたか教えてください。

  • クエリーの抽出条件について

    「作表条件」というフォームにテキストボックスとして「日付1」、「日付2」を設置しています。 元のテーブルには「日付」という項目があり、「日付1」から「日付2」までのデータを抽出するため、 クエリの条件式に Between Nz([Forms]![作表条件]![日付1],#1800/01/01#) And Nz([Forms]![作表条件]![日付2],#9999/12/31#) と記述しています。 ただ、元のテーブルの日付がNULL値の場合があり、その場合「日付1」および「日付2」が空欄だとNULL値のレコードが抽出されません。 「日付」がNULLの場合でも抽出できるようにするには、どのようにすればよいでしょうか? どなたか教えてください。

  • ACCESS条件により自動に連番付与させるには

    処理月   |処理日 |値 |番号付与 2010/12/01|2010/12/01|Is Not Null|1 2010/12/01|2010/12/01|Is Not Null|1 2010/12/01|2010/12/02|Is Not Null|2 2010/12/01|2010/12/02|Null | 2010/12/01|2010/12/02|Is Not Null|2 2010/12/01|2010/12/01|Is Not Null|1 2010/12/01|2010/12/05|Is Not Null|3 2010/12/01|2010/12/05|Is Not Null|3 2010/12/01|2010/12/05|Null | 2010/12/01|2010/12/10|Is Not Null|4 2010/12/01|2010/12/10|Null |4 2010/12/01|2010/12/10|Is Not Null|4 2011/01/01|2010/01/05|Is Not Null|1 2011/01/01|2010/01/05|Null | 2011/01/01|2010/01/05|Is Not Null|1 2011/01/01|2010/01/05|Is Not Null|1 処理月に対してスタート 処理日にたいして値があれば番号を自動付与 *処理月の値が変更されれば番号は1から自動付与 分かる方願います

    • BSR123
    • 回答数5
  • VBAのデバックをどなたかお手伝いください。

    もちろん自分でも調べてはいるのですが、急いでいるため、もしどなたか教えてくだされば大変助かります。 この(下記の)Then 以降からがわかりません。 Do Until rs.EOF '該当レコードあり If rs!MCD = "3162" Then '--------------------------------------------- strcriteria = "CAT = '" & rs!CAT & "'" ' --- A rs2.Find strcriteria, 0, adSearchForward If rs2.EOF Then ' Else rs!仕入単価世代1 = rs!仕入単価 rs!仕入単価 = rs2!discount End If '--------------------------------------------- rs!更新日 = Now() rs.Update End If 情報が不足していればお答えします。どうぞ宜しくお願いいたします。 (補足)これより前に入力されているのは以下のものです。 Dim cn As ADODB.Connection Dim cn2 As ADODB.Connection Dim rs As ADODB.Recordset Dim rs2 As ADODB.Recordset Dim strmsg As String Dim lngRet As Long Dim strcriteria As String Set cn = CurrentProject.Connection Set rs = New ADODB.Recordset Set cn2 = CurrentProject.Connection Set rs2 = New ADODB.Recordset rs.Open "商品2_T", cn, adOpenKeyset, adLockOptimistic rs2.Open "商品2_T25discountてすと", cn2, adOpenKeyset, adLockOptimistic

    • ami0607
    • 回答数19
  • マクロで業務の流れを説明する資料を作りたい

    業務の流れや方法を紙ではなくマクロを使用して若手社員が困ったときに参照できる ようなマニュアルのようなものを作りたいと思っているのですが、具体的に思い描いて いるのは、エクセルで例えば年間の1~10までの大まかな業務項目のボタンを配置し 知りたい業務のボタンを押すと細かい項目ボタンの画面に切り替わり、詳細業務ボタ ンを押すと具体的な処理例の画面(エクセル,ワード、PDF)が表示される。 処理例の画面で「チェック」ボタンを配置し、押下するとポップアップ画面で「○○は ありますか?」,「○○は捺印済みですか?」という確認メッセージが出てくる。 確認メッセージに配置された「はい」,「いいえ」のボタンを押下すると「はい」なら 次の確認メッセージがでる。「いいえ」なら「○○からデータを調べて下さい」などと サポートメッセージがでる。 必要な確認メッセージが全て終わったら、「この業務は完了です」とメッセージがでる。 頭の中のイメージは以上です。 完成している簡単なマクロをいじって自分の必要な形にしたことはあるのですが、 ゼロから作ったことがないので全然進まなくて困っています。 特にポップアップ画面の確認メッセージで次に進んでいく作り方が分からないので、 ご教授下さい。

    • noname#143314
    • 回答数1
  • Access2003 複雑な条件のデータ抽出

    ☆1つのテーブルで、フィールド[A]~[C]があり、文字および英数字のデータが混在しています。 (ただし、フィールド[C]には、空欄(Null)になっている場合があります) =========================================================== (テーブル(1)) No  [A]      [B]    [C]     [D]      [E]      [F] 1   111      X    あ       2   222      X     か   3   333      X     さ  4   111      Y    た 5   222      Y   (Null)  6   333      Y     は 7   222      Z     ま   8   333      Z     や  9   111      Z    ら    =========================================================== [課題] (1) テーブル(1)のフィールド[A]の値を参照し、「111」の場合は、   フィールド[C]の値を[D]へ抽出する([B]でグループ化) (2) 同様に、フィールド[A]の値を参照し、「222」の場合は、   フィールド[C]の値を[E]へ抽出する([B]でグループ化) (3) 同様に、フィールド[A]の値を参照し、「333」の場合は、   フィールド[C]の値を[F]へ抽出する([B]でグループ化) (4) 新規クエリにて、上記課題(1)~(3)の条件を指定して実行すると    以下の抽出結果が表示される =========================================================== [抽出結果] (テーブル(2)) No  [B]    [D]    [E]      [F] 1   X     あ    か      さ     2   Y     た   (Null)    は   3   Z     ら    ま     や =========================================================== 別々のレコードにあるフィールド[C]の値を、条件に従い テーブル(2)のように1つのレコードにまとめたいのです。  大変恐縮ですが、私はSQLが書けないので、フィールド欄へ関数式を 入力して条件を指定しております。 できましたら、各フィールドへ入力する関数式を教えていただけると助かります。 また、関数だけでは出来ない場合は、SQLで教えていただければ幸いでございます。 お手数お掛けしますが、何とぞ宜しくお願い致します。

    • KTN1123
    • 回答数2
  • 課題で悩んでます

    #include <stdio.h> void main(){ int okane; float kion; printf("今日のお金は?\n"); scanf("%d",&okane); printf("今日の気温は?\n"); scanf("%f",&kion); if( okane >=700&&kion>=30.0 ){ printf("冷やし中華を食べよう\n"); } if( okane >=700&&kion<30.0 ){ printf("ラーメンを食べよう\n"); } if( okane <=700){ printf("バイトしろ"); } } この文で論理演算子を抜いてifelse文に書き換えろという課題が出たのですが分からないので全文教えて下さい

  • プログラミングVisual Studio 2008

    大学のプログラミングの授業があります。 はじめてから1年以上たつのですがチンプンカンプンです。 大学の教科書はわかりにくく基礎からはじめられるような本をさがしています。 出来れば言語の意味、mojiの結合、反転させてからの結合、、指定した範囲の中にいれる等のことが詳しくがのっているものがいいです。ほかにもわかりやすい教材があったら教えてください。

    • noname#124070
    • 回答数1
  • VBAのデバックをどなたかお手伝いください。

    もちろん自分でも調べてはいるのですが、急いでいるため、もしどなたか教えてくだされば大変助かります。 この(下記の)Then 以降からがわかりません。 Do Until rs.EOF '該当レコードあり If rs!MCD = "3162" Then '--------------------------------------------- strcriteria = "CAT = '" & rs!CAT & "'" ' --- A rs2.Find strcriteria, 0, adSearchForward If rs2.EOF Then ' Else rs!仕入単価世代1 = rs!仕入単価 rs!仕入単価 = rs2!discount End If '--------------------------------------------- rs!更新日 = Now() rs.Update End If 情報が不足していればお答えします。どうぞ宜しくお願いいたします。 (補足)これより前に入力されているのは以下のものです。 Dim cn As ADODB.Connection Dim cn2 As ADODB.Connection Dim rs As ADODB.Recordset Dim rs2 As ADODB.Recordset Dim strmsg As String Dim lngRet As Long Dim strcriteria As String Set cn = CurrentProject.Connection Set rs = New ADODB.Recordset Set cn2 = CurrentProject.Connection Set rs2 = New ADODB.Recordset rs.Open "商品2_T", cn, adOpenKeyset, adLockOptimistic rs2.Open "商品2_T25discountてすと", cn2, adOpenKeyset, adLockOptimistic

    • ami0607
    • 回答数19
  • くりぃむしちゅー上田晋也さんの奥さんは何歳ですか?

    くりぃむしちゅー の上田晋也の奥さんは何歳ですか? 第二子を出産されたそうですが、HPで探しても年齢はみんな知らないようです。 奥さんの年齢を良かったら教えてください。

    • noname#156230
    • 回答数1
  • 近鉄名古屋駅から新幹線への乗換時間

    今週末に、名古屋駅で新幹線に乗り換えて熱海へ行く予定です。 予定している電車は、  午前7時45分着 近鉄名古屋駅  午前7時58分発 JR名古屋駅(新幹線) …東京行き(こだま) です。 13分の乗換で間に合うでしょうか。また、どのように行けばよいでしょうか。 日帰りなので、荷物はあまりありません。 近鉄のサイトでは、乗換10分(地下改札口を経由した場合15分)と書かれ、 駅構内図もあります。しかしよくわかりません。 近鉄名古屋駅から名鉄、地下鉄は何度も利用したことがあるのですが JRだけは利用したことがなくイメージがわきません。 近鉄名古屋駅の地下鉄方面に行く改札ではなく、正面(トイレ横?)に JRへの連絡口改札(名称は不明です…)があるのは覚えています。 その改札から出ればよいのでしょうか。 切符は前日までに用意する予定です。 乗り換え時間が厳しいようであれば、近鉄を早めるか新幹線を遅らせます。 どうぞよろしくお願いいたします。

    • anjekko
    • 回答数2
  • 今、お勧めのノートPCを教えて下さい。

    ノート パソコン 購入予定です。 下記のように贅沢な機能でリーズブナルな機種があれば、ご教示下さい。 (1)早い (2)テレビ(地デジが見れる、撮れる、DVDにとれる) (3)マウス付き。(他、付けて便利なPC周辺機器) (4)4GB? (5)WINDOWS 7 (6)同じ型で、各店の価格比較 (7)電気店とネットでの購入を比較。ネット 不要なソフトを省くことができる。(費用の削減につながる) (8)音質・画質は。ハイビジョン映像 (9)ブルーレイ 対応 (10)ボディーの色は豊富 (11)テレビに繋げて、PC画面をテレビで見れる(TV端子付) (12)その他、お勧め機能 欲張りな条件で申し訳ございませんが、宜しくお願い致します。

    • 2467107
    • 回答数5