-1

このコードだと思います

For Each file in filecoll
    Ext = UCase(Right(File.Path, 3)) 
    If Ext = "JPG" OR Ext = "GIF" Then
    on error resume next

JPGファイルのみを表示できますが、スクリプトがこれらも表示するようにPNGとGIFを追加する方法はありますか?

4

1 に答える 1

0

既に .gif ファイルに設定されているようですが、おそらく行を変更できます

If Ext = "JPG" OR Ext = "GIF" Then

読む

If Ext = "JPG" OR Ext = "GIF" OR Ext = "PNG" Then

すべてがうまくいく









でしょう。

于 2012-06-29T14:35:47.090 に答える