getter1【超高速】ゲッター１

getter1【超高速】ゲ� ..

161:名無しさん＠お腹いっぱい。
08/05/28 04:28:08 3IC/Y+dp0
>>109
ものすごい亀だがｗ
ニコ動拡張子が .flv 付かない人用
あってるかどうか知らんが、一応これで良いような気がします

71：myFileName = MS_NthFieldB(S_Source,"<h1>",2)
72：myFileName = MS_NthFieldB(myFileName,"</h1>",1)
73：myFileName = MS_NthFieldB(myFileName,"</a>",1)
74：myFileName = MS_NthFieldB(myFileName,"target=" + chr(34) + "_blank" + chr(34) +">",2)
75：myFileName = Trim(myFileName)
76：myFileName = ReplaceAllB(myFileName,":","：")
77：myFileName = ReplaceAllB(myFileName,"."," ")
78：myFileName = ReplaceAllB(myFileName,"/","／")+ ".flv"←こんな感じで

78行目の最後に　+ ".flv"　を足してやると**********.flvでﾀﾞｳﾝされるはず・・・
自分はできました＾＾

次ページ