Access2000 WindowsXPを使っています。
テーブルAのフィールドには12345と5ケタで入っているものがあって、
テーブルBは同じ番号ですが、123450と末尾に0がつき6ケタで表されているので、
桁を合わせたいと思っています。

末尾に0をつける方法を教えてください。

このQ&Aに関連する最新のQ&A

A 回答 (2件)

>末尾に0をつける方法を教えてください。



Access2000の環境がありませんので確認はできませんが、考え方として更新クエリ を作成して
実行することでできると思います。
http://www.seta.media.ryukoku.ac.jp/manual/offic …
に更新クエリの作成手順がありました。
レコードの更新の部分は [フィールド名] & "0" とかになると思います。
    • good
    • 0
この回答へのお礼

回答ありがとうございます。
早速会社で試してみたところうまく行きました!
次回もまた教えてください。

お礼日時:2011/04/25 18:52

クエリ(オブジェクト)を選び


新規作成
デザインビュー
OK
デザイングリッドが出るが、そのままさわらずで
表示
SQLビュー
そこの画面に
UPDATE 社員4 SET 地区 = 地区 & "0";
を入れて実行(!マークをクリック)
SQL分の意味は、社員4テーブルの「地区」フィーッルドの後部に0をくっつけます。
VBAでレコード処理する方法も含め、数種のやり方があると思うが。
    • good
    • 0
この回答へのお礼

回答ありがとうございます。
当方ド素人でSQL文は書いたことがなかったので、とても勉強になりました。
また教えてください。

お礼日時:2011/04/25 18:56

このQ&Aに関連する人気のQ&A

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

QACCESS2003のデータアクセスページの使い方について

イントラ内でACCESS2003のデータアクセスページを使いたい。

1.ACCESS2003のデータアクセスページを作成しました。
2.そのMDBファイルと、データアクセスページ(htmファイル)を、WINDOWS2000ServerのInetpub内のwwwrootフォルダの中へ入れました。
3.ここにはイントラ内のHPなどを置いています。(普通に見れています。)
4.クライアントから、データアクセスページのhtmファイルを見に行くと「データソースログオン」が立ち上がります。(パスワードを設定しています。)
5.パスワードを入れるとデータアクセスページ(htm)から、通常のアクセスのフォームのごとくデータ入力が出来る予定なのですが(泣)できません。(泣)

で、悩んでおります。

ACCESS2003のMDBファイルとデータアクセスページ(HTMファイル)をサーバーのwwwrootへ置いただけでは、データアクセスページを通してmdbファイルへの入出力は不可能なのでしょうか?

Aベストアンサー

MDBに接続されたAccessプロジェクトを開いている場合データアクセスページは自動的にそのデータベースに接続されてそのパスがデータアクセスページのConnectionString プロパティに設定されます。
ページを作成した後でデータベースを移動またはコピーした場合はConnectionString プロパティに設定されているパスを更新して新しい保管場所を設定する必要がありますがどうなっていますか?
そこを確認してみてください。

QAccess テーブルAにテーブルBのデータを追加

Accessで、テーブルAにテーブルBのデータ(全部)を追加したいです。
初歩的な質問でスミマセン。

Aベストアンサー

簡単にやるにはテーブルBのクエリをクエリウィザードで作り そのクエリをテーブル追加クエリにすれば簡単にできます。
クエリウィザードで作ったテーブルBのクエリをデザインビューで開きメニューのクエリにある追加を選ぶかデザインビュー上で右クリックでクエリの種類から追加を選びます。
追加を選ぶとテーブルを選択できますのでそこでテーブルAを選びます。テーブルBとテーブルAのフィールド名が同じならレコードの追加欄にフィールド名が自動で表示されます。フィールド名が異なる場合はレコードの追加欄をクリックしてテーブルAの追加先のフィールド名をそこで指定します。
クエリを保存します。
保存したクエリをダブルクリックすればテーブルBのレコードがテーブルAに全部追加されます。

Qホームページ移転に伴う.htaccessの使い方ですがアップロードして

ホームページ移転に伴う.htaccessの使い方ですがアップロードして削除できなくなる事ないですか??また、さくらサーバーは.htaccess使えますか??

Aベストアンサー

.htaccessだけではなく、
ファイルはパーミッションによっては一旦削除できなくなると思いますよ・・・
使えないのにアップすると削除出来ないとか。

>さくらサーバーは.htaccess使えますか??
使えます。
.htaccessを使えない有料サーバってあるのでしょうか?・・・

QACCESS2000でテーブルをVBAからテーブルを読み込む方法

