アクセスのコード記述について

2023/07/20 20:26

このQ&Aのポイント

アクセスのデータをタグ付のテキストで出力するために、特定のコードを割り当てました。
コマンドボタンをクリックすると、データがテキストファイルとして出力されます。
しかし、タグの追加に関するコードの書き方が間違っているため、エラーが発生しています。

ベストアンサー

アクセスのコード記述について

2001/04/25 10:24

アクセスのデータをタグ付のテキストで出力するために、以下のようなコードをコマンドボタン１に割り当てました。 Private Sub コマンド1_Click() Open "c:\test.htm" For Output As #1 Print #1, "<html>" Print #1, "<title>テスト</title> Print #1, "<body>" Print #1, "<PRE>" Print #1, Me!data Print #1, </PRE> Print #1, "</body>" Print #1, "</html>" Close #1 End Sub 上記のコードに、アクセスデータ中に入っているcase_noのデータをファイル名としたイメージを読み込むために以下のタグ <IMG SRC ="c:\1234.gif">を追加したいと思い、下記のコードを追加したのですが、アクセスのコードの「"」とタグの「"」とが混在してしまっているのでエラーになってしまいます。どうしたらいいのでしょうか？ Print #1, "<IMG SRC ="c:\" & Me!case_no & ".gif">"　

patman2
お礼率24% (21/85)

オフィス系ソフト
回答数1
ありがとう数1

みんなの回答 （1）
専門家の回答

質問者が選んだベストアンサー

ベストアンサー

hequil
ベストアンサー率65% (242/372)

2001/04/25 11:03 回答No.1

Print #1, "<IMG SRC =" & Chr(34) & "c:\" & Me!case_no & ".gif" & Chr(34) & ">" とか Print #1, "<IMG SRC =""c:\" & Me!case_no & ".gif"">" でうまくいくと思います参考まで

質問者

お礼 2001/04/25 12:16

ありがとうございました

関連するQ&A

