Windows ã«ã¤ã㦠GetActiveOleObjã§ã¯åºæ¥ãªãæ£ç¢ºãªIEObjectã®åå¾ãåºæ¥ã¾ãã ãã®ç·¨ã®åºæ¬æ å ±ã¯ ãããã ã¨ããã ããé ãã¦ããã¾ãã WindowsãDoItãµã³ãã«â ãWindowsãªãã¸ã§ã¯ããåæããï¼ãã£ã¬ã¯ããªã¨IEãæ¾ãã¾ãï¼ WindowsãDoItãµã³ãã«â¡ãIEãªãã¸ã§ã¯ãã®ã¿åæãã WindowsãDoItãµã³ãã«â¢ãã¿ã¤ãã«orURLã®é¨åä¸è´æå®ã«ã¦IEãªãã¸ã§ã¯ããåå¾ãã WindowsãDoItãµã³ãã«â£ãexplorer.exe ã® Navigate ãæ¯è¼ãã¦ã¿ã WindowsãDoItãµã³ãã«â¤ãexplorer.exe (ãã£ã¬ã¯ããªã¦ã¤ã³ãã¦) ã® ID ãã 表示ãã¦ãã ã¢ãã¬ã¹ ãåå¾ã NameSpace ã«ã¤ã㦠ããã¾ãçã«ã¯ãjpgã®ãµã¤ãº ã mp3ã®ãããã¬ã¼ãæ å ±ãåå¾ã§
ãæ°ã«å ¥ãã®MP3ãä½æ²ãéãã¦é³æ¥½CDãç¼ããããªã¨ããæ¼å¥æéãå ¨é¨ã§ä½åã«ãªãããäºåã«ç¥ãããå ´åãããã¾ããä»ã®äººã¯ã©ãã ãç¥ãã¾ããããç§ã«ã¯ããã¾ãããã¡ãããããããæ å ±ãæä¾ãã¦ãããããªã¼ã½ãããªã©ã¯ããããããã§ããããã©ãã§ããã°ãã£ãã£ã£ã¨ãèªåã§ç°¡åã«èª¿ã¹ãããã幸ãã§ãã ããããæ å ±ã¯ãMP3ãã¡ã¤ã«ã®æ«å°¾ãå é ã«è¨é²ããã¦ããã®ã¯ç¥ã£ã¦ãã¾ããããé©å½ã«å½ãããã¤ãã¦åããã§æãåºãããã¨ãæãã¾ãããããããWSHã使ãã¨ç°¡åã«åå¾ã§ããã®ãçºè¦ããã®ã§(åå¿é²ã¨ãã¦)æ¸ãã¦ããã¾ãããã®ãã¡ã使ããããUIãä½ãããããã¾ããããã¨ããããã¯Excelã®ã·ã¼ãã«åºåããVBAãµã³ãã«ã§ããExcelã®GetOpenFilenameã¡ã½ããã使ã£ã¦ãã¾ãã®ã§ãVB6ã§ã¯åãã¾ããã Sub Sample1() Dim FSO As Variant, SH
ãªãªã¼ã¹ãé害æ å ±ãªã©ã®ãµã¼ãã¹ã®ãç¥ãã
ææ°ã®äººæ°ã¨ã³ããªã¼ã®é ä¿¡
å¦çãå®è¡ä¸ã§ã
j次ã®ããã¯ãã¼ã¯
kåã®ããã¯ãã¼ã¯
lãã¨ã§èªã
eã³ã¡ã³ãä¸è¦§ãéã
oãã¼ã¸ãéã
{{#tags}}- {{label}}
{{/tags}}