連続した数字を自動で書き込む
たとえば・・・ あいうえお0001.jpg と いうのを数字だけ自動的にかえて あいうえお0001.jpg あいうえお0002.jpg あいうえお0003.jpg あいうえお0004.jpg あいうえお0005.jpg あいうえお0006.jpg あいうえお0007.jpg あいうえお0008.jpg ・ ・ ・ とテキストに書き込むにはどーしたらいいですか? どんなソフトを使えばいいですか? フリーソフトで検索するとしたらなんていうキーワードで探せばいいですか? 軽いソフトがいいです ウィンドウズについてるメモ帳ではできませんか? まことにもうしわけないです
ttp://www.angel.ne.jp/~jac/freesoft.html これはどぉ? / ┏ )))) ┃ ■■ / / ┃キ ┃ | ヽヽ ┃\ / / /┃ タ ┃ i 、、 | ヽヽ |\ ┃ \ / / \ \┃┃ ┃__∧ ド ド |ヽ |\ | ┃ / / \ ┃┃ ┃゚∀゚)━━━━━━ !!!!! / / ヽ┃┃ ┃ ⌒\ / ┃┃ ┃/ / /┗ (((┛ / <キタ━━━━━━ / / ̄ \ キタ━━━━━━ !!!!! ― / ん、 \ \ ―― (__ ( > ) ⌒ヽ ’ ・`し' / / 人, ’ ’, ( ̄ / Y⌒ヽ)⌒ヽ、 ) | \_つ テキストに書き込むなら、表計算ソフトで作って、テキスト形式で保存して、 あとで、","などはワードパッドの”編集”−”置き換え”を使ってみたらどう? 6です。 説明不足でした、あらためて操作を説明します。 エクセルで説明します。 エクセルを開き、セルA1に”あいうえお”と入れます。 セルA2に =A1 と入れます。セルA3以降のセルにセルA2の内容をコピーしておきます。 セルB1に0をいれて、セルB2に =B1+1 を入れ、セルB3以降のセルにセルB2の内容をコピーします。 セルC1にjpgをいれて、セルC2に =C1 を入れ、セルC3以降のセルにセルC2の内容をコピーします。 これをCSV形式(カンマ区切り)で、保存し。 (このとき警告が出ますが、”OK””はい”にしてください。) エクセルを閉じて(この時の警告はキャンセル)、 ワードパッドで保存したファイルを開きます。 (開くときは、”全てのファイル”に指定すると保存したファイルが見えます。) あとは、編集ー置換で",jpg"となっている部分を".jpg"に置換えて","を"00"に置換します。 数字一桁の部分には0が一つ足りないから、0を手入力してください。 これで、あいうえお0099.jpgまでは作れます。ほかの表計算ソフトでも出来ると思います。 説明が下手なので、わかりづらいかもしれませんが、ご了承ください。 メモ帳開いて下記のテキストを貼り付けて「Test.vbs」とでも名前を付けて保存。 後は、ダブルクリックして実行して下さい。 「C:\Test.txt」が作成されます。 Dim fso, MyFile Set fso = CreateObject("Scripting.FileSystemObject") Set MyFile = fso.CreateTextFile("c:\test.txt", True) For i=1 to 99 MyFile.WriteLine("あいうえお") & Right("000" & CStr(i),4) & ".jpg" Next MyFile.Close >>8 おお、このほうが、メモ帳だけですんで断然いいですね。 >For i=1 to 99 >MyFile.WriteLine("あいうえお") & Right("000" & CStr(i),4) & ".jpg" >Next ここの、部分をいじくれば、ファイル名、桁数、拡張子が変えられるのですね。 ローテクばかりやっている自分が恥ずかしいです、勉強が足りませんでした。 逝ってきます。 めんどくせーなーと思いつつ いつも手間かけてやってることを告白するスレ。 うん、そうしよう。 0001をコピペして、順次2,3,4、と手入力で直していく。 実際こうやってるんだろうな、マクロなんか知らない人って。 マクロって知らないけどエクセルとかでできるじゃん。 って>1を見て思った。 >>7 「あいうえお0001.jpg」と入れたセルのフィルハンドル引っ張れば済むんじゃねーのか? >0001をコピペして、順次2,3,4、と手入力で直していく。 >実際こうやってるんだろうな、マクロなんか知らない人って 私はやっていましたヨ それで頭がいたくなったんです エロ画像収集か? 俺は、 curl 使って、 curl -O http://ero.site.com/ あいうえお[0001-0100].jpg だよ。ビジネスソフト板の話題じゃないな。 http://curl.haxx.se/download.html http://www.borland.co.jp/cppbuilder/freecompiler/ これならフリーだぞ。 あとは、printf(もしくはcout)とループを覚えれば すぐ出来るYO >>19 ガ━━(゚Д゚;)━━ン! 思いっきり、忘れていました。 >>21 そう言うので使うにせよ、やっぱり、ビジネスソフトで、やるのがいいかな〜 などと、愚考しました。 >>22 私は、いいかもしれませんが、1さんには、敷居が高いかも。 私にもちょっと高いかも。 「Cドライブて、何?」「そんなのないわよ!!」「ちゃんと教えてよ!!」 なんて言う、お客様と付き合ってうまく伝えられない時を、思い出します。 (パソコンとは、何の関係のない職種です。) 自分勉強足りません・・・ もうだめぽ、氏んだほうがいいぽ・・・ 俺は19の方法使って展開してからイリアにぶち込んでた 擬装gifとか >>8 そのやり方、何だかチョト面白い Set MyFile = fso.CreateTextFile("c:\test.txt", True) の拡張子のところを、ためしにdocやxlsに変えたらやっぱりその通りになった。 でも、 SendKeys "%{F4}S~", False AppActivate ("Program Manager") とか Kill〜 とか CopyFile〜 とかはダメだった。 CreateをDeleteに変えたやつもダメだった。 どうやるの、ってよりも、何しらべたらそういうのが分かるの? 即レスさんくす いまのところ何がしたいというわけでもないけど、何だか すんげー便利そうだったから。 VB(A)で、ExcelもAccessもなしにメモ帳から実行ファイル つくれるんしょ(ホントカヨ?) 明日休みなんで早速かじり始めてみます。 VBSだし。。。 実行ファイルじゃないし・・・ (通常、実行形式ファイルとは.exeなどコンパイルしたモノのこと まぁ、実行できるけどさ、、、 使い捨てるには作るのに時間がかかるんで向いてないケド マウスの制御はカンタンにはできないっぽいから、GUIに向いてないケド おもしろいよ。 技術評論社のポケットリファレンスシリーズの VBScriptの本がけっこういいよ。安くて http://www2.gihyo.co.jp/books/bookinq.asp?ID=616 頑張ればウィルスだって作れるぞ。(作るな! (有名なラブレターウィルスはVBSだぞ) VBS、と・・・紹介されたページでその言葉知りました。 WSHて言葉も初めて。 こういうのって、VB何とかがインストールされてない限り、AccessやExcelを 土台にしないと出来ないんだと思ってた。 JAVAでもいけるのかな。でもこっちは分からない(VBAダッテ初心者ノ域ヲ出テナイケド) 夕べは、ファイルコピー、フォルダーコピーをいくつか試したところで終了。 本日は、違う場所にある同名のファイルを比較させ、古い方を新しいのに書き 換える、みたいなこと試そうとしたけど、イツノマニカ寝チマッタ。 まあしばらくは、さしあたって使い道のありそうなもので単純なやつだけを ちまちまつくってみます。 ただ、たしかに つくるものによっては、労力に見合わないケースもありそう。 あと、Accessのエディターだと、スペルが正しいとき間違ってるとき、 それなりの反応を返してくれたり、やりたいことの候補一覧を 出してくれたりするけど、何にもないのはちとつらい。アタリメーカ、メモ帳ダモンナ。 このスレはこのまま消滅を待つしかないと思うんで、もちっと 腕上げたら、あっちのスレに行きます。 目的が単純明快ならバッチでもマクロでも、 VBSなりPerlなりhtaなりbatなり自作するが吉。 目的ドンピシャって、探してもなかなか無いんだよね。 で、求める作業がそれらで出来ない場合、どうすりゃいい? cなりJavaなり、学ぶべき?誰かに頼むべき?自営で困ってます。 どうよ? >>31 Perl書けるならCやJavaも出来るんでないかい? 「求める作業」が明確なら、かなり難しそうでも 作ってみるのが良いんじゃないかな? でも 多分「単純明快なら」とか言ってるところを見ると 自分のやりたい内容はそうとう複雑で そのせいで具体的で詳細なところまでイメージできてないんじゃない? 操作のイメージやらイロイロをどんどん書き出して それを元に「仕様をきっちりまとめる」ってのをやってみたら? 仕様がまとまった段階で、自分で作れそうか 誰かに頼まなきゃ無理そうかを判断する、って方針は? >32 ありがとう、只今思いつき羅列のまっ最中です。 本人は複雑とは思ってないんだが(知識があるという意味ではない)、精度と信頼性を要する。 いままで自分で作ったのはレベルの低いもので、しかもちゃんと出来てない。 ある目的で真剣にPerlを勉強しようと助言を求めたら、その実現はPerlでは苦しいし プロにまかせろという返事だったもので。 それだと次に困ったときまた自分で解決できないから、PerlがダメならJavaなりきちんと勉強する ほうがいいのか、、、って、31はそう読めないねスマソ 余計なことする位なら仕事に専念したいんだけど、その仕事中に>17に近いことに直面するたび なんか真剣に勉強したほうが結局早道なのかなぁと。 RocketMouseでやれば一発。「繰り返し処理」の欄に ---------------------------------- 0000,0000,0000,文字列,あいうえお 0000,0000,0000,変 数,1,4 0000,0000,0000,文字列,.jpg 0000,0000,0000,キーOnly,{ENTER} ---------------------------------- これで、あとは繰り返し回数を設定するだけ。 って、レス遅すぎですね。 >35 ご心配をおかけしまして とりあえずJava本を買ってきた、けど本業が忙しくてそのまま。 J2SDKインストールすらしてない状態。長期戦ですなこれは。 こんぷーたって、あるレベルを超えると途端に敷居が高くなるもので 我慢してビルゲイツに付き合うか知識を得て新境地を切り開くか 吉野家牛丼こぴぺじゃないけど刺すか刺されるかの世界? ついでに 1が読んでるかどうか知らんけど、連番、あたしゃこうしてます。vbs。 もう解決してるだろうからウプせなんだ。クリップボードに連番を渡します。 ---------------------- Dim nFrom, nTo, Output nFrom=InputBox ("指定の連番をクリップボードへ渡します。" & vbCrLF _ & "開始番号は?","連番","1") nTo=InputBox ("終了番号は?","連番") Output = nFrom & vbCrLf For i= nFrom to (nTo - 1) nA = (i + 1) & vbCrLf Output = Output & nA Next Set Ie = WScript.CreateObject("InternetExplorer.Application") Ie.Navigate "about:blank" Do While Ie.Busy Wscript.Sleep 10 Loop Set oClip=Ie.Document.parentWindow.clipboardData oClip.setData "text",Output If IsNull(Output) Then Output="**error**" ━―━―━―━―━―━―━―━―━[JR山崎駅(^^)]━―━―━―━―━―━―━―━―━― ∧_∧ ピュ.ー ( ^^ ) <これからも僕を応援して下さいね(^^)。 =〔~∪ ̄ ̄〕 = ◎――◎ 山崎渉 >>19 携帯ゲーム機"プレイステーションポータブル(PSP) このPSPは、新規格UMD(ユニバーサルメディアディスク)というディスクを利用しており、そのサイズは直径6cmととても小さい(CDの半分程度)。 容量は1.8GBとなっている。 画面は4.5インチのTFT液晶で、480px x 272px(16:9)。MPEG4の再生やポリゴンも表示可能。外部端子として、USB2.0とメモリースティックコネクタが用意されているという。 この際、スク・エニもGBAからPSPに乗り換えたらどうでしょう。スク・エニの場合、PSPの方が実力を出しやすいような気がするんですが。 任天堂が携帯ゲーム機で圧倒的なシェアをもってるなら、スク・エニがそれを崩してみるのもおもしろいですし。かつて、PS人気の引き金となったFF7のように。 __∧_∧_ |( ^^ )| <寝るぽ(^^) |\⌒⌒⌒\ \ |⌒⌒⌒~| 山崎渉 ~ ̄ ̄ ̄ ̄ ∧_∧ ∧_∧ ピュ.ー ( ・3・) ( ^^ ) <これからも僕たちを応援して下さいね(^^)。 =〔~∪ ̄ ̄ ̄∪ ̄ ̄〕 = ◎――――――◎ 山崎渉&ぼるじょあ (⌒V⌒) │ ^ ^ │<これからも僕を応援して下さいね(^^)。 ⊂| |つ (_)(_) 山崎パン ttp://www.vector.co.jp/soft/winnt/util/se332987.html?g シェアだけど 正規表現で自動sendKey ここで書かれてるようなことやってたら、日が暮れます。 プログラムは極力書かないことです。 @エクセルで、数字のとこだけつくっておく 1、2、3、4、5、・・・・(セルの表示形式を「00000」(5けた表示)) A秀丸やnoeditorのキーボードマクロにて (1)行頭に「あいうえお」付加 (2)行末に「jpg」付加 1分もかからないと思う。 ∧_∧ ( ・∀・) | | ガッ と ) | | Y /ノ 人 / ) < >__Λ∩ _/し' //. V`Д´)/ ←>>42 (_フ彡 / 昔と違って、今はコマンドインタプリタの機能がかなり拡張されているから、内部コマンドだけでできる。 cmd /v /c "echo off& for /L %n in (1,1,123) do set n=0000%n& echo あいうえお!n:~-4!.jpg"> test.txt これで、1〜123の連番がついた>>1 のようなファイル名リストがtest.txtに書き込まれる。 オートフィル機能で、連続データ作成も円滑にできるぞ。 最新鋭のエクセル2013/2016はすごいよな…。 誰でも簡単にネットで稼げる方法など 参考までに、 ⇒ 『加藤のセセエイウノノ』 というサイトで見ることができるらしいです。 グーグル検索⇒『加藤のセセエイウノノ』 1YKVW3UTK6 疑似コードで言えば fs=open("hoge.txt"); for(i=0;i<max;i++) { str = format("manko-%d.txt",i); } fs.close (); がやりたいの? 疑似コードで言えば fs=open("hoge.txt"); for(i=0;i<max;i++) { str = format("manko-%d.txt¥n",i); fs.write(str); } fs.close (); がやりたいの? read.cgi ver 07.5.5 2024/06/08 Walang Kapalit ★ | Donguri System Team 5ちゃんねる