Tag: createobject

非常奇怪的行为createobject（“HTMLFILE”）！: 我不明白为什么我会得到这种奇怪的行为！在创build和分配htmlfile对象时，函数会返回一个空白对象（“nothing”），并且当我逐行运行代码时，即使不按F8运行下一行，它也会自动运行。没有任何错误！任何想法可能会发生什么？奇怪行为开始的行： Set htmlObj = CreateObject("HTMLFILE") Public Function XMLHTTP_Request(Method As String, URL As String, Optional PostData As String, Optional StrCookie As String) As HTMLDocument Dim oXMLHTTP As Object, htmlObj as object Set oXMLHTTP = CreateObject("MSXML2.XMLHTTP") oXMLHTTP.Open Method, URL, False oXMLHTTP.setRequestHeader "Content-Type", "application/x-www-form-urlencoded" oXMLHTTP.setRequestHeader "Cookies", StrCookie On Error GoTo ErrorHandler oXMLHTTP.send (PostData) On Error […]

VBA Word 2013：Scripting.FileSystemObject：运行时错误424 – 所需的对象: 我在VBA中并不是很坚定，而且我一直在尝试在Word中使用我之前在Excel中编写的函数。（它在哪里工作完美无缺！）函数遍历一个文本文件，并在某个（寻找）其他string之后返回string： Function keySearch(ByVal sSearch As String) As String Dim fso As New FileSystemObject Dim FileNum Dim DataLine As String Dim posOf_A As Integer Dim filepath As String keySearch = "" 'Create filesystem object Set fso = CreateObject("Scripting.FileSystemObject") 'filepath to textfile filepath = ActiveWorkbook.Path & "\temp.txt" Set FileNum = fso.OpenTextFile(filepath, 1) '<— This is […]

Excel VBA CreateObject：运行时错误'432'：在自动化操作期间未find文件名或类: 如何修复错误“运行时错误'432'：在自动化操作过程中找不到文件名或类在Excel VBA中调用”CreateObject（“Scripting.FileSystemObject”）“时出现？我有一个电子表格，其中有两个工作在其他计算机上的macros，在我恢复工厂并重新安装Office之前用于在我的电脑上工作。我在Windows 7 64位，运行Office Home和Student 2010。我追溯了这个错误，并创build了一个新的电子表格，其中包含一个运行一行的macros： Set objFSO = CreateObject("Scripting.FileSystemObject") 这个macros在其他两台电脑上运行良好，所以在我的PC环境中有一些东西让我感到困惑。我得到的错误：运行时错误“432”：自动化操作期间未find文件名或类名我试过修复Office安装并完全卸载并重新安装Office。从我在互联网上可以find的信息，我可能需要参考“Microsoft脚本运行时”。我相信这是文件scrrun.dll。当我将这个引用添加到我的项目时，它显示“Microsoft脚本运行时”的位置是“C：\ Users \\ Documents”。你可以在附带的图片中看到这个错误。这似乎不是正确的位置，并没有dll那里。如果我检查这个引用来包含它，然后点击OK，我得到错误：加载DLL时出错在“C：\ Windows \ System32”中findscrrun.dll我试图注册的DLL，它工作正常。取消注册给我的错误：模块“scrrun.dll被加载，但对DLLUnregisterServer的调用失败，错误代码为0x800300002。我确保pipe理员组拥有该文件，以防万一是权限问题。我也尝试在安全模式下运行注销。我可能会看到“Microsoft脚本运行时”参考和/或scrrun.dll总切线。感谢您的任何build议！

试图通过Excel从网站检索XML数据: 我正在写一个excel电子表格，用于在线游戏Eve Online。我的电子表格需要通过名为eve-marketdata.com的数据提供商网站自动检索数据。在eve-marketdata的开发者页面上： http ://eve-marketdata.com/developers/item_history2.php它给出了一些关于如何通过http发送“发布”请求来请求数据的说明。例如：用于市场历史请求的url是： http: //api.eve-marketdata.com/api/item_history2.xml ? char_name=venoushka patel然后，可以说我想检索45天的数据项id 34，来自地区10000002.我会放在url的结尾：item_id = 34，days = 45和region_ids = 10000002，每个由＆符号分隔，以完成以下产品：api.eve-marketdata.com/api/ item_history2.xml？char_name = venoushka patel＆type_ids = 34＆region_ids = 10000002＆days = 45（由于在本网站发布规定，删除了http：//）因此，我需要某些单元格使用电子表格中的信息（例如项目ID，区域ID等）来parsing相应的URL，将URL提交到站点，然后仅抓取我正在查找的信息并将其放置进入细胞。这是目前在谷歌文档，而不是Excel，因为他们的'importxml'function利用xpath更容易。但是，谷歌文档限制XML电话的数量为每个电子表格50，我的电子表格将有几千，所以我必须使用Excel。不，我不打算在Excel中使用“从networking导入”或“映射xml”到单元格function，因为我在电子表格中有数以千计的这些function，而不是时间和资源效率。我被告知可以使用下面的vba代码来完成这个工作： Set objHTTP = CreateObject("MSXML2.ServerXMLHTTP") URL = "http://www.somedomain.com" objHTTP.Open "POST", URL, False objHTTP.setRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)" objHTTP.send […]