アクセスカウンタの呼び出し方
以下のような（アクセスカウンタ）をPerlで書きました #!c:/Perl/bin/Perl.exe print "Content-type:text/html\n\n"; &main; sub main { 　　　my $ninzu,@Hninzu; 　　　$ninzu=&yomikomi; 　　　@Hninzu=&sujibunaki(@Hninzu,$ninzu); 　　　print"<IMG SRC=http://localhost/data/suji/".$Hninzu[8].".gif>"; 　　　print"<IMG SRC=http://localhost/data/suji/".$Hninzu[7].".gif>"; 　　　print"<IMG SRC=http://localhost/data/suji/".$Hninzu[6].".gif>"; 　　　print"<IMG SRC=http://localhost/data/suji/".$Hninzu[5].".gif>"; 　　　print"<IMG SRC=http://localhost/data/suji/".$Hninzu[4].".gif>"; 　　　print"<IMG SRC=http://localhost/data/suji/".$Hninzu[3].".gif>"; 　　　print"<IMG SRC=http://localhost/data/suji/".$Hninzu[2].".gif>"; 　　　print"<IMG SRC=http://localhost/data/suji/".$Hninzu[1].".gif>"; 　　　print"<IMG SRC=http://localhost/data/suji/".$Hninzu[0].".gif>"; } sub yomikomi { 　　　my $ninzu; 　　　open(RH,"<","count.txt") or die"ファイルが見つかりません"; 　　　$ninzu=<RH>; 　　　close(RH); 　　　open(WH,">","count.txt"); 　　　$ninzu++; 　　　print WH"$ninzu"; 　　　return $ninzu; } sub sujibunaki { 　　　my @Hninzu,$ninzu,$i; 　　　@Hninzu=@_; 　　　$ninzu=shift; 　　　@Hninzu[8]=int $ninzu/100000000; 　　　@Hninzu[7]=int $ninzu%100000000/10000000; 　　　@Hninzu[6]=int $ninzu%100000000%10000000/1000000; 　　　@Hninzu[5]=int $ninzu%100000000%10000000%1000000/100000; 　　　@Hninzu[4]=int $ninzu%100000000%10000000%1000000%10000/10000; 　　　@Hninzu[3]=int $ninzu%100000000%10000000%1000000%100000%10000/1000; 　　　@Hninzu[2]=int $ninzu%100000000%10000000%1000000%100000%10000%1000/100; 　　　@Hninzu[1]=int $ninzu%100000000%10000000%1000000%100000%10000%1000%100/10; 　　　@Hninzu[0]=int $ninzu%100000000%10000000%1000000%100000%10000%1000%100%10;; 　　　return @Hninzu; } これを別のファイル(.html)からこのファイル(.plに)表示される画像 (カウンタ画像)だけを呼び出して.htmlに表示したいんですけど、どうすればよろしいですか？でしょうか？
- 締切済み
- Perl
JAVASCRIPTを使って、できるだけheader部分に記述せずに、
JAVASCRIPTを使って、できるだけheader部分に記述せずに、本文bodyのみに記述する形で、画像の切替え（できれば滑らかに）＋各画像へのリンク設定（PDF）を行いたいのですが、上手くできません。。色々トライしてみたのですが、分からないため質問させてもらいます。初心者で恐縮ですが、よろしくお願いします。ちなみに画像の切替だけは以下の内容でできました。 <IMG SRC="images/aaa.gif"NAME="SP" width="448" height="261"> <SCRIPT language="JavaScript">  </SCRIPT>
- ベストアンサー
- JavaScript
(/)以降を取得する
$img = "<img src=\"test/aaa.jpg\">"; $res = array(); if(preg_match_all('/<img[^>]*src="([^"]+)[^>]*>/', $img,$res)){ print "<pre>"; print_r($res); print "</pre>"; } imgタグを検索し、imgタグがあった場合(/)以降のみ取得したいのですが、そのような事は可能でしょうか？お分かりになる方よろしくお願い致します。
- ベストアンサー
- PHP
画像を使ったアクセスカウンターですが。。。
どなたか教えていただければ大変ありがたいです。画像（0.gif～9.gif）を使用し、アクセスカウンターを作る次のソースの内、 ------------------------------------------------------------------- #!c:/perl/bin/perl require './sub_lock.pl'; $countfile = "./count.log"; $lockdir = "./lockdir"; exit unless(&lock($lockdir)); open(COUNTFILE, "+<$countfile"); chomp($count=<COUNTFILE>); $count++; seek(COUNTFILE, 0, 0); print COUNTFILE "$count\n"; truncate(COUNTFILE, tell(COUNTFILE)); close(COUNTFILE); &unlock($lockdir); $count_img = sprintf("%04d", $count); $count_img =~ s/(.)/<img src=".\/images\/$1.gif">/g; print "content-type:text/html\n\n"; print $count_img; exit; ------------------------------------------------------------------- $count_img =~ s/(.)/<img src=".\/images\/$1.gif">/g; の「（.）」と「$1」になっているところが、どうも理解できなくて困っています。「=~ s」がパターンマッチであることだけは知っています。 CGI辞書などを調べてもやはり意味がわからず、お手上げ状態です。どうぞよろしくお願いいたします。
- ベストアンサー
- CGI
正規表現でタグの置換をしたいと試行錯誤しております。
正規表現でタグの置換をしたいと試行錯誤しております。もう1歩のところだと思いますがなかなかうまくいきません。 imgタグのsrcの中身を置換したいと思っております。 <img src="/uploads/abc.gif"><img src="/uploads/test/aaa.jpg"> 上記のタグを下記のように置換 <img src="cid:abc.gif"><img src="cid:aaa.jpg"> ディレクトリの部分を「cid:」とし、その後にファイル名とする。 preg_replace('/<img[^>]*src="([^"]+).+>/', "<img src=\"cid:$1\">", $body); 上記のようなコードにまではたどり着きましたがディレクトリの削除がうまくいきません。良い方法があれば教えてください。
- ベストアンサー
- PHP
アクセス2010　ナンバーリングのコードについて
アクセス2010で取引台帳テーブルに連結した入力フォームを作り、件名を入力すると契約NOを自動で採番するように下記のコードにして使っていました。しばらくはちゃんと採番されていたのですが、分類をする時に使う、２個あった区分を３個に追加して、コードも２個から３個に追加しました。それから変になった気がします。契約NOの最大値+1だと前回作られたNOと重複するようになってしまい、契約NO+2だと、最後の最大値の次のNOが作れます。なぜ突然こうなったのかが分かりません。 VBのコードをきちんと学んだ事がなく、本でサンプルを見たりしながら作っています。わかりやすく教えていただきたく、お願いいたします。契約NOは　R-KS1305-0055 Rが区分 KSがコード 1305が年月2013/05 0055が連番で採番しています。 Private Sub 物件名_AfterUpdate() Me![契約NO] = Me![区分] & "-" & Me![コード] & Format(Me![入力日], "yymm") & "-" & Format(DCount("契約NO", "取引台帳") + 1, "0000")
- ベストアンサー
- その他(データベース)
「ACCESS」レポートで、外部画像を多数表示できない
はじめまして。ACCESS初心者ですが、よろしくお願いします。レポートで外部画像を多数表示させたく、サンプルを公開しているサイト様のソースを使用しました。サンプルは、１枚表示のものだったので、「Me!img_○.Picture = myPath & "\" & [番号] & "\○.jpg"」の部分を追加してみたのですが、この場合、[番号]フォルダに指定される画像が全てないと、そのレポートが白紙になってしまいます。指定の画像がなくても、他の画像は表示される方法はありますでしょうか。ご回答よろしくお願いいたします。 Option Compare Database Private Sub 詳細_Print(Cancel As Integer, PrintCount As Integer) '指定された画像をセットする処理 '2006/04/22 pPoy On Error GoTo Err_詳細_Print Dim myPath As String myPath = CurrentProject.Path '※ Me!img_1.Picture = myPath & "\" & [番号] & "\1.jpg" Me!img_2.Picture = myPath & "\" & [番号] & "\2.jpg" 　　Me!img_3.Picture = myPath & "\" & [番号] & "\3.jpg" Exit_詳細_Print: Exit Sub Err_詳細_Print: 'ファイルが見つからなかった場合はデザイン時の画像を表示 Me!img_1.Picture = myPath & "\no_img.gif" Me!img_2.Picture = myPath & "\no_img.gif" Resume Exit_詳細_Print End Sub
- 締切済み
- オフィス系ソフト
アクセスのコードについて２
　アクセス２０００で、以下のようなコードを記述して、case_noのデータをファイル名としたhtmlファイルを、d:\data\のフォルダに出力するようにしています。 Open "d:\data\" & Me!case_no & ".htm" For Output As #1 　出力先のフォルダを各レコード毎ではなく、全体として任意に設定できるようにしたいと思い、フォルダ名を入力可能な管理テーブルを別途作成しました。　この別に作成した管理テーブルのデータを、コード内で参照したいのですが、うまくいきません。どのようにすればよいのでしょうか？
- 締切済み
- オフィス系ソフト
ソースコードがぐちゃぐちゃ
IE6使用です。ネット上で自分で作成したページをローカルに保存すると、ソースコードが期待したものになりません。タグが全部大文字になったり、 <IMG SRC=" hhh.gif width=125> のように、変な改行になったり。うまく保存できる方法ありませんか？
- 締切済み
- HTML
HTMLで表示させる記述を教えてください。
お世話になります。すいません教えてください。 $bannerには、GIFバナーにリンクが付いている内容です。内容としては、 <a href="http://www.homepage.com/"><img src="mihon.gif"></a> とします。これを、 print "$banner\n"; と書くと、バナーが表示されてしまいます。これを、ウェブ上でHTMLで<a href="http://www.homepage.com/"><img src="mihon.gif"></a>と表示させるにはどうしたらいいのでしょうか？よろしくお願い致します。
- ベストアンサー
- Perl