ACCESS2000を使っています。
以下の指定をした場合、「ユーザ定義型は定義されていません」のメッセージが出て、コンパイルが通りません。
なにかインストールや設定が必要なのでしょうか?

Dim db As Database
Dim rs As Recordset

Set db = CurrentDb()
Set rs = db.OpenRecordset("テーブル名", dbopendynaset)

ヘルプ等を自分なりに参照してみたのですが、わかりません。教えてください。

Aベストアンサー

DAOの参照設定が、されていますでしょうか?

モジュールウィンドウを開いて、ツール→参照設定で、
Microsoft DAO 3.* Object Library がチェックされていないようでしたら、チェックしてみください。

今、Access2000が手元にないので自信がありませんが、Recordsetは ADO でも使えるようですが、Database はDAO のオブジェクトかと思います。

QAccessで作成したテーブルのOLEオブジェクトの使い方

Accessで作成したテーブルにデータ型(OLEオブジェクト型)で画像を取り込みできるようにしました。
取り込みした画像を開くためのフォームを作成して画像を開けるようにしました。
下記の内容です。

Private Sub Form_Open(Cancel As Integer)
Form.Caption = ProgName
End Sub

しかし「ビットマップ形式」ですと問題なく開くのですが、「JPG形式」ですと開けないのです。取り込みしたAccessテーブルのフィールドから直接だとひらけます。
Accessで作成したフォームから、「JPG形式」の画像を開くにはどうすればよろしいですか?
また、画像を1000件ほど取り込みすると大きいデータベースになってしまいます。Accessのデータベースのサイズは制限があるのかしら?
アドバイスいただけれは幸いです。

Aベストアンサー

Access のバージョンは?
んで Web で検索する努力はしましょうよ。
丸 1日ぐらい検索しっぱなしで悩まないと。

Google「access ole jpeg」で検索
http://www.google.com/search?hl=ja&lr=lang_ja&ie=UTF-8&oe=UTF-8&q=access+ole+jpeg&num=50

Access 2003 では以下のような制限があるようです。
■ Access 2003 で OLE オブジェクトとして JPEG および GIF 画像を取り扱う場合の注意事項
http://support.microsoft.com/kb/884484/ja

■ OLE オブジェクト型のフィールドに格納されているイメージが正しく表示されません
http://support.microsoft.com/kb/832508/ja

解決策としては JPEG を開ける OLE コンテナになるアプリケーションをインストールしておく。

Google「Access データベース サイズ 制限」で検索
http://www.google.com/search?hl=ja&num=50&q=Access+%E3%83%87%E3%83%BC%E3%82%BF%E3%83%99%E3%83%BC%E3%82%B9+%E3%82%B5%E3%82%A4%E3%82%BA+%E5%88%B6%E9%99%90&lr=lang_ja

Access のバージョンは?
んで Web で検索する努力はしましょうよ。
丸 1日ぐらい検索しっぱなしで悩まないと。

Google「access ole jpeg」で検索
http://www.google.com/search?hl=ja&lr=lang_ja&ie=UTF-8&oe=UTF-8&q=access+ole+jpeg&num=50

Access 2003 では以下のような制限があるようです。
■ Access 2003 で OLE オブジェクトとして JPEG および GIF 画像を取り扱う場合の注意事項
http://support.microsoft.com/kb/884484/ja

■ OLE オブジェクト型のフィールドに格納されているイメージが正...続きを読む

QAccess2000 ADOを使ってフォーム上のデータをテーブルに書き込む

質問させていただきます。
フォーム(帳票)上の複数レコードを「コマンドボタン」をクリックしたときにテーブルに書き込みたいのですが・・・以下のようなコード(一部省略)では1件目しか書き込みできません。繰り返しフォーム上の最後のレコードまで書き込むにはどうすれば良いでしょうか?ご教授願います。

RST.AddNew

RST!計上日付 = Me![計上日付]
RST!原料コード = Me![原料コード]
RST!入庫数 = Me![発注数]
RST!単価 = Me![単価]
RST!金額 = Me![金額]
RST!消費税 = Me![消費税]
RST!LotNo = Me![LotNo]

RST.Update

MsgBox "処理が終了しました。", vbInformation

Aベストアンサー

申し訳ないです。間違えました。

DoCmd.RunCommand acCmdRecordsGoToFirst
Do Until Me.NewRecord
  With RST
    .AddNew
    ...
    .Update
  End With
  DoCmd.RunCommand acCmdRecordsGoToNext
Loop

としてください。

QAccess2000でFTPの使い方について。

