右键无法进入属性！！
大侠们帮帮忙阿！！！ 昨天升级到SP3。重启以后右击就不能进入属性，控制面板的显示打不开，切换到分类显示，更换主题等等都进不去。
无法进入？？有没有什么提示，或者就是没反应？右键菜单能打开不？？
依次运行下面三个命令试试
regsvr32 atl.dll
regsvr32 shell32.dll /i
regsvr32 netshell.dll
regsvr32 desk.cpl
行：11
字符：1
错误：缺少')'
代码：800A03EE
VBScript code
'绑定到本地计算机
strComputer = "."
'如果发生错误，继续执行
on error resume next
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
msgbox "此脚本可以批量将ppt文件中的文本转换为word文件。图片、表格等内容则自动跳过" & vbcrlf & "使用时请把所有要转换的ppt文件复制到目录c:\下。双击运行此文件即可。" & vbcrlf & "运行此脚本需要本机上安装了office"
'创建一个word对象
Set objWord = CreateObject("Word.Application")
'创建一个ppt对象
Set pptApp = CreateObject("PowerPoint.application")
'获得c:\目录下的文件集合
Set FileList = objWMIService.ExecQuery _
("ASSOCIATORS OF {Win32_Directory.Name='c:'} Where " _
& "ResultClass = CIM_DataFile")
For Each objFile In FileList
'如果文件的扩展名是ppt
If objFile.Extension = "ppt" Then
pptApp.visible = true
'打开这个ppt文件
Set pptSelection = pptApp.Presentations.Open("c:\" & objFile.FileName & "." & objFile.Extension)
'如果想让脚本处理得快些，把下面一行改为“objWord.Visible = false”,不推荐。
objWord.Visible = true
'新建一个word，以保存ppt中的文本
Set objDoc = objWord.Documents.Add()
Set objSelection = objWord.Selection
'从ppt的第一页开始循环。Slides.Count即幻灯片的数量
For i = 1 To pptSelection.Slides.Count
'从每一张ppt的第一个文本框开始循环，Shapes.Count，即每张幻灯片中文本框的数量
For j = 1 To pptSelection.Slides(i).Shapes.Count
'如果是每页的第一行，就按标题处理，变成黑体字
if i =1 then
objSelection.Font.Name = "黑体"
'把文本框中的文字添加到word中
objSelection.TypeText pptSelection.Slides(i).Shapes(j).TextFrame.TextRange.text
objSelection.TypeParagraph()
objSelection.Font.Name = "宋体"
end if
objSelection.TypeText pptSelection.Slides(i).Shapes(j).TextFrame.TextRange.text
'加一个回车
objSelection.TypeText vbcrlf
Next
next
'关闭这个ppt文件
pptSelection.close
'保存word文件。
objDoc.SaveAs("c:\" & objFile.FileName & ".doc")
'如果不需要关闭word，把下面这一行删掉
objDoc.close
'如果不想弹出消息框，把下面这一行删掉
msgbox "转换后的word已保存在c:\" & objFile.FileName & ".doc"
else '没有ppt文件
'msgbox "错误：c:\下没有发现ppt文件！"
End If
Next
pptApp.quit
帮我看看那里出问题了
Set FileList = objWMIService.ExecQuery _
("ASSOCIATORS OF {Win32_Directory.Name='c:'} Where " _
& "ResultClass = CIM_DataFile")
~~~~~~~~~~~~~~~~~~~~~~~~~~
把所有空行都删除
在windows 2008 R2 上编译wxWidgets-2.9.1 x64
研究了很长一段时间才在win上编译成功x64的wxWidgets
首先进入VS10环境cmd，
开始菜单Start Menu->Programs->Microsoft Visual Studio 2010->Visual Studio Tools\Visual Studio x64 Win64 Command Prompt (2010)
进入你的wxWidgets编译目录
C:
cd wxWidgets-2.9.1-x64\build\msw
然后分别输入下面命令编译release和debug，最后生成的文件都在C:\wxWidgets-2.9.1-x64\lib\*
nmake -f makefile.vc BUILD=release SHARED=1 RUNTIME_LIBS=dynamic DEBUG_INFO=0 VENDOR=mrpt USE_OPENGL=1 TARGET_CPU=amd64
nmake -f makefile.vc BUILD=debug SHARED=1 RUNTIME_LIBS=dynamic DEBUG_INFO=1 VENDOR=mrpt USE_OPENGL=1 TARGET_CPU=amd64
nmake -f makefile.vc BUILD=release SHARED=1 RUNTIME_LIBS=static DEBUG_INFO=0 USE_OPENGL=1 TARGET_CPU=amd64
nmake -f makefile.vc BUILD=debug SHARED=1 RUNTIME_LIBS=static DEBUG_INFO=1 USE_OPENGL=1 TARGET_CPU=amd64
编译例子:
cd ../../samples
nmake -f makefile.vc BUILD=release TARGET_CPU=amd64