VBA二进制文件 – cnc程序: 我正在使用macros来创build一个CNC程序。要创build机器使用的“.spf”文件我使用： Dim m2_path as string m2_path = T:\Production\Cavity-Line\Eric R\Excel\PARAMETER.spf Dim text as string text = 'my data Dim fso As Object Dim Fileout As Object Set fso = CreateObject("Scripting.FileSystemObject") Set Fileout = fso.CreateTextFile(m2_path, True, True) Fileout.Write text Fileout.Close 当我尝试打开机器上的程序时，出现“无法打开二进制文件”错误。但是，如果我手动将内容从“m2_path”文件复制到另一个，然后尝试打开它，我不会收到错误消息。文本文件的格式有问题吗？机器正在使用SINUMERIK 840d sl。提前致谢问候编辑：感谢@ashleedawg

CreateObject随机抛出“系统关机已经安排”错误: 我Googlesearch了，没有任何东西。我的工作围绕让我的同事生活更轻松。目前，他们正在使用十多年前devise的非常笨重的电子表格。在使用PHP将他们的工具和报告迁移到本地Intranet的过程中，我已经configuration了一个电子表格，根据他们的Application.Username 然后在服务器之间来回地生成一个会话密钥，然后popup Internet Explorer打开它们从工作簿中的下拉列表中select的相关工具 – 这意味着他们的会话和工具纯粹是基于浏览器的。所有的作品很好，但是随机的，有时，当子打开互联网浏览器触发一个非常奇怪的错误消息出现： – 点击Debug后，会显示以下function，您可以自己查看哪一行以黄色突出显示。我可以确认在我的任务计划内没有任何任务。当我结束这个，并再次运行它，机会是运行得很好.. 有时只是这个错误popup。请帮忙！预先感谢。

VBA CreateObject: 从1月10日起，我被困在了这个代码行，我在电子邮件中find了它，我发现我不得不学习上课模块，所以我现在要回来问一个新的基础。代码行是（严重警告：您必须到VBE中的工具 – >引用并使用早期绑定激活Microsoft WinHTTP Services，版本5.1 ）： Dim WinHttpReq As Object Set WinHttpReq = CreateObject("WinHttp.WinHttpRequest.5.1") 对于CreateObject我去MS帮助和说：创build并返回一个ActiveX对象的引用现在我知道，当我们创build一个引用时，它只是一个对象，并且是这样做的（请纠正我，如果我错了）： Dim ThatIKnow as Workbook 那么我们就像这样实例化它 Set ThatIKnow = Workbooks.Add 为什么我们需要CreateObject？帮助继续说“ …一个ActiveX对象 ” 如果我点击帮助上的ActiveX，它会指出这样的术语表：通过自动化接口暴露给其他应用程序或编程工具的对象而这条线绝对没有告诉我什么。我所知道的ActiveX就是这个 …我认为是ActiveX控件…（我必须承认，虽然ActiveX对我来说一直是一个模糊的术语）现在在CreateObject（ “WinHttp.WinHttpRequest.5.1” ）里面，我search了Web，并且找不到一些像WinHttp对象那样的MS帮助。无论如何，对象浏览器将其作为库，但F1帮助button什么都没有显示。所以对象浏览器说这是一个图书馆，我发现它在networking中称为WinHttp参考，也作为一个WinHttp对象。这些是什么？而为了上帝的爱，为什么叫做“ 5.1 ”？我没有发现WinHttpRequest.5.1任何地方我不是要求嚼碎食物，但是任何破坏阿尼格玛的努力都会使整个局面更加紧张。请任何捏，可以帮助我破解这一行代码将帮助感谢您收看我的问题