Access2000のフォームから、実行のボタンをクリックするとFTPサーバに接続→ファイル取得→Accessテーブルに取込→FTPサーバのファイル削除→FTPサーバの接続切断という処理をしたいのですがどのようにしたらよいかわかりません。説明不足だとは思いますが、アドバイスを宜しくお願い致します。

Aベストアンサー

ちなみに先ほどのFTPサンプルは、BASP21をインストール後、サンプルのコードを新規モジュールに貼り付けて(たとえば以下をまるごと)実行すればAccessでもそのまま動きます。

sub file_download()

Dim ftp As Object, rc As Long, v As Variant, v2 As Variant
Dim ctr As Long

Set ftp = CreateObject("basp21.FTP")
ftp.OpenLog "c:\temp\log.txt"
rc = ftp.Connect("ftp.microsoft.com", "anonymous", "")
If rc = 0 Then
v = ftp.GetDir("bussys/winnt/winnt-public", 2) ' ディレクトリ一覧(詳細)
If IsArray(v) Then
For Each v2 In v
Debug.Print v2
Next
End If
v = ftp.GetDir("bussys/winnt/winnt-public") ' ディレクトリ一覧(ファイル名のみ)
If IsArray(v) Then
For Each v2 In v
Debug.Print v2
Next
End If
rc = ftp.GetFile("bussys/winnt/winnt-public/*", "c:\temp") 'ファイル受信

end sub

実行には20秒ほどかかります。
実行前にはCドライブにtempというフォルダを作っておいてください。

ちなみに先ほどのFTPサンプルは、BASP21をインストール後、サンプルのコードを新規モジュールに貼り付けて(たとえば以下をまるごと)実行すればAccessでもそのまま動きます。

sub file_download()

Dim ftp As Object, rc As Long, v As Variant, v2 As Variant
Dim ctr As Long

Set ftp = CreateObject("basp21.FTP")
ftp.OpenLog "c:\temp\log.txt"
rc = ftp.Connect("ftp.microsoft.com", "anonymous", "")
If rc = 0 Then
v = ftp.GetDir("bussys/winnt/winnt-public", 2) ' ディレクトリ一...続きを読む

QAccess2000 ADOを使ってフォーム上のデータをテーブルに書き込む

質問させていただきます。
帳票形式フォームの反復しているレコードをコマンドボタンのクリックでテーブルに書き込みたいので今朝からいろいろ試しているのですが、以下のコードを書いてみました(一部省略)。

DoCmd.RunCommand acCmdRecordsGoToFirst
Do Until Me.NewRecord
DoCmd.RunCommand acCmdRecordsGoToNext
With RST
RST.AddNew
RST!日付 = Me![日付]
RST!原料コード = Me![原料コード]
RST!入庫数 = Me![発注数]
RST!単価 = Me![単価]
RST!金額 = Me![金額]
RST!消費税 = Me![消費税]
.Update
End With
Loop

結果は・・・テーブルには2行目から書き込まれる。「コマンドまたはアクション’次のレコードへ’は無効です」が出る。
どうすればエラーも出ず、フォーム上のすべてのデータが書き込めるでしょうか?

質問させていただきます。
帳票形式フォームの反復しているレコードをコマンドボタンのクリックでテーブルに書き込みたいので今朝からいろいろ試しているのですが、以下のコードを書いてみました(一部省略)。

DoCmd.RunCommand acCmdRecordsGoToFirst
Do Until Me.NewRecord
DoCmd.RunCommand acCmdRecordsGoToNext
With RST
RST.AddNew
RST!日付 = Me![日付]
RST!原料コード = Me![原料コード]
RST!入庫数 = Me![発注数]
RST!単価 = Me![単価]
...続きを読む

Aベストアンサー

こんにちは。maruru01です。

とりあえず、
>帳票形式フォームの反復しているレコード
とは何かが不明ですが、やりたいのは、フォームのレコードソースのテーブルのデータを他のテーブルへコピーしたいということでしょうか?
それなら、いちいちフォームで移動する必要はないと思います。
レコード追加のSQL文を書いて実行すればいいのでは?
データを書き込むテーブルを[テーブルA]、フォームのレコードソースのテーブルを[テーブルB]とすると、


Dim strSQL As String

strSQL = "INSERT INTO テーブルA (日付, 原料コード, 入庫数, 単価, 金額, 消費税) " & _
   "SELECT 日付, 原料コード, 発注数, 単価, 金額, 消費税 FROM テーブルB"
DoCmd.RunSQL strSQL

QRuby on Rails 「attr_accessor」 の使い方に

Ruby on Rails 「attr_accessor」 の使い方について

