「●MIMETYPE取得」の編集履歴（バックアップ）一覧はこちら
「●MIMETYPE取得」(2009/03/24 (火) 14:29:01) の最新版変更点
追加された行は緑色になります。
削除された行は赤色になります。
*情報
作者名：五十六
引用元：なし
*概要
MIMETYPE(Content-type)を取得します。
でも、判定基準は拡張子のみです。
*解説
対応拡張子
.html|.htm|.tex|.latex|.ltx|.pdf|.ps|.rtf|.sgm|.sgml|.tab|.tsv|.txt|.xml|.jar|.cpt|
.gz|.hqx|.sh|.shar|.sit|.tar|.z|.zip|.ai|.bmp|.rle|.dib|.cgm|.dwf|.epsf|.eps|.fif|
.fpx|.gif|.jpg|.jpeg|.jpe|.jfif|.jfi|.pcd|.pict|.pct|.png|.tga|.tpic|.vda|.vst|.tiff|
.tif|.wrl|.xbm|.xpm|.aiff|.aif|.au|.kar|.m1a|.m2a|.midi|.mid|.smf|.mp2|.mp3|.mpa|
.mpega|.rpm|.snd|.swa|.vqf|.wav|.aab|.aam|.aas|.asf|.avi|.dcr|.dir|.dxr|.flc|.fli|
.mng|.m1s|.m1v|.m2s|.m2v|.moov|.mov|.qt|.mpeg|.mpg|.mpe|.mpv|.ppt|.rm|.spl|.swf|
.vdo|.viv|.vivo|.xdm|.xdma|.cdf|.class|.exe|.pl|.ram|.vdb|.vqe|.vql|.csv|.doc|
.xls|.xdw|.css|.js|.hdml|.m4a|.mp4|.mmf|.wmv|.3g2|.lha|.lzh|.tgz
その他、
*サンプルプログラム
「aaa.mp3」からMIMETYPE取得して言う。#audio/mpeg
「.doc」からMIMETYPE取得して言う。#application/msword
「.aiueo」からMIMETYPE取得して言う。#不明
*//本体
#-----------------------------------------------------------------------
#-----------------------------------------------------------------------
!MIMEリスト=「.html,text/html{改行}.htm,text/html{改行}.tex,application/x-latex{改行}.latex,application/x-latex{改行}.ltx,application/x-latex{改行}.pdf,application/pdf
.ps,application/postscript{改行}.rtf,application/rtf{改行}.sgm,text/sgml{改行}.sgml,text/sgml{改行}.tab,text/tab-separated-values{改行}.tsv,text/tab-separated-values
.tex,application/x-tex{改行}.txt,text/plain{改行}.xml,text/xml{改行}.jar,application/java-archiver{改行}.cpt,application/mac-compactpro{改行}.gz,application/gzip
.hqx,application/mac-binhex40{改行}.sh,application/x-sh{改行}.shar,application/x-sh{改行}.sit,application/x-stuffit{改行}.tar,application/x-tar{改行}.z,application/x-compress
.zip,application/zip{改行}.ai,application/postscript{改行}.bmp,image/x-bmp{改行}.rle,image/x-bmp{改行}.dib,image/x-bmp{改行}.cgm,image/cgm{改行}.dwf,drawing/x-dwf
.epsf,appilcation/postscript{改行}.eps,appilcation/postscript{改行}.ps,appilcation/postscript{改行}.fif,image/fif{改行}.fpx,image/fpx{改行}.gif,image/gif
.jpg,image/jpeg{改行}.jpeg,image/jpeg{改行}.jpe,image/jpeg{改行}.jfif,image/jpeg{改行}.jfi,image/jpeg{改行}.pcd,image/pcd{改行}.pict,image/pict
.pct,image/pict{改行}.png,image/x-png{改行}.tga,image/x-targa{改行}.tpic,image/x-targa{改行}.vda,image/x-targa{改行}.vst,image/x-targa{改行}.tiff,image/tiff
.tif,image/tiff{改行}.wrl,model/vrml{改行}.xbm,image/x-bitmap{改行}.xpm,image/x-xpixmap{改行}.aiff,audio/aiff{改行}.aif,audio/aiff{改行}.au,audio/basic
.kar,audio/midi{改行}.m1a,audio/mpeg{改行}.m2a,audio/mpeg{改行}.midi,audio/midi{改行}.mid,audio/midi{改行}.smf,audio/midi{改行}.mp2,audio/mpeg
.mp3,audio/mpeg{改行}.mpa,audio/mpeg{改行}.mpega,audio/mpeg{改行}.rpm,audio/x-pn-realaudio-plugin{改行}.snd,audio/basic{改行}.swa,application/x-director
.vqf,audio/x-twinvq{改行}.wav,audio/wav{改行}.aab,application/x-authorware-bin{改行}.aam,application/x-authorware-map{改行}.aas,application/x-authorware-seg{改行}.asf,video/x-ms-asf
.avi,vide/x-msvideo{改行}.dcr,application/x-director{改行}.dir,application/x-director{改行}.dxr,application/x-director{改行}.flc,video/flc
.fli,video/flc{改行}.mng,video/mng{改行}.m1s,vide/mpeg{改行}.m1v,vide/mpeg{改行}.m2s,vide/mpeg{改行}.m2v,vide/mpeg{改行}.moov,video/quicktime{改行}.mov,video/quicktime
.qt,video/quicktime{改行}.mpeg,vide/mpeg{改行}.mpg,vide/mpeg{改行}.mpe,vide/mpeg{改行}.mpv,vide/mpeg{改行}.ppt,application/mspowerpoint{改行}.rm,audio/x-pn-realaudio
.spl,application/futuresplash{改行}.swf,application/x-shockwave-flash{改行}.vdo,video/vdo{改行}.viv,video/vnd.vivo{改行}.vivo,video/vnd.vivo{改行}.xdm,application/x-xdma
.xdma,application/x-xdma{改行}.cdf,application/x-netcdf{改行}.class,application/octet-stream{改行}.exe,application/exe{改行}.pl,application/x-perl
.ram,audio/x-pn-realaudio{改行}.vdb,application/activexdocument{改行}.vqe,audio/x-twinvq-plugin{改行}.vql,audio/x-twinvq-plugin
.txt,text/plain{改行}.csv,text/csv{改行}.tsv,text/tab-separated-values{改行}.doc,application/msword{改行}.xls,application/vnd.ms-excel{改行}.ppt,application/vnd.ms-powerpoint
.pdf,application/pdf{改行}.xdw,application/vnd.fujixerox.docuworks{改行}.html,text/html{改行}.htm,text/html{改行}.css,text/css{改行}.js,text/javascript
.hdml,text/x-hdml{改行}.jpg,image/jpeg{改行}.jpeg,image/jpeg{改行}.png,image/png{改行}.gif,image/gif{改行}.bmp,image/bmp{改行}.ai,application/postscript
.mp3,audio/mpeg{改行}.m4a,audio/mp4{改行}.mp4,audio/mp4{改行}.wav,audio/x-wav{改行}.mid,audio/midi{改行}.midi,audio/midi{改行}.mmf,application/x-smaf
.mpg,video/mpeg{改行}.mpeg,video/mpeg{改行}.wmv,video/x-ms-wmv{改行}.swf,application/x-shockwave-flash{改行}.3g2,video/3gpp2{改行}.zip,application/zip
.lha,application/x-lzh{改行}.lzh,application/x-lzh{改行}.tar,application/x-tar{改行}.tgz,application/x-tar{改行}.exe,application/octet-stream」。
●MIMETYPE取得(FILEから|FILEの|FILEで|FILEを)
Aとは文字列。A=空。A=FILEから拡張子抽出。
もし、A=空ならば、空で戻る。
A=Aを小文字変換。A=Aを英数半角変換。
H=(「HKEY_CLASSES_ROOT\」&A)のレジストリ開く。
Bとは文字列。B=空。B=Hで「Content Type」をレジストリ読む。
もし、B≠空ならば、Bで戻る。
Cとは数値。C=MIMEリストの0でAを0から表検索。
もし、C=-1ならば、「不明」で戻る。
MIMEリスト[C,1]で戻る。
#-----------------------------------------------------------------------
#-----------------------------------------------------------------------
----
#comment()
----
*情報
作者名：五十六
引用元：なし
*概要
MIMETYPE(Content-type)を取得します。
でも、判定基準は拡張子のみです。
*解説
対応拡張子
.html|.htm|.tex|.latex|.ltx|.pdf|.ps|.rtf|.sgm|.sgml|.tab|.tsv|.txt|.xml|.jar|.cpt|
.gz|.hqx|.sh|.shar|.sit|.tar|.z|.zip|.ai|.bmp|.rle|.dib|.cgm|.dwf|.epsf|.eps|.fif|
.fpx|.gif|.jpg|.jpeg|.jpe|.jfif|.jfi|.pcd|.pict|.pct|.png|.tga|.tpic|.vda|.vst|.tiff|
.tif|.wrl|.xbm|.xpm|.aiff|.aif|.au|.kar|.m1a|.m2a|.midi|.mid|.smf|.mp2|.mp3|.mpa|
.mpega|.rpm|.snd|.swa|.vqf|.wav|.aab|.aam|.aas|.asf|.avi|.dcr|.dir|.dxr|.flc|.fli|
.mng|.m1s|.m1v|.m2s|.m2v|.moov|.mov|.qt|.mpeg|.mpg|.mpe|.mpv|.ppt|.rm|.spl|.swf|
.vdo|.viv|.vivo|.xdm|.xdma|.cdf|.class|.exe|.pl|.ram|.vdb|.vqe|.vql|.csv|.doc|
.xls|.xdw|.css|.js|.hdml|.m4a|.mp4|.mmf|.wmv|.3g2|.lha|.lzh|.tgz
その他、レジストリに入ってるもの色々
*サンプルプログラム
「aaa.mp3」からMIMETYPE取得して言う。#audio/mpeg
「.doc」からMIMETYPE取得して言う。#application/msword
「.AVI」からMIMETYPE取得して言う。#video/avi
「.aiueo」からMIMETYPE取得して言う。#不明
*//本体
#-----------------------------------------------------------------------
#-----------------------------------------------------------------------
!MIMEリスト=「.html,text/html{改行}.htm,text/html{改行}.tex,application/x-latex{改行}.latex,application/x-latex{改行}.ltx,application/x-latex{改行}.pdf,application/pdf
.ps,application/postscript{改行}.rtf,application/rtf{改行}.sgm,text/sgml{改行}.sgml,text/sgml{改行}.tab,text/tab-separated-values{改行}.tsv,text/tab-separated-values
.tex,application/x-tex{改行}.txt,text/plain{改行}.xml,text/xml{改行}.jar,application/java-archiver{改行}.cpt,application/mac-compactpro{改行}.gz,application/gzip
.hqx,application/mac-binhex40{改行}.sh,application/x-sh{改行}.shar,application/x-sh{改行}.sit,application/x-stuffit{改行}.tar,application/x-tar{改行}.z,application/x-compress
.zip,application/zip{改行}.ai,application/postscript{改行}.bmp,image/x-bmp{改行}.rle,image/x-bmp{改行}.dib,image/x-bmp{改行}.cgm,image/cgm{改行}.dwf,drawing/x-dwf
.epsf,appilcation/postscript{改行}.eps,appilcation/postscript{改行}.ps,appilcation/postscript{改行}.fif,image/fif{改行}.fpx,image/fpx{改行}.gif,image/gif
.jpg,image/jpeg{改行}.jpeg,image/jpeg{改行}.jpe,image/jpeg{改行}.jfif,image/jpeg{改行}.jfi,image/jpeg{改行}.pcd,image/pcd{改行}.pict,image/pict
.pct,image/pict{改行}.png,image/x-png{改行}.tga,image/x-targa{改行}.tpic,image/x-targa{改行}.vda,image/x-targa{改行}.vst,image/x-targa{改行}.tiff,image/tiff
.tif,image/tiff{改行}.wrl,model/vrml{改行}.xbm,image/x-bitmap{改行}.xpm,image/x-xpixmap{改行}.aiff,audio/aiff{改行}.aif,audio/aiff{改行}.au,audio/basic
.kar,audio/midi{改行}.m1a,audio/mpeg{改行}.m2a,audio/mpeg{改行}.midi,audio/midi{改行}.mid,audio/midi{改行}.smf,audio/midi{改行}.mp2,audio/mpeg
.mp3,audio/mpeg{改行}.mpa,audio/mpeg{改行}.mpega,audio/mpeg{改行}.rpm,audio/x-pn-realaudio-plugin{改行}.snd,audio/basic{改行}.swa,application/x-director
.vqf,audio/x-twinvq{改行}.wav,audio/wav{改行}.aab,application/x-authorware-bin{改行}.aam,application/x-authorware-map{改行}.aas,application/x-authorware-seg{改行}.asf,video/x-ms-asf
.avi,vide/x-msvideo{改行}.dcr,application/x-director{改行}.dir,application/x-director{改行}.dxr,application/x-director{改行}.flc,video/flc
.fli,video/flc{改行}.mng,video/mng{改行}.m1s,vide/mpeg{改行}.m1v,vide/mpeg{改行}.m2s,vide/mpeg{改行}.m2v,vide/mpeg{改行}.moov,video/quicktime{改行}.mov,video/quicktime
.qt,video/quicktime{改行}.mpeg,vide/mpeg{改行}.mpg,vide/mpeg{改行}.mpe,vide/mpeg{改行}.mpv,vide/mpeg{改行}.ppt,application/mspowerpoint{改行}.rm,audio/x-pn-realaudio
.spl,application/futuresplash{改行}.swf,application/x-shockwave-flash{改行}.vdo,video/vdo{改行}.viv,video/vnd.vivo{改行}.vivo,video/vnd.vivo{改行}.xdm,application/x-xdma
.xdma,application/x-xdma{改行}.cdf,application/x-netcdf{改行}.class,application/octet-stream{改行}.exe,application/exe{改行}.pl,application/x-perl
.ram,audio/x-pn-realaudio{改行}.vdb,application/activexdocument{改行}.vqe,audio/x-twinvq-plugin{改行}.vql,audio/x-twinvq-plugin
.txt,text/plain{改行}.csv,text/csv{改行}.tsv,text/tab-separated-values{改行}.doc,application/msword{改行}.xls,application/vnd.ms-excel{改行}.ppt,application/vnd.ms-powerpoint
.pdf,application/pdf{改行}.xdw,application/vnd.fujixerox.docuworks{改行}.html,text/html{改行}.htm,text/html{改行}.css,text/css{改行}.js,text/javascript
.hdml,text/x-hdml{改行}.jpg,image/jpeg{改行}.jpeg,image/jpeg{改行}.png,image/png{改行}.gif,image/gif{改行}.bmp,image/bmp{改行}.ai,application/postscript
.mp3,audio/mpeg{改行}.m4a,audio/mp4{改行}.mp4,audio/mp4{改行}.wav,audio/x-wav{改行}.mid,audio/midi{改行}.midi,audio/midi{改行}.mmf,application/x-smaf
.mpg,video/mpeg{改行}.mpeg,video/mpeg{改行}.wmv,video/x-ms-wmv{改行}.swf,application/x-shockwave-flash{改行}.3g2,video/3gpp2{改行}.zip,application/zip
.lha,application/x-lzh{改行}.lzh,application/x-lzh{改行}.tar,application/x-tar{改行}.tgz,application/x-tar{改行}.exe,application/octet-stream」。
●MIMETYPE取得(FILEから|FILEの|FILEで|FILEを)
Aとは文字列。A=空。A=FILEから拡張子抽出。
もし、A=空ならば、空で戻る。
A=Aを小文字変換。A=Aを英数半角変換。
H=(「HKEY_CLASSES_ROOT\」&A)のレジストリ開く。
Bとは文字列。B=空。B=Hで「Content Type」をレジストリ読む。
もし、B≠空ならば、Bで戻る。
Cとは数値。C=MIMEリストの0でAを0から表検索。
もし、C=-1ならば、「不明」で戻る。
MIMEリスト[C,1]で戻る。
#-----------------------------------------------------------------------
#-----------------------------------------------------------------------
----
#comment()
----
