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

このエントリーをはてなブックマークに追加
1お尻丸出しの勇者
たとえば・・・
あいうえお0001.jpg

いうのを数字だけ自動的にかえて

あいうえお0001.jpg
あいうえお0002.jpg
あいうえお0003.jpg
あいうえお0004.jpg
あいうえお0005.jpg
あいうえお0006.jpg
あいうえお0007.jpg
あいうえお0008.jpg



とテキストに書き込むにはどーしたらいいですか?
どんなソフトを使えばいいですか?
フリーソフトで検索するとしたらなんていうキーワードで探せばいいですか?
軽いソフトがいいです
ウィンドウズについてるメモ帳ではできませんか?

まことにもうしわけないです
22:02/04/05 19:31
2ゲト ズザァァァァー
33:02/04/05 19:32
WSHで そぉいうのやるの どっかで見た
44:02/04/05 19:45
5_:02/04/05 19:48
   /      ┏ ))))                        ┃ ■■
   /      / ┃キ ┃                  | ヽヽ  ┃\
  /    / /┃ タ ┃          i 、、  | ヽヽ  |\    ┃  \
 / /  \ \┃┃ ┃__∧  ド ド  |ヽ   |\    |     ┃
/ /     \ ┃┃ ┃゚∀゚)━━━━━━ !!!!!
/ /      ヽ┃┃ ┃  ⌒\
/         ┃┃ ┃/ /
          /┗ (((┛ / <キタ━━━━━━
         /  / ̄ \     キタ━━━━━━ !!!!!
―      /  ん、  \ \
――    (__ (   >  )
   ⌒ヽ   ’ ・`し' / /
     人, ’ ’, ( ̄ /
   Y⌒ヽ)⌒ヽ、 )  |
            \_つ
6名無しさん@そうだ選挙にいこう:02/04/05 19:59
テキストに書き込むなら、表計算ソフトで作って、テキスト形式で保存して、
あとで、","などはワードパッドの”編集”−”置き換え”を使ってみたらどう?
7名無しさん@そうだ選挙にいこう:02/04/05 21:20
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までは作れます。ほかの表計算ソフトでも出来ると思います。
説明が下手なので、わかりづらいかもしれませんが、ご了承ください。
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お尻丸出しの勇者:02/04/06 00:23
1です
8さんサンクスです
で、このごみスレをどうするよ。
12名無しさん@そうだ選挙にいこう:02/04/06 03:30
めんどくせーなーと思いつつ
いつも手間かけてやってることを告白するスレ。
うん、そうしよう。
13名無しさん@そうだ選挙にいこう:02/04/06 06:53
鼻毛切ることかな。
14名無しさん@そうだ選挙にいこう:02/04/06 09:46
ヨメとのセクース。
>>8
カコイイ
16名無しさん@そうだ選挙にいこう:02/04/06 11:20
使い道無いね。といってみるテスト
17名無しさん@そうだ選挙にいこう:02/04/06 11:47
0001をコピペして、順次2,3,4、と手入力で直していく。
実際こうやってるんだろうな、マクロなんか知らない人って。
18名無しさん@そうだ選挙にいこう:02/04/06 12:26
マクロって知らないけどエクセルとかでできるじゃん。
って>1を見て思った。
>>7
「あいうえお0001.jpg」と入れたセルのフィルハンドル引っ張れば済むんじゃねーのか?
20お尻丸出しの勇者:02/04/06 14:46
>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
237:02/04/06 20:20
>>19
ガ━━(゚Д゚;)━━ン!
思いっきり、忘れていました。

>>21
そう言うので使うにせよ、やっぱり、ビジネスソフトで、やるのがいいかな〜
などと、愚考しました。

>>22
私は、いいかもしれませんが、1さんには、敷居が高いかも。
私にもちょっと高いかも。

「Cドライブて、何?」「そんなのないわよ!!」「ちゃんと教えてよ!!」
なんて言う、お客様と付き合ってうまく伝えられない時を、思い出します。
(パソコンとは、何の関係のない職種です。)

自分勉強足りません・・・
もうだめぽ、氏んだほうがいいぽ・・・
24名無しさん@そうだ選挙にいこう:02/04/07 11:12
パルタハケーン
25名無しさん@そうだ選挙にいこう:02/04/08 00:02
俺は19の方法使って展開してからイリアにぶち込んでた
擬装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に変えたやつもダメだった。

どうやるの、ってよりも、何しらべたらそういうのが分かるの?
>>26
何がしたいのかわからんが参考スレ
http://pc.2ch.net/test/read.cgi/win/1009175619/
2826:02/04/08 03:02
即レスさんくす
いまのところ何がしたいというわけでもないけど、何だか
すんげー便利そうだったから。

VB(A)で、ExcelもAccessもなしにメモ帳から実行ファイル
つくれるんしょ(ホントカヨ?)
明日休みなんで早速かじり始めてみます。
VBSだし。。。
実行ファイルじゃないし・・・
(通常、実行形式ファイルとは.exeなどコンパイルしたモノのこと
まぁ、実行できるけどさ、、、
使い捨てるには作るのに時間がかかるんで向いてないケド
マウスの制御はカンタンにはできないっぽいから、GUIに向いてないケド
おもしろいよ。
技術評論社のポケットリファレンスシリーズの
VBScriptの本がけっこういいよ。安くて
http://www2.gihyo.co.jp/books/bookinq.asp?ID=616
頑張ればウィルスだって作れるぞ。(作るな!
(有名なラブレターウィルスはVBSだぞ)
3026:02/04/08 19:40
VBS、と・・・紹介されたページでその言葉知りました。
WSHて言葉も初めて。
こういうのって、VB何とかがインストールされてない限り、AccessやExcelを
土台にしないと出来ないんだと思ってた。

JAVAでもいけるのかな。でもこっちは分からない(VBAダッテ初心者ノ域ヲ出テナイケド)
夕べは、ファイルコピー、フォルダーコピーをいくつか試したところで終了。
本日は、違う場所にある同名のファイルを比較させ、古い方を新しいのに書き
換える、みたいなこと試そうとしたけど、イツノマニカ寝チマッタ。
まあしばらくは、さしあたって使い道のありそうなもので単純なやつだけを
ちまちまつくってみます。

ただ、たしかに
つくるものによっては、労力に見合わないケースもありそう。
あと、Accessのエディターだと、スペルが正しいとき間違ってるとき、
それなりの反応を返してくれたり、やりたいことの候補一覧を
出してくれたりするけど、何にもないのはちとつらい。アタリメーカ、メモ帳ダモンナ。

このスレはこのまま消滅を待つしかないと思うんで、もちっと
腕上げたら、あっちのスレに行きます。
31名無しさん@そうだ選挙にいこう:02/04/08 20:15
目的が単純明快ならバッチでもマクロでも、
VBSなりPerlなりhtaなりbatなり自作するが吉。
目的ドンピシャって、探してもなかなか無いんだよね。
で、求める作業がそれらで出来ない場合、どうすりゃいい?
cなりJavaなり、学ぶべき?誰かに頼むべき?自営で困ってます。
どうよ?
>>31
Perl書けるならCやJavaも出来るんでないかい?
「求める作業」が明確なら、かなり難しそうでも
作ってみるのが良いんじゃないかな?
でも
多分「単純明快なら」とか言ってるところを見ると
自分のやりたい内容はそうとう複雑で
そのせいで具体的で詳細なところまでイメージできてないんじゃない?
操作のイメージやらイロイロをどんどん書き出して
それを元に「仕様をきっちりまとめる」ってのをやってみたら?
仕様がまとまった段階で、自分で作れそうか
誰かに頼まなきゃ無理そうかを判断する、って方針は?
3331: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}
----------------------------------
これで、あとは繰り返し回数を設定するだけ。
って、レス遅すぎですね。
>>33はどうなったんだろうか?
3631=33:02/05/01 18:22
>35 ご心配をおかけしまして
とりあえずJava本を買ってきた、けど本業が忙しくてそのまま。
J2SDKインストールすらしてない状態。長期戦ですなこれは。
こんぷーたって、あるレベルを超えると途端に敷居が高くなるもので
我慢してビルゲイツに付き合うか知識を得て新境地を切り開くか
吉野家牛丼こぴぺじゃないけど刺すか刺されるかの世界?
3731=33: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山崎渉:03/01/15 16:58
(^^)
40山崎渉:03/03/13 17:15
(^^)
41山崎渉:03/04/17 11:45
(^^)
42山崎渉:03/04/20 06:03
   ∧_∧
  (  ^^ )< ぬるぽ(^^)
43山崎渉:03/05/22 02:06
━―━―━―━―━―━―━―━―━[JR山崎駅(^^)]━―━―━―━―━―━―━―━―━―
44山崎渉:03/05/28 16:45
     ∧_∧
ピュ.ー (  ^^ ) <これからも僕を応援して下さいね(^^)。
  =〔~∪ ̄ ̄〕
  = ◎――◎                      山崎渉
4522: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人気の引き金となったFF7のように。
46山崎 渉:03/07/15 11:33

 __∧_∧_
 |(  ^^ )| <寝るぽ(^^)
 |\⌒⌒⌒\
 \ |⌒⌒⌒~|         山崎渉
   ~ ̄ ̄ ̄ ̄
     ∧_∧  ∧_∧
ピュ.ー (  ・3・) (  ^^ ) <これからも僕たちを応援して下さいね(^^)。
  =〔~∪ ̄ ̄ ̄∪ ̄ ̄〕
  = ◎――――――◎                      山崎渉&ぼるじょあ
48山崎 渉:03/08/15 23:16
    (⌒V⌒)
   │ ^ ^ │<これからも僕を応援して下さいね(^^)。
  ⊂|    |つ
   (_)(_)                      山崎パン
A
A
A
A
A
A
A
 A
  A
   A
51電脳プリオン:04/07/25 15:05
もう書き込めましたか?
ttp://www.vector.co.jp/soft/winnt/util/se332987.html?g
シェアだけど
正規表現で自動sendKey
53せる ◆7PaVAaEDbs :04/10/20 21:56:01
ここで書かれてるようなことやってたら、日が暮れます。
プログラムは極力書かないことです。

@エクセルで、数字のとこだけつくっておく 1、2、3、4、5、・・・・(セルの表示形式を「00000」(5けた表示))

A秀丸やnoeditorのキーボードマクロにて

(1)行頭に「あいうえお」付加
(2)行末に「jpg」付加

1分もかからないと思う。



54せる ◆7PaVAaEDbs :04/10/20 21:57:27
>>53
4桁表示の間違い (^^;)
>>53
ローカルルール読んだことある?
56せる ◆7PaVAaEDbs :04/11/25 00:30:07
>>55
読んだことないよ

死ね
>>56
死ねって他人に言う気分はどう?
58くさりん:2006/04/06(木) 16:24:31
≫57答えるの脚下。
59くさりん:2006/04/06(木) 16:25:27
≫57答えるの脚下。
60名無しさん@そうだ選挙にいこう:2008/08/24(日) 18:02:54
a
61名無しさん@そうだ選挙にいこう:2008/10/11(土) 23:07:28
ccc
2005年と2007年に書き込みなし
63名無し変更議論中@詳しくは自治スレへ:2009/03/04(水) 19:49:48
ddddddd
64名無しさん@そうだ選挙にいこう:2011/02/16(水) 18:10:11
ガンジスDDT
65 忍法帖【Lv=5,xxxP】 :2011/06/12(日) 22:03:46.98
test
66名無しさん@そうだ選挙にいこう:2011/12/22(木) 20:30:50.69
age
67名無しさん@そうだ選挙にいこう:2012/07/24(火) 20:53:04.14
age
68 忍法帖【Lv=40,xxxPT】(3+0:8) 【49.4m】 電脳プリオン ◆3YKmpu7JR7Ic :2013/01/02(水) 16:57:43.25 BE:496625377-PLT(12079)
  ∧_∧
  ( ・∀・)   | | ガッ
 と    )    | |
   Y /ノ    人
    / )    <  >__Λ∩
  _/し' //. V`Д´)/ ←>>42
 (_フ彡        /
69名無しさん@そうだ選挙にいこう:2013/09/18(水) 09:50:32.09
70名無しさん@そうだ選挙にいこう:2013/09/18(水) 09:51:24.59
>>69
71名無しさん@そうだ選挙にいこう
保守