こんにちは。

現在、Ruby on Railsで登録画面を作成しているのですが、attr_accessorで定義した項目に対して、validationのチェックを行うと、問題が起きてしまいました。

attr_accessorで定義した項目は、DB登録の対象ではないのですが、lengthのチェック等を行う必要があり、validates_length_of等を使って入力チェックを行っています。

問題になったのは、入力があったときだけチェックをかけたいのに、入力がなくてもチェックがかかってしまうという状態になってしまうことです。
「:if => 項目?」を書いてみると、「undefined method」のエラーがでてしまいます。

どなたか対応策の分かる方がおられましたらご教授いただけないでしょうか?

下記に実際の問題箇所のモデルクラスのソースを書いておきます。

 class User < ActiveRecord::Base

   attr_accessor :NEW_USER_PW ← 追加したアクセサ

   # 追加したアクセサに対するチェック
   validates_length_of :NEW_USER_PW, :minimum=>4, :message=>"は%d桁以上を設定してくださ            
    い。", :on => :update, :if => :NEW_USER_PW?

 end

上記のチェック内の「:if => :NEW_USER_PW?」で落ちてしまいます。
入力がないのにチェックに引っかかるとまずいので、入力がないときだけ上記チェックを行えれば良いのですが・・・。

どうぞ宜しくお願い致します。

Ruby on Rails 「attr_accessor」 の使い方について

こんにちは。

現在、Ruby on Railsで登録画面を作成しているのですが、attr_accessorで定義した項目に対して、validationのチェックを行うと、問題が起きてしまいました。

attr_accessorで定義した項目は、DB登録の対象ではないのですが、lengthのチェック等を行う必要があり、validates_length_of等を使って入力チェックを行っています。

問題になったのは、入力があったときだけチェックをかけたいのに、入力がなくてもチェックがかかってしまうという状...続きを読む

Aベストアンサー

attr_accessor :NEW_USER_PWを定義したからといって、
NEW_USER_PW?メソッドが定義されるわけではりません。
attr_accessorはゲッターとセッターメソッドを作るだけです。
それ以外の論理値を返すようなメソッドは自作しなければなりません。

NEW_USER_PW?メソッドを作成されていないのなら、「undefined method」が
出てしまうのは当然です。

質問にあるように、「入力があった場合のみ」とありますので、
NEW_USER_PW?メソッドを下記のように実装すればチェック可能です。

def NEW_USER_PW?
@NEW_USER_PW.size > 0
end

また、ifにはprocオブジェクトを渡すこともできますので、
:if => Proc.new{|u| u.NEW_USER_PW.size > 0}
と書いてもいいでしょう。


NEW_USER_PWというインスタンス変数はすべて大文字を使用されていますが、
見る人によっては定数と勘違いします。
変数であれば小文字表記を利用するほうが良いかもしれません。

attr_accessor :NEW_USER_PWを定義したからといって、
NEW_USER_PW?メソッドが定義されるわけではりません。
attr_accessorはゲッターとセッターメソッドを作るだけです。
それ以外の論理値を返すようなメソッドは自作しなければなりません。

NEW_USER_PW?メソッドを作成されていないのなら、「undefined method」が
出てしまうのは当然です。

質問にあるように、「入力があった場合のみ」とありますので、
NEW_USER_PW?メソッドを下記のように実装すればチェック可能です。

def NEW_USER_PW?
@NEW_USER_PW.s...続きを読む

QOffice2000 Personalの環境にAccess2000を追加インストールする場合

お世話になります。

現在Office2000 Personalがインストールされている環境に、
Access2000を追加でインストールしたいのですが、この場合、
インストール先のフォルダは変更しなければならないのでしょうか?
OSはWindowsXPです。

Aベストアンサー

こんにちは。

返事、どうもありがとうございます。

もう、だいぶ前の話になってしまうので、あまり具体的に指示できないのですが、私も同じケースでしたが、単純にインストールしただけですね。

>既存のOfficeの環境が損なわれないかを心配しております。

あまり、ご心配はいらないと思うのです。
つまり、Officeのインストールフォルダ自体は、現在のご自身のものをみても、たぶん、ご想像がつくはずです。

Program File側の Microsoft フォルダには、実行ファイルは混在してしまっているし、Access自身の設定ファイルは、別のフォルダのApplication Data\Microsoft 側に、Excel はExcelに、WordにはWordのフォルダが作られるわけですから、既存の環境自体を壊すことはないですね。もともと、Officeは、複合的に使えるように最初から、そういう設計なのだと思います。


人気Q&Aランキング

おすすめ情報