回答数
気になる
-
pythonの実行に関する質問
今、Pythonで簡易的に集計できるものを作りました。それをVS codeからpyファイルで保存しています。 そこからダブルクリックで実行できるようにbatの拡張子を使って完了時に完了と出るように記述していたのですが、完了の文字が出ているのですが集計自体はできていません。 かれこれ2時間くらい格闘していてどうしたら良いのか迷っています。 なにかアドバイスなどいただけると嬉しいです。 よろしくお願いします。
質問日時: 2025/04/12 13:06 質問者: Hamu1976 カテゴリ: その他(プログラミング・Web制作)
ベストアンサー
2
0
-
phpの問い合わせフォームを作ったのですが・・
phpのメール問い合わせフォームでエラーが・・ phpでメール問い合わせフォームを作り、テストプレイしたのですが、 CSRFトークンが無効です とエラー画面が出ます。。どう修正すればいいでしょうか、、 phpコードは下記です。 <?php session_start(); session_regenerate_id(true); // セッションID再生成 $mode = 'input'; // 初期状態は入力画面 $errmessage = array(); // CSRFトークンの生成 if (empty($_SESSION['token'])) { $_SESSION['token'] = bin2hex(random_bytes(32)); // セッションにトークンを格納 } // 送信ボタンが押された場合 if (isset($_POST['send']) && $_POST['send']) { // トークンの存在確認 if (empty($_POST['token']) || $_POST['token'] !== $_SESSION['token']) { die('CSRFトークンが無効です'); } // 入力チェック if (empty($_POST['fullname'])) { $errmessage[] = "名前を入力してください"; } else if (mb_strlen($_POST['fullname']) > 20) { $errmessage[] = "名前は20文字以内にしてください"; } $_SESSION['fullname'] = htmlspecialchars($_POST['fullname'], ENT_QUOTES); if (empty($_POST['email'])) { $errmessage[] = "Eメールを入力してください"; } else if (mb_strlen($_POST['email']) > 200) { $errmessage[] = "Eメールは200文字以内にしてください"; } else if (!filter_var($_POST['email'], FILTER_VALIDATE_EMAIL)) { $errmessage[] = "メールアドレスが不正です"; } $_SESSION['email'] = htmlspecialchars($_POST['email'], ENT_QUOTES); if (empty($_POST['message'])) { $errmessage[] = "お問い合わせ内容を入力してください"; } else if (mb_strlen($_POST['message']) > 500) { $errmessage[] = "お問い合わせ内容は500文字以内にしてください"; } $_SESSION['message'] = htmlspecialchars($_POST['message'], ENT_QUOTES); // エラーがなければ送信処理 if (empty($errmessage)) { // メール送信処理 $message = "お問い合わせを受け付けました \r\n" . "名前: " . htmlspecialchars($_SESSION['fullname'], ENT_QUOTES) . "\r\n" . "Eメール: " . htmlspecialchars($_SESSION['email'], ENT_QUOTES) . "\r\n\n" . "お問い合わせ内容:\r\n" . preg_replace("/\r\n|\r|\n/", "\r\n", htmlspecialchars($_SESSION['message'], ENT_QUOTES)); // ユーザーへの確認メール送信 mail($_SESSION['email'], 'お問い合わせありがとうございます', $message); // 管理者への通知メール送信 mail('aaaaaa@gmail.com', 'お問い合わせがありました', $message); // セッションをクリアして完了画面を表示 $_SESSION = array(); $mode = 'send'; } } else { // 入力画面 $mode = 'input'; } ?> <!DOCTYPE html> <html lang="ja"> <head> <meta charset="utf-8"> <title>お問い合わせフォーム</title> </head> <body> <?php if ($mode == 'input') { ?> <!-- 入力画面 --> <?php if ($errmessage) { echo '<div style="color:red;">'; echo implode('<br>', array_map('htmlspecialchars', $errmessage)); echo '</div>'; } ?> <form action="contactform.php" method="post"> 名前<input type="text" name="fullname" value="<?php echo $_SESSION['fullname'] ?? ''; ?>"><br> Eメール<input type="email" name="email" value="<?php echo $_SESSION['email'] ?? ''; ?>"><br> お問い合わせ内容<br> <textarea cols="40" rows="8" name="message"><?php echo $_SESSION['message'] ?? ''; ?></textarea><br> <!-- トークンの送信 --> <input type="hidden" name="token" value="<?php echo $_SESSION['token']; ?>"> <input type="submit" name="send" value="送信" /> </form> <?php } else if ($mode == 'send') { ?> <!-- 完了画面 --> <p>送信しました。お問い合わせありがとうございました。</p> <?php } ?> </body> </html>
解決済
1
0
-
chatGPTみたいに画像生成出来るサイトを教えてください!無料で、!! cheatGPTのプライム
chatGPTみたいに画像生成出来るサイトを教えてください!無料で、!! cheatGPTのプライムかなにか持ってますが画像生成制限くらいしました。、
質問日時: 2025/04/04 01:18 質問者: HarleyQuinn カテゴリ: CGI
解決済
2
0
-
4
レスポンシブで困っています・・
レスポンシブデザインについて勉強中なのですが 自作したウェブサイトへの導入で躓いています、、 主に画像やテキストの中央揃えなのですが 当初、firefoxで作成時はcssにて中央に揃っていたのが googlechromeでレスポンシブを確認したところ きちんと反映されているものもあれば効果が出ていないものもあり頭を抱えております、、 使うブラウザ、又、pcとスマホ or ipadではそれぞれcss反映に違いが出てくるものなのでしょうか。。 下記はhtmlコード 画像はcssコードになります。 説明が分かりづらくてすみません、、、 <!DOCTYPE html> <html lang="ja"> <head> <meta charset="UTF-8"> <meta name="viewport" content="width-device-width,initial-scale=1"> <title>〇〇教室</title> <link rel="stylesheet" type="text/css" href="css/project1.css"> <link rel="stylesheet" type="text/css" href="css/project1.responsive.css"> </head> <body> <header id="header"> <div class="inner"> <h1 class="logo"> <a href="file:///C:/Users/81806/Desktop/html/project1.html"><img src="images/project/title1.png" alt=""></a> </h1> <nav> <ul> <li><a href="#cast">講師紹介</a></li> <li><a href="#business-info">教室内容</a></li> <li><a href="#gallery">教室風景</a></li> <li><a href="#news">更新履歴</a></li> <li><a href="#mail">お問い合わせ</a></li> </ul> </nav> <div class="icon"> <a href="https://www.instagram.com/aki4190210/" target="blank" rel="noopener noreferrer"><img src="images/project/instagramkuro.png"></a> <a href="https://x.com/aki4190210" target="_blank" rel="noopener noreferrer"><img src="images/project/twitterkuro.png"></a> </div> </div> </header> <main> <section class="mainvisual"> <img src="images/project/piano1.jpg"> </section> <section id="cast" class="wrapper"> <h2 class="menu-title">講師紹介</h2> <div class="cast-image"> <img src="images/project/project1-cast.png" alt="テキストテキストテキスト"> <div class="cast-info"> <p> <span>名前</span>:田中 太郎<br> <span>誕生日</span>:1991/12/24<br> <span>血液型</span>:B型<br> <span>出身地</span>:北海道<br> <span>経歴</span> :北海道出身、昭和音楽大学大学院卒業。<br> 5歳からピアノを始め、以来、国内のコンクールを多数受賞。 <br> <span>愛車</span>:CBR2000<br> <span>趣味</span>:バイク・料理・旅行・人間観察<br> <span>好きな食べ物</span>:うどん 豚の角煮<br> <span>座右の銘</span>:Be yourself<br> <span>コメント</span>:初心者から経験者までのお子様が<br> 楽しみながら上達できるよう指導致します。<br> </p> </div> </div> </section> <section id="business-info" class="wrapper"> <h2 class="menu-title">講座内容</h2> <div class="line"></div> <div class="business-info"> <p> <span>開講日</span>:毎週水曜日<br> <span>時間</span>:14時~17時<br> <span>場所</span>:大阪府〇〇市◇◇区☆丁目♡番▢号<br> <span>費用</span>:6,000円/回<br> <span>参加資格</span>:小学1~6年生対象<br> <span>その他</span>:大阪駅から徒歩5分圏内<br> </p> </div> </section> <section id="gallery" class="wrapper"> <h2 class="menu-title">教室風景</h2> <div class="line"></div> <ul> <li><img src="images/project/piano2.jpg" alt="テキストテキストテキスト"></li> <li><img src="images/project/piano3.jpg" alt="テキストテキストテキスト"></li> <li><img src="images/project/piano4.jpg" alt="テキストテキストテキスト"></li> <li><img src="images/project/piano5.jpg" alt="テキストテキストテキスト"></li> <li><img src="images/project/piano6.jpg" alt="テキストテキストテキスト"></li> <li><img src="images/project/piano7.jpg" alt="テキストテキストテキスト"></li> </ul> </section> <section id="news" class="wrapper"> <h2 class="menu-title">更新履歴</h2> <div class="line"></div> <ul> <li> 2025.03.01<span></span>ウェブサイトを開設しました。</li> <li> 2025.03.05<span></span>講師紹介を更新しました。</li> <li> 2025.03.06<span></span>レッスン風景を更新しました。</li> <li> 2025.03.07<span></span>教室内容を修正しました。</li> <li> 2025.03.08<span></span>問い合わせページを作成しました。</li> </ul> </section> <footer> <div class="footer"> <p>©2025 〇〇教室</p> </div> </footer> </body>
解決済
2
0
-
5
Python 3.12.2 か一番最新のパイソンでしょうか? 2025年4月3日現在。 ChatGP
Python 3.12.2 か一番最新のパイソンでしょうか? 2025年4月3日現在。 ChatGPTにソースコードを書いてもらい貼り付けしようとすると、 警告 複数の行を含むテキストを… とでてくるのですが前のデーターが残ってるということでしょうか? 前のデーターの消し方を教えて下さい。
質問日時: 2025/04/03 17:02 質問者: 青井葦人 カテゴリ: その他(プログラミング・Web制作)
解決済
5
0
-
6
GoogleSearchControlにホームページを登録してGoogle検索できるようにしましたが
ホームページのタイトルで検索できるようになったものの タイトルに間違いがあって修正したのですが 修正以前のタイトルで検索されてしまいます どうすれば新しいタイトルで検索できるようになるでしょうか?
ベストアンサー
2
0
-
7
Ruby require ライブラリー
すみません。Ruby言語で、疑問が4つほどあって、 疑問①「組み込みライブラリ」と「標準添付ライブラリ」の違いは、何でしょうか? で、 疑問②「require を書かなくても使用可なのが 「組み込みライブラリ」」ですが、 疑問③つまり、逆に言うと、「requireを書かないと使用不可なのが、 「標準添付ライブラリ」」 と言う事でしょうか? 疑問④後、「「標準添付ライブラリ」は、インストール不要」と、書きましたが、逆に言うと、「「組み込みライブラリ」」は、インストールが必要という事ですよね?では、「組み込みライブラリ」は、何をインストールすれば、使用できる様になるのでしょうか? 教えて頂けると幸いです。よろしくお願いします。
ベストアンサー
17
0
-
8
vb.net(vs2022)のtextboxのデザイン時と実行時の見た目の違いはなぜ?
vb.net(vs2022)のtextboxのデザイン時と実行時の見た目の違いはなぜ起こるのでしょうか? 画像左はデザイン時です コントロールを貼り付けて BorderStyleを上から ・None ・FixedSingle ・Fixed3D に設定しました 画像右は実行時です 3つ目のFixed3Dの見た目が変わってしまいます なぜ変わってしまうのでしょうか? vs2017で作成したものはデザイン時そのままで実行できます 昔の表示に戻ってしまったようで気になって気になって…
質問日時: 2025/03/19 16:08 質問者: letter-fin カテゴリ: Visual Basic(VBA)
解決済
2
0
-
9
ルビー言語 csvファイル 続き
以下のURLで、 https://oshiete.goo.ne.jp/qa/14056888.html の所で、私の補足した質問のNo.12の回答の補足の所の 過去には、BOM無しでそのまま excelファイルの文字化けが無かったのかもしれませんね。 は、合っているのでしょうか? 後、作者がどのような意図でコピーしましょうと書いたのかはわかりません。 その作者のサイトのURLを提示していただければ、作者の意図が読み取れるかもしれません。 については、書籍からなので、一応もう一度書籍を読んでから、再度質問します。 よろしくお願いします!教えていただけると幸いです。
ベストアンサー
13
0
-
10
ワードの図形にマクロを登録できる方法を教えてください。
作業乳のワードのブックに図形を表示させてその図形にマクロを登録させたいのですが、 エクセルのマクロ登録のように図形を右クリックして「マクロの登録」コマンドの表示がありませんので、図形にマクロを登録できる方法を教えてください。 例えば、図形でなくても構いません。 ブックの画面上に何かのボタンを登録して、そのボタンをクリックするとマクロが実行される方法でも構いません。 よろしくお願いします。
質問日時: 2025/03/12 15:52 質問者: エクセル小僧 カテゴリ: Visual Basic(VBA)
ベストアンサー
3
0
-
11
marginの値でマイナス値を設定してもよいのでしょうか?
ファイルアップロードが可能な質問掲示板を作成中で表示したい画像、動画の高さと横幅を CSS で設定しているのですが、動画(video要素)の時のみ height の影響によって上部にスペースが発生してしまい困っております。 margin の値にマイナスの値を設定することで解決できるのですが反則になるのではないかと思い心配です。 <?php $upload_dir = wp_upload_dir(); echo '<div class="main_container">'; echo '<div class="quest_container">'; // var_dump($rows); foreach ($rows as $row) { $files = array_filter([$row->attach1, $row->attach2, $row->attach3]); $views = []; //HTMLをため込む配列の初期化する foreach ($files as $file) { $info = pathinfo($file); $attach_url = $upload_dir['baseurl'] . '/attach/' . $info['basename']; $ext = $info['extension']; switch ($ext) { case 'jpeg': case 'png': $views[] = '<img style="height:350px;width:530px" src="' . $attach_url . '">'; break; case 'mp4': $views[] = '<video height="350px" width="530px" src="' . $attach_url . '" controls>'; break; case 'pdf': $views[] = '<iframe style="height:350px;width:530px" src="' . $attach_url . '"></iframe>'; break; default: break; } } $count = count($views); if ($count == 1 || $count == 2) { $qm = 'quest_markdown'; $qi = 'quest_item'; } else { $qm = 'quest_markdown_group'; $qi = 'quest_item_group'; } if (empty($row->usericon)) { $usericon_src = 'wp-content/themes/sample_theme/images/noimage.png'; } else { $usericon_src = $upload_dir['baseurl'] . '/attach/' . $row->usericon; } ?> <style> .quest_header_title { font-size: 25px; display: inline-block; vertical-align: top; width: 1010px; padding-right: 30px; } .quest_feeling_stamp { display: inline-block; } .quest_item_group { float: left; display: inline-block; margin-bottom: 25px; padding: 0px 18px 0px 5px; margin-top: -20px; } .quest_overview { color: #e52d77; font-size: 150%; font-weight: 700; width: 1098px !important; margin-top: 25px; } </style>
ベストアンサー
1
0
-
12
pythonについて(初心者です)
友人から今人気の言語を聞いたところパイソンだと聞きました。 なので調べてみたら面白そうだなと思いました。 私は、今46歳です。 プログラミング経験はあります。 20代のころゲームをC言語で作っていました。 C言語は当時としては最先端でした。 今でも使っている会社はあるようですが、パイソンが増えているようですね。 C言語の良さはスピードが速いことです。 今でも忘れてしまってもいますが、C言語のコードで簡単なプログラムは組めます。 パイソンのコードを見たのですが簡略化されて文法がさほど難しくないかなと思いました。 やってみようかどうか迷っているのですが、パイソンをやられている方、どうですか?
質問日時: 2025/02/27 17:21 質問者: ともこん カテゴリ: その他(プログラミング・Web制作)
ベストアンサー
12
0
-
13
【マクロ】モジュール変数の記述時、Callにて、呼び出されたプロシージャから実行するとエラーとなる?
Q1標題の件、以下コード❶より実効すると、エラーとなります モジュール変数の場合は、呼び出し側から実行しないといけないルールですか??? 【Callステートメントにて呼び出されたコード❶】 Sub あいうえお() ws1.Cells(1, 1) = "あいうえお" End Sub Q2以下の共通コードを、1回だけしか書かないで、例えば5つのCallで呼び出す プロシージャで、共同利用する為には、値渡しが有効ですか??? 下記の例は、Callが1つしかありません。しかし、実際は5つ位を予定しています 【共通コード】 Dim filpath1 As String Dim wb1 As Workbook Dim ws1 As Worksheet filepath1 = ThisWorkbook.Worksheets("Sheet1").Cells(141, 1) Set wb1 = Workbooks.Open(filepath1) Set ws1 = wb1.Worksheets("Sheet1") 【コード】 Dim filpath1 As String Dim wb1 As Workbook Dim ws1 As Worksheet ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ Sub モジュール変数() filepath1 = ThisWorkbook.Worksheets("Sheet1").Cells(141, 1) Set wb1 = Workbooks.Open(filepath1) Set ws1 = wb1.Worksheets("Sheet1") Call あいうえお End Sub ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ Sub あいうえお() ws1.Cells(1, 1) = "あいうえお" End Sub
質問日時: 2025/02/23 11:57 質問者: aoyama-reiko カテゴリ: Visual Basic(VBA)
ベストアンサー
2
0
-
14
Vba FileSystemObject オブジェクトに使って拡張子、BaseNameを取り出す
いつもお世話になります 今、下記のプログラムでファイル一覧を取り出すテストをしていたのですが 拡張子や拡張子を除くファイル名の取り出しをスマートに記述できないかと思い投稿しました Sub Test5() Dim MyFile As Object Dim cnt As Integer Dim FilePath As String Dim FSO As Object Set FSO = CreateObject("Scripting.FileSystemObject") FilePath = "XXXXXXXXX" cnt = 1 For Each MyFile In FSO.GetFolder(FilePath).Files ' セルにファイル情報を書き出し Cells(cnt, 1).Value = MyFile.Name ' ファイル名 Cells(cnt, 2).Value = MyFile.DateCreated ' 作成日時 Cells(cnt, 3).Value = MyFile.Size ' ファイルサイズ Cells(cnt, 4).Value = FSO.GetBaseName(MyFile.Name) ' BaseName Cells(cnt, 5).Value = FSO.GetExtensionName(MyFile.Name) ' 拡張子 cnt = cnt + 1 Next MyFile Columns("A:E").AutoFit Set FSO = Nothing End Sub 例えば、ファイル名はMyFile.Nameで取得できますがMyFile.BaseNameは出来ませんでした そこでFSO.GetBaseName(MyFile.Name)にしています、拡張子も同様で何かありそうで Webで調べてみましたが分かりませんでした MyFile.??? で拡張子やBaseNameが取れたらスマートなのにと思い相談します もし分かりましたら教えてください 以上、宜しくお願い申し上げます
質問日時: 2025/02/20 14:53 質問者: 公共ごま カテゴリ: Visual Basic(VBA)
ベストアンサー
2
0
-
15
C言語の関数のextern宣言
C言語で関数のプロトタイプ宣言をした時に、externを付けた場合と付けなかった場合で何か違いとかあるのでしょうか?(別のファイルで定義した関数を、他のファイルから宣言して使う場合を想定しています。)
質問日時: 2025/02/19 14:11 質問者: tmiyoshi カテゴリ: C言語・C++・C#
解決済
4
0
-
16
VBAの質問(Msgboxについて)です
VBA質問です。 下記のようにマクロを作りました。E2、E3、E4、E5、E6とそれぞれのセルに×が入っているときに、メッセージを出し、 〇が入っているときはメッセージを出したくありません。 また、A1に入ったタイトル名、B2、B3、B4、B5、B6とそれぞれのセルに入れた項目名(間違ったものが入っているものもある)をそれぞれ出したいのですが、マクロを実行するとB2の項目ばかり出てしまい困っています。 ※C列(C2以降)はA列(A2以降)に入った項目名とB列(B2以降)に入った項目名を結合する列として使っています。D列は都合により空欄としています。 また、E列に〇が入っているときだけメッセージが出て、×が出ているものはメッセージ表示されません。 どうしたらいいでしょうか。 どうぞよろしくお願いいたします。 Sub チェッカーMsgbox01() 'セルの値とアイコンを表示する Dim I, C As Long Dim J, D As Long Dim result As Range Dim msg As String For I = 2 To 6 '2行目~6行目まで繰り返します Set result = Range("E" & I) If result = "×" Then MsgBoxVisible = True MsgBox (Range("B" & I) & vbCrLf & Range("B" & I) & vbCrLf & Range("B" & I) & vbCrLf & Range("B" & I) & vbCrLf & Range("B" & I)) & vbCrLf, vbCritical 'メッセージボックスにA列の「名前」、「アイコン」を表示します。 End If Next I For J = 2 To 6 '2行目~6行目まで繰り返します Set result = Range("E" & J) If result = "〇" Then MsgBoxVisible = False MsgBox (Range("B" & J) & vbCrLf & Range("B" & J) & vbCrLf & Range("B" & J) & vbCrLf & Range("B" & J) & vbCrLf & Range("B" & J)) & vbCrLf, vbInformation 'メッセージボックスにA列の「名前」、「アイコン」を表示します。 End If Next J MsgBoxVisible = True MsgBox "チェック結果は以上です" End Sub
質問日時: 2025/02/19 07:07 質問者: ナカシュン太郎 カテゴリ: Visual Basic(VBA)
ベストアンサー
2
0
-
17
Fortranでシステム時刻をカレンダー時刻に変換
はじめまして。 タイトルの通り、Fortranでシステム(エポック・ユニック)時刻をカレンダー時刻に変換するためのプログラムを教えていただけないでしょうか。 具体的には、1737676987.12のシステム時刻を2025年01月24日00時03分07.12秒のカレンダー時刻に変換するプログラムです。 よろしくお願いいたします。
質問日時: 2025/01/24 15:06 質問者: vabulic カテゴリ: その他(プログラミング・Web制作)
ベストアンサー
2
0
-
18
Ruby 引数
写真の説明文の所で、真ん中の下の部分は、メソッド(値1)で呼び出すとどうなるのでしょうか?教えて頂けると幸いです。
ベストアンサー
5
0
-
19
メディアクエリについて。
メディアクエリ内にレイアウト用の記述を追加すればスマートフォンで見たときだけサイドバーを隠して1カラムにすることもできるとは、どういう記述をすれば良いのでしょうか?出典先は、そろそろ常識? マンガでわかるHTML&CSSです。 赤松公太郎著 です。その第6章の所です。その6章最後のページです。教えて頂けると幸いです。 respon.html 〈!DOCTYPE html〉 〈html lang=″ja″〉 〈head〉 〈meta charset=″utfー8″〉 〈meta name=″viewport″ content=″width=deviceーwidth,initialーscale=1″〉 〈title〉Campus Art〈/title〉 〈link rel=″stylesheet″ href=″style.css″〉 〈/head〉 style.css @media (maxーwidth: 599px){ main{ width: 90%; } main img width: 100%; } } です。メディアクエリに関するのは。教えて頂けると幸いです。
ベストアンサー
3
0
-
20
pythonについて
0を1に、1を0に、それぞれビット変換をする際に、「いずれの場合も+1して、0ビット目以外を0にする」ことで達成できることは分かりました。 この際のpythonでの表現方法のサンプルコードがあれば、教えてもらえたら嬉しいです。 なお、例えば変換をしたい対象のビットを「Data[i]」だったとします。 ご回答のほど、よろしくお願いいたします。
質問日時: 2024/11/24 04:04 質問者: kesexyoki カテゴリ: その他(プログラミング・Web制作)
ベストアンサー
3
1
-
21
Cのプログラムからアクセスできないファイル名の一括変更方法
Cのプログラムで fp = fopen(filename,"rb"); を実行すると必ずエラーになるファイル名があります。 色々調べた結果、エラーになるファイル名にSJISに存在しない文字コードが含まれているらしいことがわかりました。 そのようなファイル名の文字コードをSJISの類似の文字コードに 例えば、⓪ → (0) のようにエクスプローラ上での手作業で変更すれば読めることも確認しています。 これらの作業をするアプリをCで作成しようと思いましたが、エラーになるファイル名の検出まではできますが、 関数rename(読めないファイル名、読めるファイル名); でエラーになってしまい、ファイル名変更ができません。読めないファイル名はfopenでエラーになるので、関数renameでもエラーになるのは当然ですが・・・ 一方、文字コードをunicode にすれば読めますが、今度はSJISで読めないファイル名の検出ができません。 で質問です 個別の手作業ではなく、一括してこれらの作業ができるコマンドやアプリ、教えてください
質問日時: 2024/10/30 07:38 質問者: usa3usa カテゴリ: C言語・C++・C#
ベストアンサー
5
0
-
22
FlaskでWEBアプリを作りPython any whrerでデプロイし、Googleサーチコンソ
FlaskでWEBアプリを作りPython any whrerでデプロイし、Googleサーチコンソールにてインデックス登録を行い1日後このページはインデックスに登録されていますと出ているのに検索してもサイトが表示されませんなぜでしょうhttps://goodreed.pythonanywhere.com/
解決済
1
0
-
23
【VBA】 結合セルに複数画像とファイル名一括挿入する方法
ご覧いただきありがとうございます。 VBA初心者です。 ダイアログボックスを開き画像ファイルを選択、1行目が見出し行になっている表のB2から6行ごとに結合したセルに画像を挿入し、隣のC列(6行ごと結合)に画像ファイル名(拡張子なし)が入る表を作りたいです。 結合していないセルの場合、以下のコードで作成できました。 6行ごとに結合したセルの場合は、どのように修正したらいいのでしょうか? 詳しい方、よろしくお願いいたします。 Dim fd As FileDialog Set fd = Application.FileDialog(msoFileDialogFilePicker) With fd .Title = "Select Image Files" .Filters.Clear .Filters.Add "Image Files", "*.GIF; *.JPG; *.BMP; *.PNG; *.TIF", 1 .AllowMultiSelect = True If .Show = -1 Then Dim i As Long For i = 1 To .SelectedItems.Count Dim fileName As String fileName = Left(Dir(.SelectedItems(i)), Len(Dir(.SelectedItems(i))) - 4) Range("C" & i + 1).Value = fileName Dim Picture As Picture Set Picture = ActiveSheet.Pictures.Insert(.SelectedItems(i)) With Picture With .ShapeRange .LockAspectRatio = msoFalse .Width = Range("B" & i + 1).Width .Height = Range("B" & i + 1).Height End With .Left = Range("B" & i + 1).Left .Top = Range("B" & i + 1).Top .Placement = xlMoveAndSize End With Next i End If End With End Sub
質問日時: 2024/10/03 21:59 質問者: ukr-pm カテゴリ: Visual Basic(VBA)
ベストアンサー
1
0
-
24
CSSでinputのテキストカラーを変えたのですがパソコンで確認すると色が変わっているのですがiPh
CSSでinputのテキストカラーを変えたのですがパソコンで確認すると色が変わっているのですがiPhoneで確認すると色が変わっていませんなぜでしょうか
解決済
2
0
-
25
2カラム、左メニュー、特定パーツのインクルド化
HTML5 左メニュー全体のインクルドはできましたが、左メニューの特定パーツ(BOX:プールダウンメニュー)のみインクルドできないものか調べましたが、分かりません。 HTMLにお詳しい方どうぞご教授宜しくお願い致しますm(__)m ※参:画像 <!DOCTYPE html> <!-- 省略 --> <!-- インクルドjs --> <script src="content2.js"></script> </head> <body> <!-- 省略 --> <!-- 省略 --> <!-- 左メニュー --> <div class="content1"> BOX① </div> <!-- 左メニューBOX② --> <div class="content2"> <!-- ●インクルドさせたい● --> <script>include("content2"); </script> <p>インクルドHTMLは別に用意:content2.html</p> </div> 左メニューの省略「BOX②のパーツ」のみ、インクルド化する方法はありますでしょうか? サイトを色々調べましたが、左メニュー特定BOX(プールダウンメニュー)だけのインクルド化は分かりませんでした。 ※また色々試しましたが、左メニューが「横並び」になります。 <div class="content2"> CSS、HTMLの記述の問題ありかと思っております。 HTML・CSSにお詳しい方、 2カラム・左メニュー縦並びで「BOX②のみインクルド化」する方法があるようでしたら、是非宜しくお願い致します。
ベストアンサー
2
0
-
26
エクセルのマクロについて教えてください。
下記のマクロは先ほど教えて頂いたマクロで コピー元の指定シートとセル値をコピー先にコピペできます。 Sub Macro1() Call 採光シートコピー範囲 Call 貼り付け Call 採光データ削除 End Sub 張り付けた後に コピー元のファイルが不要の為、マクロ「採光データ削除」を実行して、ファイルを削除したいのですが、削除対象のファイルが開いた状態なので、エラーメッセージが出て、ファイルを削除できません。 以前教えて頂いたコードをそのまま利用しており、コピー元のファイルのコピー範囲が完了するとこのファイルは閉じると思うのですが、なぜか、開いたままの状態です。 それぞれのマクロを書き込みますので、解決方法を教えてください。 Sub 採光シートコピー範囲() Dim folderPath As String Dim fileName As String Dim ws As Worksheet folderPath = ThisWorkbook.Path & "\" '作業フォルダ内にはマクロを設定しているコピー先のブックとコピー元の ' 採光計算確認.xlsxの 2つ のExcelファイルしかありません。 fileName = Dir(folderPath & "*.xlsx?") Do While fileName <> "" If CheckName(fileName) = True Then Exit Do fileName = Dir() Loop If fileName <> "" Then '別ブック 採光計算書.xlsx Set Wb2 = Workbooks.Open(folderPath & fileName) On Error Resume Next Set ws = Wb2.Worksheets("Table 2") If Err.Number <> 0 Then MsgBox "コピー元ブックの提出シートが見つかりません" On Error GoTo 0 Wb2.Close False End End If 'セルの値を取得する ws.Range("A1:W51").Copy On Error GoTo 0 ws.Activate ws.Range("A1:W51").Copy Else MsgBox "コピー元ブックが見つかりません": End End If End Sub Private Function CheckName(ByVal fileName As String) As Boolean CheckName = False If fileName = ThisWorkbook.Name Then Exit Function CheckName = True If LCase(Right(fileName, 5)) = ".xlsx" Then Exit Function If LCase(Right(fileName, 5)) = ".xlsm" Then Exit Function CheckName = False End Function Sub 貼り付け() Dim ws1 As Worksheet Set Wb1 = Workbooks(1) 'このブック On Error Resume Next Set ws1 = Wb1.Worksheets("採光確認") If Err.Number <> 0 Then MsgBox "コピー先ブックの受付シートが見つかりません" Application.CutCopyMode = False On Error GoTo 0 If Not Wb2 Is Nothing Then Wb2.Close False End End If Application.DisplayAlerts = False Application.EnableEvents = False ws1.Range("A1:W52").PasteSpecial Paste:=xlPasteValuesAndNumberFormats Application.CutCopyMode = False Application.EnableEvents = True Application.DisplayAlerts = True End Sub Sub 採光データ削除() Dim filePath As String filePath = ThisWorkbook.Path & "\採光計算書.xlsx" If Dir(filePath) <> "" Then Kill filePath End If End Sub 以上となります。 よろしくお願いいたします。
質問日時: 2024/09/12 12:10 質問者: エクセル小僧 カテゴリ: Visual Basic(VBA)
ベストアンサー
6
0
-
27
jdbcでinsert,delete,createをexectUpdateでなくexectQuery
で実行すると実行は正しくされているようですが クエリは結果を返却しませんでした。 というエラーメッセージがでます selectとinsert,delete,create を共通に実行できるメソッドはあるでしょうか?
ベストアンサー
4
0
-
28
Vba ファイル書き込み時に書き込みエラーを回避する方法を教えてください
いつもお世話になります 今、Scriptファイルを利用してExceのデータでAutoCad上に作画させていますが 時々データ量および処理速度の差によって、Scriptファイルの書き込みエラーが 発生します 今はApplication.Waitで調整していますが、妙案があったら教えてください '...ファイルの定義 Set stm = New ADODB.Stream stm.Charset = "UTF-8" stm.LineSeparator = adLF stm.Open (作図)ファイル作成 Application.Wait [Now() + "00:00:03"] '...エラーが起きないように3秒調整 stm.SaveToFile PLTFname1, 2 '...ファイル書き込み(ここでエラーが起きる) stm.Close Application.Wait [Now() + "00:00:01"] SendKeys "script" & Chr(13) & PLTFname1 & Chr(13) stm.Open (作図) Application.Wait [Now() + "00:00:03"] stm.SaveToFile PLTFname1, 2 ・ ・ (作図とScript 処理を繰り返します) いつもすみません、変な質問で 以上、よろしくお願い申しあげます
質問日時: 2024/08/01 14:34 質問者: 公共ごま カテゴリ: Visual Basic(VBA)
ベストアンサー
4
0
-
29
特定の項目セルにスキャン(入力)すると連続で5行に自動で日付がはいる
VBA 日付の自動化ついて質問です。 Office365 を使用しています。 添付ファイルのように特定の項目の「受付NO」をバーコードでスキャン(入力)した場合、 当日の日付を、赤丸で囲んでるA列に5行に自動で入るコードを知りたいです。 C列の特定の項目には自動で入るように関数を組んでいます。 (部品番号を入れると、部品名が表示される,受付NOを入れると個数1が表示される) 自分なりにVBAのコードをシートに反映しましたが 関数を組んでる「商品名」と「個数」の左側には日付が入らないことがわかったため、 「受付NO」をスキャン(入力)した時点で当日の日付が一気に入力されるコードをしりたいです。 どなたかよろしくお願いします。m(__)m
質問日時: 2024/07/31 14:20 質問者: mihomiho34 カテゴリ: その他(プログラミング・Web制作)
ベストアンサー
1
0
-
30
UART通信の取説で,left floatingという言葉の意味が分かりません。
ESP32で,防水超音波センサーを使ってスケッチを作成しています。 ほぼ,思った動作ができるようになりましたが,いまいち,不安定な部分があるので, 防水超音波センサーのマニュアルをみてみました。 マニュアルには, When the trigger input pin "RX" is left floating or input high level, the module outputs according to the processed value, and the data is more stable. The response time is 100-300ms; when the input is low, the module outputs according to the real-time value, and the response time is 100ms. のような記述があります。ほぼ理解できるのですが, left floating の意味がわかりません。 詳しい方いらっしゃいましたら,ご教授お願いいたします。
質問日時: 2024/07/30 22:03 質問者: mabo52 カテゴリ: C言語・C++・C#
解決済
2
0
-
31
あんまり考えたくないけど
なんでdecodeの時点でできないんですか?execute ができないはわかるけど。 現にフォワーディングしたときにD2ができちゃってるのはおかしくないですか? E1からE2に直接結果が送られてるから。 データハザード バイパ寝具
質問日時: 2024/07/14 13:20 質問者: ゆゆにゃ。 カテゴリ: C言語・C++・C#
ベストアンサー
3
1
-
32
"東横イン空室チェック"のSEO対策について
サイトのSEO対策について質問です。 次のサイトがgoogle検索で、上位に上がってきません。 なぜだと思いますか? 【東横イン空室チェック】 https://hotel-vacancy.sakura.ne.jp/ 次の対応はしました。他にどのような対応をすれば良いと思いますか? ・google search consoleに登録 インデックスには登録されています。 ・Xで使ってもらえそうな人にポスト いいねをつけてくれる人や、返信をくれる人もいます。
質問日時: 2024/06/30 21:44 質問者: 東横イン空室チェック カテゴリ: SEO
解決済
1
0
-
33
c++でテンプレートのコードでわからないことがあります
#include <iostream> template <typename T> T minimum(const T& lhs, const T& rhs) { return lhs < rhs ? lhs : rhs; } int main() { int a=2; int b=3; int i = minimum<int>(a, b); std::cout << i << std::endl; return 0; } において const T& lhs のところで Tにconstと&が修飾されていますがこれはどういう効果があるのでしょうか?
質問日時: 2024/06/14 11:04 質問者: reiman カテゴリ: C言語・C++・C#
ベストアンサー
2
0
-
34
プログラミングの課題がわからないので教えていただきたいです。特にサークル関数を定義した後に呼び出す方
プログラミングの課題がわからないので教えていただきたいです。特にサークル関数を定義した後に呼び出す方法がよくわかっていません。よろしくお願いします
質問日時: 2024/06/08 17:23 質問者: 山田ボールペン カテゴリ: C言語・C++・C#
ベストアンサー
2
0
-
35
なんで
長さnの入力に対し0からnー1までの連番を一時的に記憶するのだからO(nlogn)の記憶容量を要する なんでですか??
質問日時: 2024/06/07 18:00 質問者: ゆゆにゃ。 カテゴリ: C言語・C++・C#
ベストアンサー
3
2
-
36
だれがとけるの?
回答ではtというパラメーターを付け加えて積分しやすい形にして、微分して、t=1 (問題の積分)を代入したた。面白いとは思うけど本番にできるかわからない。他の開放はありませんか??
質問日時: 2024/05/30 14:35 質問者: ゆゆにゃ。 カテゴリ: C言語・C++・C#
ベストアンサー
5
0
-
37
バッチファイルで以下のようなものは作れますか? ・Microsoft Defenderでウイルススキ
バッチファイルで以下のようなものは作れますか? ・Microsoft Defenderでウイルススキャン実行 ・スキャンの進捗をプログレスバーなどで表示 ・スキャン結果をメッセージボックスで表示 よろしくお願いします
質問日時: 2024/05/30 11:18 質問者: chnicky_hap カテゴリ: C言語・C++・C#
ベストアンサー
1
1
-
38
へんな現象
3つ以上存在する要素がないか判定します def isPossibleToSplit(self, nums: List[int]) -> bool: c = defaultdict(int) for i in nums: c[i] += 1 if c[i] > 2: return False return True としました。でも、足して3になたらFalseよりも 2のものにたそうとするときにFalseのほうが早いと思って def isPossibleToSplit(self, nums: List[int]) -> bool: c = defaultdict(int) for i in nums: if c[i] == 2: return False c[i] += 1 return True としました。そしたらに個目のほうが遅くなりました。なんでですか?? ifをみる階数も同じだとおもいませんか?
質問日時: 2024/05/18 15:49 質問者: ゆゆにゃ。 カテゴリ: C言語・C++・C#
ベストアンサー
3
0
-
39
VBAでパワーシェルを実行したいのですが、なかなかうまく出来ず、有識者の知識をお借りさせてください。
VBAでパワーシェルを実行したいのですが、なかなかうまく出来ず、有識者の知識をお借りさせてください。 wshShellだと引数が上手く渡せない(PowerShell自体実行できてなさそう?)ですが、shellだと上手く実行できます。 ただ、非同期ではその後の処理に影響があるため同期で処理したいところです。 どこか記載が誤っている、もしくは改善点等あればご教授してください。 以下に簡潔にコードを記載します。 【前提】 指定のフォルダ下にあるファイルすべてのハッシュ値を取得したい 【VBAコーディング】 Dim psFilePath as String 'PowerShell格納先 Dim FolderPath as String 'ハッシュ取得先パス格納 Dim textOutputPath as String 'PowerShellから取得したハッシュを書き出すパス Dim wshShell as Object '同期してPowerShellを動かすため Dim ToolPath as String '本ツールパス格納 Dim ToolBook as Workbook '本ツールを変数に格納 Set ToolBook =ThisWorkbook ToolPath = ToolBook.Path Set wshShell =CreateObject("WScript.Shell") '実行するPowerShell格納先 psFilePath =(ToolPath + "¥Tools¥hash.ps1") 'ハッシュ取得先 FolderPath = (ToolPath + "¥export") 'ハッシュ取得結果出力先 textOutputPath = (ToolPath + "¥Tools¥hash.txt") 'PowerShell実行 wshShell.Run "powershell.exe -File """ & psFilePath & """ """ & FolderPath & """ """ & textOutputPath & """", vbNomalFocus 【PowerShellコーディング】 param( [string]$folderPath, [string]$textOutputPath ) # 指定したフォルダ内のすべてのファイルのハッシュ値を取得してテキストファイルに書き出す # 指定したフォルダ内のすべてのファイルのフルパスを取得する $files = Get-ChildItem -Path $folderPath -Recurse -File # ファイルを書き込むためのストリームライターを作成する $streamWriter = New-Object System.IO.StreamWriter($textOutputPath, $false, [System.Text.Encoding]::UTF8) # 指定したフォルダ内のすべてのファイルのハッシュ値を計算して書き込む foreach ($file in $files) { try { $hash = Get-FileHash -Path $file.FullName -Algorithm SHA256 $filePath = $file.FullName -replace '"', '' $line = "$filePath`t$($hash.Hash)" $streamWriter.WriteLine($line) } catch { $_.Exception.Message | Out-File -FilePath "C:\path\to\your\errorlog.txt" -Append } } # ストリームライターをクローズする $streamWriter.Close() よろしくお願いいたします。
質問日時: 2024/05/11 00:25 質問者: ぎゃす カテゴリ: その他(プログラミング・Web制作)
解決済
2
0
-
40
、URL化させるにはどうしたらいいですか?
<!DOCTYPE html> <html lang="ja"> <head> <title>ページタイトル</title> </head> <body> 寿司は美味しい </body> </html> ↑を、URL化させるにはどうしたらいいですか? 教えてください
質問日時: 2024/04/27 13:17 質問者: Wohinfahrensie カテゴリ: HTML・CSS
ベストアンサー
3
0
-
41
mallocについて
とあるソースを確認している時に下記のような記述を見つけました。 p = (uint8_t *)(uint8_t *)malloc( len ); これはどのように動作するんでしょうか? p = (uint8_t **)malloc( len ); であれば二次元配列での領域確保だとは思いますが、 この後の処理を見る限りそのような感じで使用していないのです。 多分記述ミスかとは思いますが、 エラーも出ることなく動いているようなので、 free関数のところでもエラーにはなっていないようです。 単純に p = (uint8_t *)malloc( len ); と同じ動作になるのでしょうか? 現在このソースでメモリリークが起こる場合があるようで、 その調査をしておりこのような処理を見つけた次第です。 (メモリリークは時間が経ってから出るようなので。。。) この辺りが原因と言えるのかどうか 何か情報をお持ちの方いらっしゃいませんでしょうか? よろしくお願いいたします。
質問日時: 2024/04/18 19:15 質問者: nagase932 カテゴリ: C言語・C++・C#
ベストアンサー
4
0
-
42
静止画画像をクリックすると音楽が鳴るスクリプトってありますか?
<audio>タグを使わないで、リンクもつけないで、演奏動画にしないで、その場で音楽再生音のみが聴けるような表示をつくりたいのですが・・
ベストアンサー
1
0
-
43
Stuck
まいにちいちもんか数問問題をといて、たいてい解けないから他の人の解説とか見て 考え方を把握したきもちになって、コードを見るだけじゃなくてわかったと思ったのを自分で一から書いてみるとかしてますけど、結局そのコード自体をその場で覚えてしまってるかんじがして、ぜんぜん成長してるかんじがしません。なにが悪いと思いますか? アルゴリズムの本自体はに冊くらいよみました。 今はアルゴリズムの試験の勉強のためにしてます https://www.youtube.com/watch?v=gqXU1UyA8pk
質問日時: 2024/03/24 12:04 質問者: ゆゆにゃ。 カテゴリ: C言語・C++・C#
ベストアンサー
3
0
-
44
Notepad++の関数リスト表示の変更方法をお教えください。
Notepad++を使用しております。 この度BorlandC++Builder5.0で作成されたプログラム編集することになったのですが、 Notepad++でcppファイルを開くと関数リストが正しく表示されません。 以前、こちらで設定ファイルの変更が必要とお教えいただいたのですが、具体的な方法が分からず困っております。 どなたか変更の方法に関して、詳しい方がおられましたご教授下さい。 下記となります。 // ①表示される。 __fastcall ClassA::ClassA( AnsiString fn ) { } // ②表示されない。 __fastcall ClassA::~ClassA( void ) { } // ③表示されない。 int __fastcall ClassA::FunctionA( void ) { } // ④表示されない。 void __fastcall FunctionB( void ) { } // ⑤表示されない。 void __fastcall ~FunctionC( void ) { }
質問日時: 2024/03/20 09:34 質問者: GACHAPINA カテゴリ: C言語・C++・C#
ベストアンサー
1
0
-
45
解決済
13
0
-
46
WindowsのCapsLock(キャップスロック)って、何の意味があるんですか?
WindowsのCapsLock(キャップスロック)って、何の意味があるんですか?
質問日時: 2024/03/16 04:36 質問者: 安藤 カテゴリ: C言語・C++・C#
ベストアンサー
10
0
-
47
matplotlibで任意の角度の円弧を描きたい
matplotlib.patches.Circle()を使って、任意の角度の円弧を描くことはできますか?例えば、時計回り、または反時計回りにθ=π/2の円弧を描くみたいな事です。
質問日時: 2024/03/07 10:30 質問者: tmiyoshi カテゴリ: その他(プログラミング・Web制作)
解決済
2
0
-
48
Bitcoin、BTCはブロックチェーンを改ざんされるらしい?
Bitcoin、BTCはブロックチェーンを改ざんされるらしい? これは本当ですか。 もし、今後、BTCのブロックチェーンが改ざんされると、BTCはどうなりますか。 それで、BTCの大暴落が起きるとか。
質問日時: 2024/02/29 04:00 質問者: palinz カテゴリ: C言語・C++・C#
ベストアンサー
1
0
-
49
画像のドットの部分が抜けていて一括で修正を行いたい
画像のドットの部分が抜けていて、 一括で、修正を行いたいです。 バッチで、後ろから4番目(JPGの横にドット)を入れるスプリクトを教えていただけないでしょうか。 abcJPG → abc.JPGのようにしたいです。 よろしくお願いいたします。
ベストアンサー
1
1
-
50
ベストアンサー
2
0
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
【プログラミング・Web制作】に関するコラム/記事
-
プログラミングを学べる!?進化している子どものおもちゃについて専門家に聞いた!
プログラミングを学べるレゴブロックがあることはご存知だろうか。レゴに限らず最近のおもちゃには、プログラミングの要素がどんどん取り入れられているようだ。「教えて!goo」にも、「プログラミングを学べる子供...
-
弁護士が解説!あなたの声を行政に届ける「パブリックコメント」制度のすべて
社会に対する意見や不満、疑問。それを発信する場所は、SNSやブログ、そしてニュースサイトのコメント欄など多岐にわたる。教えて!gooでも「ヤフコメ民について」というタイトルのトピックがあり、この投稿の通り、...
-
弁護士が語る「合法と違法を分けるオンラインカジノのシンプルな線引き」
「お金を賭けたら違法です」ーーこう答えたのは富士見坂法律事務所の井上義之弁護士。オンラインカジノが違法となるかどうかの基準は、このように非常にシンプルである。しかし2025年にはいって、違法賭博事件が相次...
-
釣りと密漁の違いは?知らなかったでは済まされない?事前にできることは?
知らなかったでは済まされないのが法律の世界であるが、全てを知ってから何かをするには少々手間がかかるし、最悪始めることすらできずに終わってしまうこともあり得る。教えてgooでも「釣りと密漁の境目はどこです...
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
XMLを作成してもタグしか表示されない
-
viewport幅
-
今のプログラミング言語
-
画像生成AIのプロンプトの作り方に...
-
c言語
-
CSSのhtmlへの紐付けについて教...
-
htmlの文字が縦書きになる
-
【ExcelVBA】値を変更しながら連続...
-
vba クリップボードクリアについて...
-
エクセルに張り付けた写真のファイ...
-
テーブルの行を折りたたみたいので...
-
PDFを(htmlのように)無限に縦長に...
-
VBAでCOPYを繰り返すと、処理が途中...
-
プログラミングについて
-
Windows Formアプリからコンソール...
-
vba textboxへの入力について教えて...
-
ホームページを作っていたらhtmlとh...
-
vbsでのwebフォームへの入力制限?
-
EXCEL vbaでシート上に配置したボタ...
-
過剰なオブジェクト指向脳からの脱...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
htmlの文字が縦書きになる
-
vba クリップボードクリアについて...
-
XMLを作成してもタグしか表示されない
-
エクセルで集計したい。
-
SJISで、全角文字Aの文字コードは16...
-
DLLファイルの逆コンパイラについて...
-
QRコードの作成方法について
-
画像生成AIのプロンプトの作り方に...
-
Vba Array関数について教えてください
-
PHP8でWarning:Undefined variable ...
-
ChatGPT
-
Geminiフォーム 画像生成で 人の『...
-
エクセルに張り付けた写真のファイ...
-
VBAでCOPYを繰り返すと、処理が途中...
-
【ExcelVBA】5万行以上のデータ比...
-
【マクロ】シートの変数へ入れるコ...
-
ChatGPTの性能は昔に比べて上がった?
-
vbsでのwebフォームへの入力制限?
-
CSVファイルの複数行削除
-
libreあればopen office削除しても...
おすすめ情報