連続した数字を自動で書き込む

1 名前：お尻丸出しの勇者 mailto:　　 [02/04/05 19:25] たとえば・・・ あいうえお0001.jpg と いうのを数字だけ自動的にかえて あいうえお0001.jpg あいうえお0002.jpg あいうえお0003.jpg あいうえお0004.jpg あいうえお0005.jpg あいうえお0006.jpg あいうえお0007.jpg あいうえお0008.jpg ・ ・ ・ とテキストに書き込むにはどーしたらいいですか？ どんなソフトを使えばいいですか？ フリーソフトで検索するとしたらなんていうキーワードで探せばいいですか？ 軽いソフトがいいです ウィンドウズについてるメモ帳ではできませんか？ まことにもうしわけないです 2 名前：2 mailto:sage [02/04/05 19:31] 2ｹﾞﾄ　ｽﾞｻﾞｧｧｧｧｰ 3 名前：3 [02/04/05 19:32] WSHで そぉいうのやるの どっかで見た 4 名前：4 [02/04/05 19:45] ttp://www.angel.ne.jp/~jac/freesoft.html これはどぉ？ 5 名前：_ [02/04/05 19:48] 　　　/　　　 　　┏ ））））　　　　　　　　　　　 　　　　　　　 　　　 ┃　■■ 　　　/　 　 　　/　┃キ ┃　　　　　　　　　　　　　　 　　 |　ヽヽ　　┃＼ 　　/　　　　／ ／┃ タ ┃ 　　　　　 　　 i 、、　 | ヽヽ　 |＼　　　 ┃　　＼ 　/　／　　＼　＼┃┃ ┃__∧　　ﾄﾞ ド　 |ヽ　 　|＼　 　 |　　　　　┃ / ／　　　　　＼　┃┃ ┃ﾟ∀ﾟ)━━━━━━ !!!!! ／ ／　　　　　 ヽ┃┃ ┃　 ⌒＼ ／　　　　　　　　 ┃┃ ┃／　／ 　　　　 　　　　　/┗ (((┛　／　<ｷﾀ━━━━━━ 　　　　　　　 　/　　/￣　＼　　　　　ｷﾀ━━━━━━ !!!!! ―　　　　　　/　　ん、　 ＼　＼ ――　　　　（＿＿　（　　　>　 ） 　　　⌒ヽ　　　’　・`し'　／　／ 　　　　　人,　’　’,　(￣　／ 　　　Y⌒ヽ）⌒ヽ､　）　　| 　　　　　　　　　　　　＼＿つ 6 名前：名無しさん＠そうだ選挙にいこう [02/04/05 19:59] テキストに書き込むなら、表計算ソフトで作って、テキスト形式で保存して、 あとで、","などはワードパッドの”編集”−”置き換え”を使ってみたらどう？ 7 名前：名無しさん＠そうだ選挙にいこう [02/04/05 21:20] ６です。 説明不足でした、あらためて操作を説明します。 エクセルで説明します。 エクセルを開き、セルＡ１に”あいうえお”と入れます。 セルＡ２に =A1 と入れます。セルＡ３以降のセルにセルＡ２の内容をコピーしておきます。 セルＢ１に0をいれて、セルＢ２に =B1+1 を入れ、セルＢ３以降のセルにセルＢ２の内容をコピーします。 セルＣ１にjpgをいれて、セルＣ２に =C1 を入れ、セルＣ３以降のセルにセルＣ２の内容をコピーします。 これをＣＳＶ形式（カンマ区切り）で、保存し。 （このとき警告が出ますが、”ＯＫ””はい”にしてください。） エクセルを閉じて（この時の警告はキャンセル）、 ワードパッドで保存したファイルを開きます。 （開くときは、”全てのファイル”に指定すると保存したファイルが見えます。） あとは、編集ー置換で",jpg"となっている部分を".jpg"に置換えて","を"00"に置換します。 数字一桁の部分には0が一つ足りないから、0を手入力してください。 これで、あいうえお0099.jpgまでは作れます。ほかの表計算ソフトでも出来ると思います。 説明が下手なので、わかりづらいかもしれませんが、ご了承ください。 8 名前：名無しさん＠そうだ選挙にいこう [02/04/05 21:40] メモ帳開いて下記のテキストを貼り付けて「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 9 名前：６ [02/04/05 22:55] >>8 おお、このほうが、メモ帳だけですんで断然いいですね。 ＞For i=1 to 99 ＞MyFile.WriteLine("あいうえお") & Right("000" & CStr(i),4) & ".jpg" ＞Next ここの、部分をいじくれば、ファイル名、桁数、拡張子が変えられるのですね。 ローテクばかりやっている自分が恥ずかしいです、勉強が足りませんでした。 逝ってきます。 10 名前：お尻丸出しの勇者 mailto:　　 [02/04/06 00:23] １です ８さんサンクスです 11 名前：名無しさん＠そうだ選挙にいこう mailto:sage [02/04/06 01:38] で、このごみスレをどうするよ。 12 名前：名無しさん＠そうだ選挙にいこう [02/04/06 03:30] めんどくせーなーと思いつつ いつも手間かけてやってることを告白するスレ。 うん、そうしよう。 13 名前：名無しさん＠そうだ選挙にいこう [02/04/06 06:53] 鼻毛切ることかな。 14 名前：名無しさん＠そうだ選挙にいこう [02/04/06 09:46] ヨメとのｾｸｰｽ。 15 名前：名無しさん＠そうだ選挙にいこう mailto:sage [02/04/06 10:34] >>8 ｶｺｲｲ 16 名前：名無しさん＠そうだ選挙にいこう [02/04/06 11:20] 使い道無いね。といってみるテスト 17 名前：名無しさん＠そうだ選挙にいこう [02/04/06 11:47] 0001をコピペして、順次2,3,4、と手入力で直していく。 実際こうやってるんだろうな、マクロなんか知らない人って。 18 名前：名無しさん＠そうだ選挙にいこう [02/04/06 12:26] マクロって知らないけどエクセルとかでできるじゃん。 って>1を見て思った。 19 名前：名無しさん＠そうだ選挙にいこう mailto:sage [02/04/06 14:10] >>7 「あいうえお0001.jpg」と入れたセルのフィルハンドル引っ張れば済むんじゃねーのか？ 20 名前：お尻丸出しの勇者 mailto:　　 [02/04/06 14:46] ＞0001をコピペして、順次2,3,4、と手入力で直していく。 ＞実際こうやってるんだろうな、マクロなんか知らない人って 私はやっていましたヨ それで頭がいたくなったんです 21 名前：名無しさん＠そうだ選挙にいこう mailto:sage [02/04/06 15:10] エロ画像収集か？ 俺は、 curl 使って、 curl -O ero.site.com/あいうえお[0001-0100].jpg だよ。ビジネスソフト板の話題じゃないな。 curl.haxx.se/download.html 22 名前：名無しさん＠そうだ選挙にいこう mailto:sage [02/04/06 18:18] www.borland.co.jp/cppbuilder/freecompiler/ これならフリーだぞ。 あとは、printf(もしくはcout)とループを覚えれば すぐ出来るＹＯ 23 名前：7 mailto:sage [02/04/06 20:20] >>19 ガ━━（ﾟДﾟ;)━━ン！ 思いっきり、忘れていました。 >>21 そう言うので使うにせよ、やっぱり、ビジネスソフトで、やるのがいいかな〜 などと、愚考しました。 >>22 私は、いいかもしれませんが、1さんには、敷居が高いかも。 私にもちょっと高いかも。 「Ｃドライブて、何？」「そんなのないわよ！！」「ちゃんと教えてよ！！」 なんて言う、お客様と付き合ってうまく伝えられない時を、思い出します。 （パソコンとは、何の関係のない職種です。） 自分勉強足りません・・・ もうだめぽ、氏んだほうがいいぽ・・・ 24 名前：名無しさん＠そうだ選挙にいこう [02/04/07 11:12] パルタﾊｹｰﾝ 25 名前：名無しさん＠そうだ選挙にいこう [02/04/08 00:02] 俺は１９の方法使って展開してからイリアにぶち込んでた 擬装gifとか 26 名前：名無しさん＠そうだ選挙にいこう [02/04/08 01:58] >>8 そのやり方､何だかﾁｮﾄ面白い Set MyFile = fso.CreateTextFile("c:\test.txt", True) の拡張子のところを､ためしにdocやxlsに変えたらやっぱりその通りになった｡ でも､ SendKeys "%{F4}S~", False AppActivate ("Program Manager") とか Kill〜 とか CopyFile〜 とかはダメだった｡ CreateをDeleteに変えたやつもダメだった｡ どうやるの、ってよりも､何しらべたらそういうのが分かるの? 27 名前：名無しさん＠そうだ選挙にいこう mailto:sage [02/04/08 02:46] >>26 何がしたいのかわからんが参考スレ pc.2ch.net/test/read.cgi/win/1009175619/ 28 名前：26 [02/04/08 03:02] 即レスさんくす いまのところ何がしたいというわけでもないけど、何だか すんげー便利そうだったから。 VB(A)で、ExcelもAccessもなしにメモ帳から実行ファイル つくれるんしょ(ﾎﾝﾄｶﾖ?) 明日休みなんで早速かじり始めてみます｡ 29 名前：名無しさん＠そうだ選挙にいこう mailto:sage [02/04/08 15:34] VBSだし。。。 実行ファイルじゃないし・・・ （通常、実行形式ファイルとは.exeなどコンパイルしたモノのこと まぁ、実行できるけどさ、、、 使い捨てるには作るのに時間がかかるんで向いてないケド マウスの制御はカンタンにはできないっぽいから、GUIに向いてないケド おもしろいよ。 技術評論社のポケットリファレンスシリーズの VBScriptの本がけっこういいよ。安くて www2.gihyo.co.jp/books/bookinq.asp?ID=616 頑張ればウィルスだって作れるぞ。（作るな！ （有名なラブレターウィルスはVBSだぞ） 30 名前：26 [02/04/08 19:40] VBS､と･･･紹介されたページでその言葉知りました｡ WSHて言葉も初めて｡ こういうのって､VB何とかがインストールされてない限り､AccessやExcelを 土台にしないと出来ないんだと思ってた｡ JAVAでもいけるのかな｡でもこっちは分からない(VBAﾀﾞｯﾃ初心者ﾉ域ｦ出ﾃﾅｲｹﾄﾞ) 夕べは､ファイルコピー、フォルダーコピーをいくつか試したところで終了｡ 本日は、違う場所にある同名のファイルを比較させ､古い方を新しいのに書き 換える、みたいなこと試そうとしたけど､ｲﾂﾉﾏﾆｶ寝ﾁﾏｯﾀ｡ まあしばらくは、さしあたって使い道のありそうなもので単純なやつだけを ちまちまつくってみます｡ ただ､たしかに つくるものによっては､労力に見合わないケースもありそう｡ あと､Accessのエディターだと、スペルが正しいとき間違ってるとき、 それなりの反応を返してくれたり、やりたいことの候補一覧を 出してくれたりするけど、何にもないのはちとつらい。ｱﾀﾘﾒｰｶ､ﾒﾓ帳ﾀﾞﾓﾝﾅ｡ このスレはこのまま消滅を待つしかないと思うんで､もちっと 腕上げたら､あっちのスレに行きます｡ 31 名前：名無しさん＠そうだ選挙にいこう [02/04/08 20:15] 目的が単純明快ならバッチでもマクロでも、 VBSなりPerlなりhtaなりbatなり自作するが吉。 目的ドンピシャって、探してもなかなか無いんだよね。 で、求める作業がそれらで出来ない場合、どうすりゃいい？ ｃなりJavaなり、学ぶべき？誰かに頼むべき？自営で困ってます。 どうよ？ 32 名前：名無しさん＠そうだ選挙にいこう mailto:sage [02/04/08 23:05] >>31 Perl書けるならCやJavaも出来るんでないかい？ 「求める作業」が明確なら、かなり難しそうでも 作ってみるのが良いんじゃないかな？ でも 多分「単純明快なら」とか言ってるところを見ると 自分のやりたい内容はそうとう複雑で そのせいで具体的で詳細なところまでイメージできてないんじゃない？ 操作のイメージやらイロイロをどんどん書き出して それを元に「仕様をきっちりまとめる」ってのをやってみたら？ 仕様がまとまった段階で、自分で作れそうか 誰かに頼まなきゃ無理そうかを判断する、って方針は？ 33 名前：31 mailto:sage [02/04/09 00:36] ＞32 ありがとう、只今思いつき羅列のまっ最中です。 本人は複雑とは思ってないんだが（知識があるという意味ではない）、精度と信頼性を要する。 いままで自分で作ったのはレベルの低いもので、しかもちゃんと出来てない。 ある目的で真剣にPerlを勉強しようと助言を求めたら、その実現はPerlでは苦しいし プロにまかせろという返事だったもので。 それだと次に困ったときまた自分で解決できないから、PerlがダメならJavaなりきちんと勉強する ほうがいいのか、、、って、31はそう読めないねｽﾏｿ 余計なことする位なら仕事に専念したいんだけど、その仕事中に＞17に近いことに直面するたび なんか真剣に勉強したほうが結局早道なのかなぁと。 34 名前：名無しさん＠そうだ選挙にいこう [02/04/25 03:44] RocketMouseでやれば一発。「繰り返し処理」の欄に ---------------------------------- 0000,0000,0000,文字列,あいうえお 0000,0000,0000,変　数,1,4 0000,0000,0000,文字列,.jpg 0000,0000,0000,キーOnly,{ENTER} ---------------------------------- これで、あとは繰り返し回数を設定するだけ。 って、レス遅すぎですね。 35 名前：名無しさん＠そうだ選挙にいこう mailto:sage [02/04/26 22:37] >>33はどうなったんだろうか？ 36 名前：31=33 mailto:sage [02/05/01 18:22] >35　ご心配をおかけしまして とりあえずJava本を買ってきた、けど本業が忙しくてそのまま。 J2SDKインストールすらしてない状態。長期戦ですなこれは。 こんぷーたって、あるレベルを超えると途端に敷居が高くなるもので 我慢してビルゲイツに付き合うか知識を得て新境地を切り開くか 吉野家牛丼こぴぺじゃないけど刺すか刺されるかの世界？ 37 名前：31=33 mailto:sage [02/05/01 18:27] ついでに 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**" 38 名前：名無しさん＠そうだ選挙にいこう [02/05/02 21:24] おおこれは揚げだろう 39 名前：山崎渉 mailto:（＾＾）sage [03/01/15 16:58] （＾＾） 40 名前：山崎渉 mailto:（＾＾） [03/03/13 17:15] （＾＾） 41 名前：山崎渉 mailto:（＾＾） [03/04/17 11:45] （＾＾） 42 名前：山崎渉 mailto:（＾＾）sage [03/04/20 06:03] 　　 ∧＿∧ 　　（　　＾＾ ）＜ ぬるぽ（＾＾） 43 名前：山崎渉 mailto:（＾＾） [03/05/22 02:06] ━―━―━―━―━―━―━―━―━[JR山崎駅（＾＾）]━―━―━―━―━―━―━―━―━― 44 名前：山崎渉 mailto:（＾＾） [03/05/28 16:45] 　　　 　∧＿∧ ﾋﾟｭ.ｰ　(　　＾＾ ） ＜これからも僕を応援して下さいね（＾＾）。 　　＝〔~∪￣￣〕 　　＝ ◎――◎ 　　　　　　　　　　　　　　　　　　　　　山崎渉 45 名前：22 mailto:sage [03/06/21 16:24] >>19 携帯ゲーム機"プレイステーションポータブル(PSP) 　このPSPは、新規格UMD(ユニバーサルメディアディスク)というディスクを利用しており、そのサイズは直径6cmととても小さい(CDの半分程度)。 容量は1.8GBとなっている。 画面は4.5インチのTFT液晶で、480px x 272px(16:9)。MPEG4の再生やポリゴンも表示可能。外部端子として、USB2.0とメモリースティックコネクタが用意されているという。 この際、スク・エニもGBAからPSPに乗り換えたらどうでしょう。スク・エニの場合、PSPの方が実力を出しやすいような気がするんですが。 任天堂が携帯ゲーム機で圧倒的なシェアをもってるなら、スク・エニがそれを崩してみるのもおもしろいですし。かつて、PS人気の引き金となったFF７のように。 46 名前：山崎 渉 mailto:（＾＾） [03/07/15 11:33] 　__∧＿∧_ 　|（　　＾＾ ）|　＜寝るぽ（＾＾） 　|＼⌒⌒⌒＼ 　＼ |⌒⌒⌒~|　　　　　　　　　山崎渉 　　 ~￣￣￣￣ 47 名前：ぼるじょあ ◆ySd1dMH5Gk mailto:（＾＾） [03/08/02 05:10] 　　　 　∧＿∧　 ∧＿∧ ﾋﾟｭ.ｰ　（　 ・３・） (　　＾＾ ） ＜これからも僕たちを応援して下さいね（＾＾）。 　　＝〔~∪￣￣￣∪￣￣〕 　　＝ ◎――――――◎ 　　　　　　　　　　　　　　　　　　　　　山崎渉&ぼるじょあ 48 名前：山崎 渉 mailto:（＾＾） [03/08/15 23:16] 　　　 (⌒V⌒) 　　　│ ＾ ＾ │＜これからも僕を応援して下さいね（＾＾）。 　　⊂|　　　　|つ 　　　（＿）（＿）　　　　　　　　　　　　　　　　　　　　　　山崎パン 49 名前：名無しさん＠そうだ選挙にいこう mailto:sage [04/06/09 22:03] A A A A A A A 50 名前：名無しさん＠そうだ選挙にいこう mailto:sage [04/06/09 22:09] 　A 　　A 　　　A 51 名前：電脳プリオン mailto:sage [04/07/25 15:05] もう書き込めましたか？ 52 名前：名無しさん＠そうだ選挙にいこう mailto:sage [04/07/28 11:09] ttp://www.vector.co.jp/soft/winnt/util/se332987.html?g シェアだけど 正規表現で自動sendKey 53 名前：せる ◆7PaVAaEDbs mailto:sage [04/10/20 21:56:01] ここで書かれてるようなことやってたら、日が暮れます。 プログラムは極力書かないことです。 �@エクセルで、数字のとこだけつくっておく １、２、３、４、５、・・・・（セルの表示形式を「00000」（５けた表示）） �A秀丸やnoeditorのキーボードマクロにて （１）行頭に「あいうえお」付加 （２）行末に「jpg」付加 １分もかからないと思う。 54 名前：せる ◆7PaVAaEDbs mailto:sage [04/10/20 21:57:27] >>53 ４桁表示の間違い　(^^;) 55 名前：名無しさん＠そうだ選挙にいこう mailto:sage [04/10/25 22:17:29] >>53 ローカルルール読んだことある？ 56 名前：せる ◆7PaVAaEDbs mailto:sage [04/11/25 00:30:07] >>55 読んだことないよ 死ね 57 名前：名無しさん＠そうだ選挙にいこう mailto:sage [04/11/26 00:14:21] >>56 死ねって他人に言う気分はどう？ 58 名前：くさりん [2006/04/06(木) 16:24:31 ] ≫５７答えるの脚下。 59 名前：くさりん [2006/04/06(木) 16:25:27 ] ≫５７答えるの脚下。 60 名前：名無しさん＠そうだ選挙にいこう mailto:sage [2008/08/24(日) 18:02:54 ] a 61 名前：名無しさん＠そうだ選挙にいこう mailto:sage [2008/10/11(土) 23:07:28 ] ｃｃｃ 62 名前：名無し変更議論中＠詳しくは自治スレへ mailto:sage [2009/02/16(月) 23:59:19 ] 2005年と2007年に書き込みなし 63 名前：名無し変更議論中＠詳しくは自治スレへ [2009/03/04(水) 19:49:48 ] ddddddd

---

---

[ 新着レスの取得/表示 (agate) ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef