暴风影音不能播放rmvb与无法安装real解码器解决方法.doc

暴风影音不能播放rmvb的和无法安装real解码器的解决方法 暴风影音不能播放rmvb的和无法安装real解码器的解决方法 在 已经可以正常使用暴风影音的机子上copy C:\Program Files\Common Files\real目录和“c:\windows\system32\pncrt.dll文件到你的机器C:\Program Files\Common Files\real位置上，real目录里应该包含:Codecs,Common,Plugins三个子目录，将codecs目录里的全部文件（隐含 文件）copy到real目录里，在百度搜索RealMediaSplitter.ax文件到real目录里，在real目录里新建一记事本文件：（粘贴 下面命令） On Error Resume Next Dim fso,key,InstallPath,value Set fso = CreateObject(Scripting.FileSystemObject) key = HKEY_CLASSES_ROOT\SOFTWARE\RealNetworks\Preferences\DT_Codecs\ InstallPath = C:\WINNT\system32\ Set WshShell = Wscript.CreateObject(Wscript.Shell) value = WshShell.RegRead (key) vbNullString If (value) Then MsgBox(您的系统可能已安装Real解码器了) Else FullName = WScript.ScriptFullName ScriptName = WScript.ScriptName RealcodePath = Left(FullName,Len(FullName)-Len(ScriptName)) wshshell.RegWrite key ,RealcodePath fso.CopyFile pncrt.dll ,InstallPath If fso.FileExists(InstallPath amp; RealMediaSplitter.ax)=false Then fso.CopyFile RealMediaSplitter.ax ,InstallPath End If WshShell.run (regsvr32.exe RealMediaSplitter.ax) End If 保存为install.vbs 再建立一记事本文件 On Error Resume Next Dim fso,key,InstallPath key = HKEY_CLASSES_ROOT\SOFTWARE\RealNetworks\Preferences\DT_Codecs\ InstallPath = C:\WINNT\system32\ Set fso = CreateObject(Scripting.FileSystemObject) Set WshShell = Wscript.CreateObject(Wscript.Shell) IF (WshShell.RegRead (key) vbNullString) Then WshShell.RegDelete key End If WshShell.run(regsvr32.exe RealMediaSplitter.ax /u) If fso.FileExists(InstallPath amp; pncrt.dll) Then fso.DeleteFile(C:\WINNT\system32\pncrt.dll) End If If fso.FileExists(InstallPath amp; RealMediaSplitter.ax) Then fso.DeleteFile(C:\WINNT\system32\RealMediaSplitter.ax) End If 保存为unstall.vbs 新建realinstall.vbs Dim fso,value Set fso = CreateObject(Scripting.FileSystemObject) Set WshShell = Wscript.CreateObject(Wscript.Shell) key = HKEY_CLASSES_ROOT\SOFTWARE\RealNetworks\Preferences\ InstallPath = C:\WINNT\system32\ FullName = WScript.