宏错误，提示要求对象-CSDN论坛

论坛帮助

CSDN论坛 > Windows专区 > Microsoft Office应用

宏错误，提示要求对象 [问题点数：40分，结帖人zhangzumiao]

⋅VB接收来之postmessage自定义的消息。求高手赐代码。 ⋅宏错误，提示要求对象 ⋅Microsoft Office Word 2007录制宏，使用快捷键。如何修改快捷键 更多帖子 关注空间博客 zhangzumiao 本版专家分：3156 结帖率 98.04%: VBA代码如下：在thisdocument可以运行在模块newmcaros下不能运行。求高手解答
Sub 宏1()
'
' 宏1 宏
'
'
Dim TextBox1

With ActiveDocument

CustomDocumentProperties.Item("WENJIAN_NAME") = TextBox1.Text
CustomDocumentProperties.Item("DAIHAO") = TextBox2.Text
CustomDocumentProperties.Item("DANGAN_ID") = TextBox3.Text
CustomDocumentProperties.Item("DESCRIPTION") = TextBox1.Text + TextBox3.Text
CustomDocumentProperties.Item("XMMC_CPXH") = TextBox4.Text
'CustomDocumentProperties.Item("biaoshen") = TextBox6.Text
'CustomDocumentProperties.Item("pizhun") = TextBox7.Text

End With
End Sub

Private Sub TextBox1_Change()

End Sub

Private Sub TextBox2_Change()

End Sub

Private Sub TextBox3_Change()

End Sub

Private Sub TextBox4_Change()

End Sub

0 2011-03-30 17:31:25

回复数 1 只看楼主引用举报楼主

⋅国内大家感觉程序员中有百分之多少不知道CSDN的？ ⋅无法看到某些私信 ⋅无法看到某些私信 更多帖子 关注空间博客 ACMAIN_CHM 本版专家分：6840 版主 名人 2012年荣获名人称号 榜眼 2010年总版技术专家分年内排行榜第二 探花 2009年总版技术专家分年内排行榜第三 进士 2013年总版技术专家分年内排行榜第十 2011年总版技术专家分年内排行榜第七: 哪一句报错？

QQ群 48866293 OFFICE应用挖掘
MS OFFICE(ACCESS\EXCE\WORD等应用技术探讨与交流！技术群,请阅群论坛中的《踢人规则》

0 2011-03-30 20:19:44

只看TA 引用举报 #1 得分 40

使用vba对excel操作时出现 424运行时错误要求对象一下是代码请教哪里错了，刚发现没分值了，谅解 Sub main() Call work End Sub Private Sub work() Dim i As Integer Dim m As In

收藏帖子

关于VB方法返回值为值类型时，出现要求对象的理解: 今天写代码时，要写一个带返回值的方法，如下： '更新数据库操作 Public Function ExecuteCommand(ByVal strSql As String, _ ByVal dbcn As ADODB.Connection, _ Optional ByVal cmdType As ADODB.Co

要求对象的错误！！！！！！！！！急急: While Not rs1.EOF If rs1.Fields(10) Is Null Then ————————————要求对象的错误 rs1.Fields(5) = rs1.Fields(10)

怎样解决打开word弹出宏的错误提示对话框的问题: 方法一 1、单击左下角的“开始”菜单，单击“控制面板” 2、在控制面板里双击“程序和功能”选项 3、卸载或更改程序列表中右击Microsoft office，单击“更改”按钮

解决word错误提示宏错误提示和模板错误提示: 当打开word关闭的时候出现下面2种错误提示，魅力网络教大家如何彻底解决，亲测可以解决了，ofcie2007 1、每次提示所做的更改汇影响共用模板normal 2、您正在试图运行的函数包含有宏或需要宏支持的内容解决方法：点击word左上角的按钮---word选项按照下图解决本文转自 yeybz 51CTO博客，原文链接:http://bl...

VBA学习之一：基本知识: 1、简介 Visual Basic for Applications（VBA）是Visual Basic的一种宏语言，是微软开发出来在其桌面应用程序中执行通用的自动化(OLE)任务的编程语言。主要能用来扩展Windows的应用程序功能，特别是Microsoft Office软件。也可说是一种应用程式视觉化的Basic 脚本。该语言于1993年由微软公司开发的的应用程序共享一种通用的自动化语言——...

VBA中窗体模块、标准模块和类模块的区别: VBA中窗体模块、标准模块和类模块的区别

无法在要求对象展开的函数中使用 __try: 无法在要求对象展开的函数中使用 __try

winsock客户端提示“要求对象”错误: 我想做个简单的小程序，定时往server端扔东西，但刚运行第一句SockCl.RemoteHostIP 就报“实时错误'424'，要求对象”rn，程序如下，请各位高手解答，谢谢。rnrnSockCl.RemoteHostIP = "xxx.xx.xx.xx"rnSockCl.RemotePort = 10001rnSockCl.ConnectrnSockCl.SendData Text2.TextrnSockCl.Close

提示要求对象: On Error GoTo cmderrorrnDim Sear_data1 As StringrnDim Sear_date2 As StringrnrnIf Option1.Value = True Thenrn Sear_date1 = Format(CDate(Combo_S1.Text & "-" & _rn Combo_S2.Text & "-" & Combo_S3.Text), "yyyy-mm-dd")rn Sear_date2 = Format(CDate(Combo_E1.Text & "-" & _rn Combo_E2.Text & "-" & Combo_E3.Text), "yyyy-mm-dd")rn gsql = "select * from test where data between #" & _rn Sear_date1 & "#" & " and" & " #" & Sear_date2 & "#"rnEnd Ifrnrs_data1.Open gsql, conNew, adOpenKeyset, adLockPessimisticrnHcbf.displaygrid1rnUnload Mernrncmderror:rnIf Err.Number <> 0 Thenrn MsgBox Err.Description rn执行过程中提示“要求对象”请问是什么原因？

TxtMyFile.Text 错误:要求对象?: Private Sub CmdCopyStr_Click()rn Dim TmpStr As Stringrn rn TmpStr = LoadResString(101)rn TxtMyFile.Text = TmpStrrn我使用这段程序调用一个文本文件,101标号和进入字符串编辑我都用了,这是怎么回事呢?rn

提示对象错误: function old_new(a,b,c) rn rnvar a,b,c rn if (b

VBA的CountIf错误：要求对象: 今天为何作死晚睡？因为遇到了这个424错误。解决方法就是请先选中那个sheet, 对sheet.select然后再用countif，并且这个时候所有的sheet都变为Activesheet。然后就不会有那个错误了！

VBA中文本框等对象传参: 代码：function test(txt as textbox) .... end function test(textbox1)调用时，报错，类型不匹配 (type mismatch)一直以为是自己是其它问题，花费数小时未果。实在是解决不了，经网上搜索，原来是类名的问题，

VBA对象体系: 在VBA中访问一个对象，必须清楚该对象在对象体系中处于何种位置，然后通过对象访问符合“.”进行访问，从包含该对象的最外层对象开始，由外及里逐次取其子对象，一直到达要访问的对象为止。例如要访问当前工作表的第4列第3行单元格的存储内容，Application.activesheets.range(“d3”).value。【VBA中主要包含6层基本对象】 Applicat

VBA基础知识整理: 最近由于项目的需要，需要在Excel自定义一些函数，来完成特殊的处理，为了完成工作，就囫囵吞枣的写了一些代码，现在闲暇下来，就好好的学习一下，VBA的基础知识。1.变量 1.Dim <> As <> 2.规则变量名称必须使用一个字母作为第一个字符。变量名称不能使用空格，句点(.)，感叹号(

.net 非静态的字段、方法或属性要求对象引用: vs中如果出现错误提示“非静态的字段、方法或属性要求对象引用”时说明该类的中方法没有static 不是静态的.有非静态的字段、方法或属性，要求该类必须实例化。1.实例化类为对象:classT sl=new classT();2.非静态的方法或属性可以通过对象的属性来引用: sl.ff(); 静态方法中不能访问非静态成员在static 静态的方法函数中引用非静态的方法导致静态的方法函数中只

VBA教学视频: 全民一起VBA视频笔记基础篇：视频地址 https://study.163.com/course/courseLearn.htm?courseId=1003088001#/learn/video?lessonId=1003503026&amp;amp;amp;amp;amp;amp;courseId=1003088001 子过程无返回值 Sub XXX() … End Sub 函数可以返回值 XXX = 变量 Function ...

实时错误'424':要求对象: 源代码如下：rnPrivate Sub Command0_Click(Index As Integer)rnIf Text1.Text <> "" Thenrn AdoData.Open "Select * From data Where JOB='" & Text1.Text & "' and 订单报废 is null and 订单取消 is null and 发货完成 is null", db, adOpenStatic, adLockOptimisticrn If AdoData.RecordCount = 1 Thenrn If AdoData.Fields("订单暂停") Is Not Null Thenrn List1.AddItem Text1.Text & "订单已暂停"rn MsgBox "订单已暂停，需要取消暂停后再录入"rn Elsern If AdoData.Fields("染色接收") Is Null Thenrn AdoData.Fields("染色接收") = Now()rn List1.AddItem Text1.Text & "接收完成"rn a = a + 1rn Label6.Caption = "染色接收数量：" & arn AdoData.Updatern Elsern MsgBox "订单重复！请查证后再处理。"rn End Ifrn End Ifrn ElseIf AdoData.RecordCount = 0 Thenrn AdoData.AddNewrn AdoData.Fields("染色接收") = Now()rn AdoData.Fields("JOB") = Text1.Textrn List1.AddItem Text1.Text & "接收完成"rn a = a + 1rn Label6.Caption = "染色接收数量：" & arn AdoData.Updatern Elsern MsgBox "订单录入错误，请查证后再录入"rn End Ifrn Set DataGrid1.DataSource = AdoDatarnElsern List1.AddItem Text1.Text & "请输入需要录入的订单号！"rnEnd IfrnText1.Text = ""rnEnd Subrnrn在调试的时候出现：实时错误'424':要求对象rn请问，错误出在哪里？怎么修改？

实时错误424 要求对象: form代码：rn[code=vb]Private Sub Command1_Click()rnText3.Text = sum(Int(Text2.Text), Int(Text1.Text))rnCommand1.Caption = Text3.TextrnEnd Sub[/code]rnrnrn模块：rn[code=vb]Public Function sum(x As Integer, y As Integer) As StringrnDim conn As New ADODB.ConnectionrnDim rs As New ADODB.Recordsetrnconn.Open "driver=sql server;server=xxj\XXXXXJ;database=mbk;uid=sa;pwd=1"rnSQL = "select * from number"rnrs.Open SQL, connrnSet MSHFlexGrid1.DataSource = rsrnsum = MSHFlexGrid1.TextMatrix(x, y)rnrs.Closernconn.ClosernEnd Function[/code]rnrnrn提示错误在Set MSHFlexGrid1.DataSource = rsrnrn我把模块中的代码放到from中就可以运行了到底是哪里错了rn[code=vb]Private Sub Command1_Click()rnDim conn As New ADODB.ConnectionrnDim rs As New ADODB.Recordsetrnconn.Open "driver=sql server;server=xxj\XXXXXJ;database=mbk;uid=sa;pwd=1" '连接数据库rnSQL = "select * from number"rnrs.Open SQL, connrnSet MSHFlexGrid1.DataSource = rsrnText3.Text = MSHFlexGrid1.TextMatrix(Int(Text2.Text), Int(Text1.Text))rnrs.Closernconn.ClosernEnd Sub[/code]

实时错误424，要求对象！！！: Private Sub Form_Load()rn Skin1.LoadSkin App.Path + "\winaqua.skn" '将文件装载到窗体中…rn Skin1.ApplySkin Me.hWndrn SqlPassText.PasswordChar = "*"rn If Right(App.Path, 1) <> "\" Thenrn Path = App.Path + "\"rn Elsern Path = App.Pathrn End Ifrnrn实时错误424，要求对象！！！

取消弹出宏安全性设置错误的提示: 在安装时精简掉一些自认为没用的组件,打开word会提示以下：（一般情况下没有完全安装office会出现这个提示） "您试图运行的函数包含宏或需要宏语言支持的内容.而在安装此软件时,您(或者您的管理员)选择了不安装宏或空间的支持功能此错误通常是由宏安全性设置造成的.如果您知道宏来自您信任的来源,则可将宏安全性设置更改为允许启用...

按要求实现宏: rnrn//max > minrn int centerm(int x,int max,int min)rnrn if (x > max) return max;rn if(x

要求对象",请问出错在哪儿">为什么提示"要求对象",请问出错在哪儿: Dim Conn　As New ADODB.ConnectionrnSet Conn=CurrentProject.ConnectionrnDim Rst As New ADODB.recordsetrnDim strSQL As StringrnrnstrSQL="SELECT 日期," & _rn "单据号," & _rn "供应商," & _rn "物料编码," & _rn "名称," & _rn "规格型号," & _rn "入库数量," & _rn "单价 " & _rn "FROM 进出帐 WHERE " & ME.Combo1 & " LIKE '" ME.Text3 & "'"rnrnRst.Open strSQL,Conn,adOpenKeyset,adLockOptimisticrnIF Rst.eof thenrn MsgBox "没有此信息查询",vbExclamation,"提示"rn Exit SubrnEND IFrnrnSet Datagrid1.DataSource=Rstrnrn 为什么运行到最后赋值给Datagrid1数据来源"Set Datagrid1.DataSource=Rst"时出错,rn提示"运行时错误'424' 要求对象"rn求助各位,在此先谢谢各位了rn

VBA中使用FSO提示“要求对象”？？: 引用Microsoft Scripting Runtime后，rnDim oFso As New FileSystemObjectrnSet oFso = Server.CreateObject("Scripting.FileSystemObject")rnrn编译时候第二行提示“要求对象”，请问VBA中还和VB中有区别吗？rn请指教应该如何写！

要求对象？: sql="select * from 表 where '"& 函数(字段名) &"'>'"& 变量 &"' "rn错误提示：要求对象。rn问题出在那里了？

要求对象: sqlstr = "insert into jindutb(bgbh,ypname,csxm,csyj,jsyptime,csjg,ycbgtime,scbgtime,bjrq,bjje,sffk,fkdw,bz) values('" & Trim(txtbgbh.Text) & "','" & Trim(txtypname.Text) & "','" & Trim(txtypsl.Text) & "','" & Trim(txtcsxm.Text) & "','" & Trim(txtcsyj.Text) & "','" & Trim(txtsyqk.Text) & "','" & Trim(txtpzqk.Text) & "','" & Trim(txtfyqk.Text) & "','" & Trim(txtbz.Text) & "')"rn这是我sql语句，sqlstr已声明.就是到这句的时候，说要求对象。大侠指点~~~

vb数据库连接错误 “要求对象”: Dim Conn2 As ADODB.Connectionrn Set Conn2 = New ADODB.Connectionrn Conn2.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Nongduku.mdb;Persist Security info=False"rn [color=#FF0000] Conn2.Execute "select * into tmptable from [excel 8.0;database=" & nongduku.xls & "].[sheet1$]"[/color]rn rn Conn2.Execute "insert into nongdubiao(日期,时间,浓度) select日期,时间,浓度 from tmptable"rn Conn2.Execute "drop tabel tmptable"rn Set Conn2 = nonthingrn rn本来是照书上抄的，只改了一下数据库名，运行到 conn2.execute" select。。。这一句时，总说“ 要求对象”，这是什么错误，这么改？

VB6.0与SQL2008实时错误424要求对象: VB6.0与SQL2008实时错误424要求对象，代码如下：rnPrivate Sub Command1_Click()rnDim sqlCon As New ADODB.ConnectionrnsqlCon.Provider = "SQLOLEDB"rnsqlCon.Open "Server=FENGHUN-PC;Database=Library;Integrated Security=SSPI;"rnDim sqlCmd As New ADODB.CommandrnsqlCmd.ActiveConnection = sqlConrnsqlCmd.CommandText = "select * from LendTable"rnSet sqlRes = sqlCmd.ExecuternDim sqlStr As StringrnsqlStr = ""rnIf Trim(Text1.Text) <> "" Thenrn sqlStr = "where ReaderTable_ID=" + Trim(Text1.Text)rnEnd Ifrn[color=#FF0000]LibADO.RecordSource = "Select * from LendTable " & sqlStr[/color]rnLibADO.RefreshrnrnEnd Subrnrnrn其中LibADO.RecordSource = "Select * from LendTable " & sqlStr被指示为错误的语句

VB 实时错误 '424':要求对象: Private Sub Command4_Click()rn CommonDialog1.DialogTitle = "请输入数据库文件名："rn CommonDialog1.Flags = cdlOFNHideReadOnly 'Or cdlOFNOverwritePromptrn CommonDialog1.Filter = "Excel文件(*.xls)|*.xls"rn CommonDialog1.FilterIndex = 1rn CommonDialog1.ShowOpenrn rn Route.Text = CommonDialog1.FileNamern rn Dim strLin As Stringrn rn If Trim(Route.Text) = "" Thenrn MsgBox "数据库路径不能为空！", vbCritical, "错误"rn Exit Subrn End IfrnEnd Subrnrnrn我也上网查了说控件不存在，我看了控件存在的。我另外一个类似的程序也有跟这完全一样的一段代码没有报错，Why？

要求有效的数据类型"">DataColumn对象错误:"列要求有效的数据类型": dim c as new DataColumnrnc.DataType=System.Type.GetType("System.String")rnrn我买的书上是这样教的，但这样写却会报错————“列要求有效的数据类型”，看来我买的书是“误人子弟”出版社的。请问正确应该怎么写？

显示错误:要求对象!怎么办那?: Private Sub MonthView1_DateClick(ByVal DateClicked As Date)rnrnrnDim strsql As String, T As DaternrnOn Error GoTo errrnDim cn As New ADODB.Connection, rsrncn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Database1.mdb;Persist Security Info=False"rncn.Openrnrs.CursorLocation = adUseClient '设置客户端游标rnrs.Open "select * from log where 日期=#" & T & "#", cn, 3, 2rnSet DataGrid1.DataSource = rsrnExit Subrnerr:rn MsgBox err.DescriptionrnEnd Subrnrn显示错误:要求对象!怎么办那?

实时错误'242'，要求对象。（ListView）: Private Sub Form_Load()rn addListViewrnEnd SubrnrnPrivate Sub addListView()rn Dim i As Integer '房间rn For i = 1001 To 1050rn ListView1.ListItems.Add , , "房间" & Str(i), 1, 1 '(要求对象)rn NextrnEnd Subrnrn郁闷！请问高手如何解决？

请问要求对象错误如何解决: 我现在在做一个VB+SQL的管理系统，经常出现要求对象错误。实时错误“424”.请问该如何解决呢。rn谢谢。

UE4-VS宏提示: 亲爱的各位下载者，该资源我本人也没使用过，对于具体使用方法还是各位大佬摸索下，多多包涵。

提示未能找到宏: .mdb的文件运行窗体时，提示未能找到宏，新加了一模块，把宏POBas.bas导入进来，怎么还是提示未能找到宏？ApExcel.Application.Run "A.XLS!POBas.Update"

不弹出宏提示？: 我用的是OFFICE XP，当我把EXCEL中的安全设为中或高都不会出现宏提示，现在，我找到三种方法，但是，根据我的情况，我不想用：rn1、将安全性设为低rn2、数字签名rn3、用VB引用rn除了以上方法，是否有其他的解决方法，用VBA编程或其他，谢谢！（我必须用EXCEL，而且，不想用以上方法）rn

excel用宏运行窗体时错误提示要求对象: 想在模块一中写一个宏，再在表单中插一个按钮指点这个宏，通过按钮运行窗口，可是总是提醒要求对象rn[img=https://img-bbs.csdn.net/upload/201307/02/1372777852_479537.jpg][/img]

实时错误424 要求对象这是什么错误啊？！: 我照书上写了一段登陆某系统的窗口rn其中有一个函数rnfunction verify(userid as string, txtpwd as string) as booleanrn dim idinfo as recordsetrn dim sqlstr as stringrn sqlstr="select worknumber,password from worker where worknumber='" & worknumber & "'"rn set idinfo=coursedb.openrecordset(sqlstr,dbopensnapshot,dbreadonly) ---这一行出错rn if (idinfo.recordcount=0) thenrn msgbox "无此工号！",,"登陆"rn verify=falsern elsern if (idinfo.fields("password").value=txtpwd) thenrn verify=truern elsern msgbox "密码错！",,"登陆"rn verify=falsern end ifrn end ifrn idinfo.closernend functionrnrnrnrnvb提示说实时错误424 要求对象rnrn这是怎么回事啊？rn我哪里错了？我是完全按照书上写的啊

提示错误，未将对象引用设置到对象实例: private void btnApplySetting_Click(object sender, EventArgs e)rn rn this.Cursor = Cursors.WaitCursor;rn tryrn rn object NetworkAdapter = cmbNetworkAdapter.SelectedValue;rn if (NetworkAdapter != null)rn rn this.CurrentNetworkAdapter.NetworkAdapterName = NetworkAdapter.ToString();rn this.CurrentNetworkAdapter.ProxyServerAddress = this.txtIEProxy.Text.Trim();rn NetworkHelper.ApplyNetworkSetting(this.CurrentNetworkAdapter);rn Msg.Text = "提示信息：" + "应用配置成功！";rn rn elsern rn throw new Exception("没有指定适当的网络适配器名称。");rn rn rn catch (Exception ex)rn rn MessageBox.Show("应用配置错误1：" + ex.Message, "IP切换器");rn rn finallyrn rn this.Cursor = Cursors.Default;rn rn rnrn提示错误，未将对象引用设置到对象实例

Ajax的参数传递的问题，提示错误“缺少对象”: 试验的Ajax中出错代码部分为rn .....rn var mes=xmlhttp.responseXML.getElementsByTagName("message")[0].firstChild.data //xmlhttp是XMLHttpRequest的对象,message是在servlet中的参数rn .......rn servlet中有语句rn ...rn String message="**********"；rn ...rn out.println(""+message+"");rn ......rn 出错的地方是在firstChild,如果我用var mes=xmlhttp.responseXML.getElementsByTagName("message")[0]，就没错rn 高手请教啊！！救命啊！！rn 完整具体代码如下：rn validation.jsprn rnrn rn My JSP 'validation.jsp' starting pagern rn rn rn rn Ajax Validation Examplern Birth date:rn rn rn rnrn 服务器端ValidationServlet.java如下rn package server;rnrnimport java.io.IOException;rnimport java.io.PrintWriter;rnimport java.text.*;rnrnimport javax.servlet.ServletException;rnimport javax.servlet.http.HttpServlet;rnimport javax.servlet.http.HttpServletRequest;rnimport javax.servlet.http.HttpServletResponse;rnrnimport org.apache.taglibs.standard.extra.spath.ParseException;rnrnpublic class ValidationServlet extends HttpServlet rnrn public void doGet(HttpServletRequest request, HttpServletResponse response)rn throws ServletException, IOException rn PrintWriter out = response.getWriter();rn boolean passed=validateDate(request.getParameter("birthdate"));rn response.setContentType("text/html");rn response.setHeader("Cache-Control","no-cache");//不要缓存！rn String message="You have entered an invalid date.";rn if(passed)rn message="You have entered a right date";rn rn /*String xm="";rn xm+="";rn xm+=""+Boolean.toString(passed)+"";rn xm+=""+message+"";rn xm+=""; rn out.println(xm); */rn out.println("");rn out.println(""+Boolean.toString(passed)+"");rn out.println(""+message+"");rn out.println(""); rn out.close();rn rn private boolean validateDate(String date)rn boolean isvalid=true;rn if(date!=null)rn SimpleDateFormat s=new SimpleDateFormat("MM/dd/yyyy");rn try rn s.parse(date);rn catch (java.text.ParseException e) rn isvalid=false;rn rn rn elsern isvalid=false;rn rn return isvalid;rn rn rnrnrnrn rn

ajaxpro组件经常提示对象未定义错误: namespace Shoprnrn public class Cartrn rn ....rn AjaxPro.Utility.RegisterTypeForAjax(typeof(Cart));rn rnrn在前端调用时，经常提示对象未定义错误，即Shop未定义。而重新上传AjaxPro.dll后，就好了，这样的情况会经常出现，请问该如何处理。

为什么会提示这样的对象错误？: protected void btnLogin_Click(object sender, EventArgs e)rn rn DB db = new DB();rn string userName = this.txtUserName.Text.Trim();rn string passWord = db.MD5(this.txtPwd.Text.Trim());rn string num = this.txtValidateNum.Text.Trim();rn if (Session["ValidateNum"].ToString() == num.ToUpper())rn rn OleDbDataReader dr = db.reDr("select * from tb_User where UserName='" + userName + "' and PassWord='" + passWord + "'");rn dr.Read();rn if (dr.HasRows)rn rn Session["UserID"] = dr.GetValue(0);rn Session["Role"] = dr.GetValue(4);rn Response.Redirect("~/UserManagement.aspx");rn rn elsern rn Response.Write(" ");rn rn dr.Close; [color=#FF0000](------错误 1 只有 assignment、call、increment、decrement 和 new 对象表达式可用作语句--------)[/color]rn rn elsern rn Response.Write(" ");rn rn rnrnrnrnrn我是新手，这个是做登陆界面的。我连的是ACCESS 数据库并不是SQL（我也是被逼用ACCESS的）rn公共类里的5个方法：rn public OleDbConnection GetCon()rn rn return new OleDbConnection(ConfigurationManager.AppSettings["ConnectionString"].ToString());rn rnrn /// rn /// 执行OleDb语句rn /// rn ///OleDb语句rn /// 返回值为int型：成功返1，失败返回0rn public int OleDbEx(string cmdstr)rn rn OleDbConnection con = GetCon();//连接数据库rn con.Open();//打开连接rn OleDbCommand cmd = new OleDbCommand(cmdstr, con);rn tryrn rn cmd.ExecuteNonQuery();//执行OleDb 语句并返回受影响的行数rn return 1;//成功返回１rn rn catch (Exception e)rn rn return 0;//失败返回０rn rn finallyrn rn con.Dispose();//释放连接对象资源rn rn rnrn /// rn /// 执行OleDb查询语句rn /// rn /// 查询语句rn /// 返回DataTable数据表rn public DataTable reDt(string cmdstr)rn rn OleDbConnection con = GetCon();rn OleDbDataAdapter da = new OleDbDataAdapter(cmdstr, con);rn DataSet ds = new DataSet();rn da.Fill(ds);rn return (ds.Tables[0]);rn rn /// rn /// 执行OleDb查询语句rn /// rn /// 查询语句rn /// 返回OleDbDataReader对象drrn public OleDbDataReader reDr(string str)rn rn OleDbConnection conn = GetCon();//连接数据库rn conn.Open();//并打开了连接rn OleDbCommand com = new OleDbCommand(str, conn);rn OleDbDataReader dr = com.ExecuteReader(CommandBehavior.CloseConnection);rn return dr;//返回OleDbDataReader对象drrn rnrn public string MD5(string strPwd)rn rn MD5 md5 = new MD5CryptoServiceProvider();rn byte[] data = System.Text.Encoding.Default.GetBytes(strPwd);//将字符编码为一个字节序列rn byte[] md5data = md5.ComputeHash(data);//计算data字节数组的哈希值rn md5.Clear();rn string str = "";rn for (int i = 0; i < md5data.Length - 1; i++)rn rn str += md5data[i].ToString("x").PadLeft(2, '0');rn rn return str;rn rnrn

Inet1提示实时错误424找不到对象: 1，先添加部件：ineternet transer control引用rn函数如下rn Public Sub DownLoadFile(SourceFile As String, DestFile As String)rn rn Inet1.Protocol = icFTP ‘第一个执行到Inet1时就出现错误了，是Inet1没对象吧？ rn Inet1.RemoteHost = "192.168.0.57"rn Inet1.RemotePort = 21 'FTP端口rn Inet1.Username = "admin"rn Inet1.PassWord = "admin"rn End Sub

提示无对象错误急死我了！: rnrnrnrnrnrn rn Insert title herern rnrnrnrn rnrn rn rnrnrnrn rn移动栏rnrn rn rnrn rn rn rn rn rn rn 公司名称rn 联系人姓名rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rnrnrnrnrn提示行29列4 缺少对象的错误！

Gridview 分页提示网页错误缺少对象: 小弟,做了一个网页,用了母版页,在ContenPlaceHolder中加入了一个用户自定义控件,是一个分页的gridView,别的都没有问题rn就是在分页的时候,点击第二页就显示网页错误,说是缺少对象,查看半天找不出原因,怀疑是Js互相冲突了,不知道各位有什么好的解决办法,或者给点建议,为盼!

奇怪！为什么总是提示未定义对象错误？？: #include "3.h"rnenum BooleanFalse,True;rnclass Caculatorrnrnprivate:rn Stack S; //头文件3.h中定义了Stack的栈类模板，此处生成一个S对象rn void Enter(int num);rn Boolean GetTowOperands(int& opnd1,int& opnd2);rn void Compute(char op);rnpublic:rn Caculator(void);rn void Run(void);rn void Clear(void);rn rn;rnBoolean GetTowOperands(int& opnd1,int& opnd2)rnrn if(S.StackEmpty()) //编译器提示说此处的S没有定义出错（undeclared identifier）rn rn cerr<<

IE左下角提示错误--缺少对象: 在IE浏览器中运行程序时，左下角有一黄色“感叹号”，点击后显示的是“缺少对象”。而我的程序能正常运行，不受影响，这是怎么回事啊？？？rn行：43rnChar:2rn错误：缺少对象rn代码：0rnURL:Http://localhost:8080/monitornutch/SerchReport?method=denglu&city=jiangsu&username=admin

ie提示“缺少对象”错误，怎么办？？？: rnrn rnrn//提示这行缺少对象？？？rnTO: rnFROM: rnSUBJECT: rnBODY: rnrnrnrn我用html提取xml文件中的内容，可是ie提示“缺少对象”，请各位帮助rn究竟是怎么回事啊？？？？rn

JS中为什么提示错误找不到对象: for (var i=0;i

运行错误！提示文档对象的ASSERT错误: 提示在该出出现错误：rn_AFX_INLINE int CString::Compare(LPCTSTR lpsz) constrn ASSERT(AfxIsValidString(lpsz)); return _tcscmp(m_pchData, lpsz); // MBCS/Unicode aware

INT8_MIN 宏重定义错误: 错误提示：error C4005: 'INT8_MIN' : 宏重定义..........以下错误都类似解决办法：stdafx.h头文件中添加：#define _INTSAFE_H_INCLUDED_#include &lt;stdint.h&gt; 注意事项：注意添加位置...

错误：未找到宏？: 已经定义宏，有参数，同一Excel文件在同事的机器上可以运行，但在我的机器上无法调用宏，错误：未找到宏

word宏错误: 在word内加载了MathType，出现了两种错误：1.word2003，将宏设置为低安全级，出现无法加载项。设置高安全级，出现未定义宏。2.word2010，出现an error occurring starting mathtype.解决办法，与安装过程相异，找到c:\program \office\office11\starup(word2003)c:\program \office\off

C错误检测宏: 学习UNIX编程已经有小几个星期了，从开始的什么都不懂，现在终于有了点感觉。看的是《高级UNIX编程》和《UNIX网络编程》这两本书。其实我最开始是想看《UNIX网络编程》来学习网络编程的，可是看着看着发现没有UNIX系统编程的知识真的不行。还好从学校借来了《高级UNIX编程》这本书，就都穿插着看了看。 UNIX下的系统调用或者C标准函数有很多都会返回错误，所以对错误

怎样解决宏错误: 运行程序时弹出一对话框：rn 对话框标题："Microsoft Visual C++ Debug Libray "rn 对话框内容：rn Debug Assation Failed!rn File: dbcore.cpprn line:4290rn for information on how your program can cause an assertion failure,see the visual c++ documentation on assertsrn (press Retry to debug the application rn 终止（按扭）重试（按扭）忽略（按扭）

紧急求救: 宏错误--正在运行的宏有错误。: 我在EXCEL中用一个宏.它的目的是根据给定的文件名和引用文件名,以及文件夹名,在指定的位置生成文件.rn在别人的电脑上,完全可以运行,但是当把相关的文件完整地移到我的电脑上时,操作出错,错误信息如下:rnrn宏错误rn正在运行的宏有错误。指定的方法不能用于指定的对象，原因可能有以下几种： rn含有数值的参数不合法。通常的原因是试图访问一个不存在的对象，例如，当只有三个打开的工作簿时，使用了 Workbooks(5)。rn方法不能在当前环境中使用。例如，某些 Range 对象方法要求区域中必须含有数据，如果区域中没有数据，则该方法失败。rn发生了外部错误，如读文件或写文件失败。rnrn请高手指点,欢迎大家一起讨论.rn谢谢,分不够的话,可以加.

jquery $提示缺少对象$提示缺少对象: jquery $提示缺少对象 项目中存在不同版本的jquery，有1.4也有1.2，之前运行项目不会报错 " $提示缺少对象 "，但是我的IE9重置之后就报错，从网上找了一大堆，都不行，但是访问测试机的没问题。折腾半天，最后发现必须运行IE9的兼容模式才能正常显示。之前测试机我可能访问的时候采用兼容视图访问，而且浏览器记录了。但是我自己访问没有开兼容视图。转载于:https://www....

调用RecordSet对象的Update方法时提示对象关闭错误: [img=https://img-bbs.csdn.net/upload/201605/17/1463448857_37689.png][/img][img=https://img-bbs.csdn.net/upload/201605/17/1463448863_314224.png][/img]

调用js文件中javascript 提示错误（错误：缺少对象）: js文件中脚本rnfunction checkEmail()rn rn var loginEmail = document.getElementById("loginEmail");rn loginEmail = loginEmail.value.replace(/^\s+|\s+$/g,"");rn var myreg = /^([a-zA-Z0-9]+[_|\_|\.]?)*[a-zA-Z0-9]+@([a-zA-Z0-9]+[_|\_|\.]?)*[a-zA-Z0-9]+\.[a-zA-Z]2,3$/;rn rn if(loginEmail!="")rn rn if(!myreg.test(loginEmail))rn rn document.getElementById("emailTest").style.display = "";rn document.getElementById("emailTest").innerText = "请输入有效的E_mail！";rn document.getElementById("email").focus();rn document.getElementById("email").value = "";rn rn rn rn elsern rn document.getElementById("emailTest").style.display = "";rn document.getElementById("emailTest").innerText = "E_mail不能为空！";rn document.getElementById("email").focus();rn rn rnrn页面rnrn 电子邮件rn rn rn

VB 要求对象: vDoc = WebBrowser1.Document '提示要求对象 Set vDoc = WebBrowser1.Document '正确执行转载于:https://www.cnblogs.com/tengpan-cn/p/4933892.html

条件：要求“对象”: 条件 = "select patiinhosinfo.patiid from patiinhosinfo,patidiaginfo,patientbaseinfo"rn条件 = 条件 & " where patiinhosinfo.patiid=patidiaginfo.patiid"rn条件 = 条件 & " and patiinhosinfo.patiid=patientbaseinfo.patiid"rn条件 = 条件 & " and " & Agestate(patientbaseinfo.birthday, 年龄) & " "rnrn在最后的一行上出现了错误：要求对象。rn请问是什么错误？？？rn我着急这个问题啊，请大家给予帮助。分数马上就送上。rn

错误的提示: 虚拟机错误的提示，帮忙看看

提示的错误: 我在选择模拟器的时候不会出现这样的提示，但是我在选择Windows Mobile 5.0 Pocket PC Dvice R2时候，就会出现提示如下：rn部署和/或注册失败，错误为: 0x8973190e。写入文件“%csidl_program_files%\smartmobileplam\pcount_frame.dll”时出错。错误 0x80070020: 另一个程序正在使用此文件，进程无法访问。rnrn 还有，我如果选择的平台是AnyCpu的时候，会报这样的错误，但是我选择的平台是Windows Mobile 5.0 Pocket PC SDK(ARMV4I)的时候是可以运行的，但是运行貌似不经过我程序中的断点，而是直接用机器上的版本运行。rnrn请大家帮忙想一下是什么原因，谢谢

提示错误: 有多个临时表，如何在@i=0否来选不同的表呢rndeclare @b0 table(产品编号 char(13)) rninsert into @b0(产品编号) select 产品编号 from kc where exists(select 产品编号 from cp where kc.产品编号=cp.产品编号 and (最低价-平均进价)/最低价+ @yy) rn提示错误rnrn

错误提示: This application is currently offline. To enable the application, remove the app_offline.htm file from the application root directory. rn 是那里要设置的问题还是？rn 页面显示的时候提示的错误

提示错误？？: 其实是在WINCE下的visual studio中出现的问题。不过我想会MFC的应该都懂。呵呵。rn问题是在一行根本没有“/”的语句中，提示：错 9 error C2059: syntax error : '/' e:\研二\test12history\TEST12\TEST12\ADSAMPLEDlg.cpp 1269。rn下面没有程序了，上面的程序大体看没什么问题啊？？rn请大家帮忙想想为啥呢？？rnrnvoid CADSAMPLEDlg::OnBnClickedHistory()rnrn //TODO: 在此添加控件通知处理程序代码rn CADSCALENDAR *m_pCal= new CADSCALENDAR;//在此句提示的错误，删掉这三句代码，就不报错了~~rn m_pCal->Create(IDD_CALENDAR,this);rn m_pCal->ShowWindow(SW_SHOW);//打开日历rn rn

excel表格的宏编程，提示错误438 在线等: Dim SQLUserName, SQLPassWord, SQLServer, SQLDataBase, MDCLogname, MDCPasswordrn Dim conn, rs, ConnStr, re_sqlrn Dim i, arn Dim TARGET_START(2000), TARGET_STOP(2000), COMPANY_NAME(2000), JOB_NUMBER(2000), JOB_NAME(2000), PART_NUMBER(2000), ACTUAL_QTY(2000), PART_TYPE_NAME(2000)rn Const APPMDC = 1rn Dim xrn rn Private Sub CommandButton1_Click()rn rn SQLUserName = "sa"rn SQLPassWord = "gallop"rn SQLServer = "127.0.0.1"rn SQLDataBase = "MDC"rn MDCLogname = "gallop"rn MDCPassword = "gallop"rn rn i = 2rn x = 0rn rn Dorn rn TARGET_START(x) = ActiveSheet.cell(i, 1) '预计开始时间rn TARGET_STOP(x) = ActiveSheet.cell(i, 2) '预计结束时间rn COMPANY_NAME(x) = ActiveSheet.cell(i, 3) '公司rn JOB_NUMBER(x) = ActiveSheet(i, 4) & ActiveSheet(i, 5) '工单编号rn JOB_NAME(x) = ActiveSheet(i, 6) '工单名rn PART_NUMBER(x) = ActiveSheet(i, 7) '零件号rn ACTUAL_QTY(x) = ActiveSheet(i, 8) '零件完成的实际数量rn PART_TYPE_NAME(x) = ActiveSheet(i, 10) '零件类型rn rn Call FoundJobOpPartrn rn i = i + 1rn x = x + 1rn rn Loop Until ActiveSheet.Cells(i, 1).Text = ""rn rn MsgBox "数据导入成功！"rn rn End Subrn rn Sub FoundJobOpPart()rn Dim JobID, PART_PER_JOB_ID, PART_ID, CUSTOMER_ID, PART_TYPE_IDrn Dim udtError, udtlogon, udtCustomer, udtPartType, udtPart, udtJobrn Dim s_Datern rn rn Set udtError = CreateObject("PSFCAPI.CPErrorObj")rn Set udtlogon = CreateObject("PSFCAPI.CLogonObj")rn Set udtCustomer = CreateObject("PMDCAPI.CCustomerObj")rn Set udtPartType = CreateObject("PMDCAPI.CPartTypeObj")rn Set udtPart = CreateObject("PMDCAPI.CPartObj")rn Set udtJob = CreateObject("PMDCAPI.CJobObj")rn rn If (udtlogon.LogOnSQLServer(SQLUserName, SQLPassWord, SQLServer, SQLDataBase, MDCLogname, MDCPassword, APPMDC, udtError) = False) Thenrnrn MsgBox udtError.ErrorDescriptionrn udtError.ClearErrorrn Exit Subrn Elsern rn If (udtCustomer.GetCustomerIDFromCompanyNameVBS(udtlogon, udtError, COMPANY_NAME(x), lCustomerID) = False) Thenrn Call udtCustomer.NewCustomerVBS(udtlogon, udtError, lCustomerID, COMPANY_NAME(x)) '输入新的客户rn End Ifrn rn If (udtPartType.GetPartTypeIDFromNameVBS(udtlogon, udtError, PART_TYPE_NAME(x), lPartTypeID) = False) Then '输入新的零件类型rn Call udtPartType.NewPartTypeVBS(udtlogon, udtError, lPartTypeID, PART_TYPE_NAME(x))rn End Ifrn rn If (udtPart.GetPartIDFromNumberVBS(udtlogon, udtError, PART_NUMBER(x), lPartID) = False) Then '输入新的零件号rn Call udtPart.NewPartVBS(udtlogon, udtError, lPartID, lPartTypeID, PART_NUMBER(x), "A")rn End Ifrn rn If (udtPart.GetPartIDFromNumberVBS(udtlogon, udtError, JOB_NUMBER(x), lPartID) = False) Then '输入新的工单号rn Call udtPart.NewPartVBS(udtlogon, udtError, lJobID, JOB_NUMBER(x), TARGET_START(x), TARGET_STOP(x), lPartID, JOB_NAME(x))rn End Ifrn rn End Ifrn rn Call udtlogon.LogOff(udtError)rn Set udtError = Nothingrn Set udtlogon = Nothingrn Set udtMDC = Nothingrn Set udtJob = Nothingrn Set udtPart = Nothingrn Set udtOp = Nothingrn rn End Subrnrnrn代码如上

Office 2010 取消弹出宏安全性设置错误的提示的技巧: 重新添加"office 共享功能"中的"visual Basic for Applications"组件

菜鸟问题：老是出现要求int对象的提示。: using System;rnrnnamespace Wrox.ProCSharp.Basicsrnrn class MyFirstCSharpClassrn rn public static int Main()rn rn int d;rn d=5000;rn Console.WriteLine (d);rn return();rn rn rnrnrnrn

excel用vb给单元格赋值提示“要求对象”？: 程序如下，刚学了不久，我想把vb窗体中输入的值用excel报表输出，最后一句老报错：错误“424”，要求对象？？rnPrivate Sub Command1_Click()rnDim xlapp As Excel.ApplicationrnDim xlbook As Excel.WorkbookrnDim xlsheet As Excel.WorksheetrnSet xlapp = CreateObject("Excel.Application")rnSet xlbook = xlapp.Workbooks.addrnxlapp.Visible = TruernWorksheets("Sheet1").ActivaternSet xlsheet = xlbook.Worksheets(1)rnxlsheet1.Range("A3") = 0 ‘这句报错

WIN7远程桌面连接提示：发生身份验证错误，要求的函数不受支持: 最近发现我的WIN7系统连接远程服务器桌面无法连接了，报发生身份验证错误。要求的函数不受支持的错误：解决办法：开始菜单-&gt;运行gpedit.msc ，打开配置项：计算机配置&gt;管理模板&gt;系统&gt;凭据分配&gt;加密Oracle修正选择启用，并选择易受攻击，配置保存后即可解决问题。...

远程桌面连接发生身份验证错误，提示要求的函数不受支持: 平常一直远程桌面进行连接做一些操作。昨天晚上更新系统之后，今天连接不上了，提示出现身份验证错误，要求的函数不受支持。这是由于凭据安全支持提供程序协议 (CredSSP) 是处理加密Oracle修正所导致。解决方法如下： 1. 打开“本地组策略管理器” 按下 windows + R，调出运行窗口，输入 gpedit.msc ，回车即可打开“本地组策略管理器”。 2. 找...

win10远程桌面连接提示身份验证错误，要求的函数不受支持的解决方案: 报错信息：出现问题的原因是微软最近发布的更新补丁，要求服务器端和用户端都更新后才可以连接，最简单粗暴地方式就是卸载自己电脑的更新，而下面的这种方法需要修改注册列表~ 解决方案： 1. WIN+R，然后运行 regedit 命令 2. 找到路径：：HKLM(缩写)\Software\Microsoft\Windows\CurrentVersion\Policies\System ...

windows10安装Oracle提示错误-INS-13001环境不满足最低要求: INS-13001环境不满足最低要求在安装文件的/stage/cvu文件夹下面找到文件 cvu_prereq.xml文件，修改为如下（添加windows 10相关字段，若你的系统为32位只需要添加win10 32的子段即可，若你的系统为64位只需要添加win10 64的子段即可）：................................................

Windows 远程桌面连接提示：出现身份验证错误，要求的函数不受支持。。。: Windows 远程桌面连接提示：出现身份验证错误，要求的函数不受支持。。。解决办法： 1、按Windows键+R，或者在CMD命令窗口，输入“运行”，打开运行窗口， 2、输入regedit，打开注册表编辑器Windows 远程桌面连接提示：出现身份验证错误，要求的函数不受支持。。。找到路径：计算机\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\...

远程桌面提示《发生身份验证错误，要求的函数不受支持》: 解决办法： 1、gpedit.msc，进入《本地组策略编辑器》； 2、进入计算机配置>管理模板>系统>凭据分配>加密Oracle修正，启用并选择易受攻击；参考文档： https://zhidao.baidu.com/question/1516409567764019500.html 转载于:https://www.cnblogs...

Windows远程桌面连接提示：出现身份验证错误，要求的函数不受支持: 错误信息：出现身份验证错误，要求的函数不受支持。。。解决办法： 1、按Windows键+R，或者在CMD命令窗口，输入“运行”，打开运行窗口， 2、输入regedit，打开注册表编辑器，找到路径：计算机\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\System 然后在Sys...

windows远程连接发生身份验证错误，提示要求的函数不受支持: 解决方式：按 windows + R 打开运行窗口，输入gpedit.msc 回车打开本地策略编辑器选择管理模版 -> 系统 -> 凭据分配 -> 加密Oracle修正勾选已启用，保护级别选为：易受攻击问题解决 ...

新建域时提示“administrator账户密码不符合要求”错误解决方法: 在一些GHOST系统上安装域服务出错，系统提示如下图所示：解决方法其实很简单，打开CMD，输入：netuseradministrator/passwordreq:yes再去建域就不会出现这个错误了。转载于:https://blog.51cto.com/de320/947952...

SQL2005安装时提示:性能监视器计数器要求错误: 刚才重新安装sql2005时，出现了“性能监视器计数要求错误”的奇怪问题，安装失败。Google之，效果好。成功解决:)。方法转至如下。原因：出现此类问题一般都是在非法卸载sql2005出现的 错误如下图所示！【解决方法】在 “开始” “运行”中输入 regedit，开启注册表编辑器。找到【HKEY_LOCAL_MACHINE】---【SOFTWARE】--【Mi

mySql数据库备份下载: MYSQL数据库自动备份命令 MYSQL数据库自动备份命令 MYSQL数据库自动备份命令 MYSQL数据库自动备份命令相关下载链接：[url=//download.csdn.net/download/lvcrsn/1971770?utm_source=bbsseo]//download.csdn.net/download/lvcrsn/1971770?utm_source=bbsseo[/url]

EXT2.0中文教程下载: EXT2.0中文教程····························· 相关下载链接：[url=//download.csdn.net/download/KobeLinKai/2441187?utm_source=bbsseo]//download.csdn.net/download/KobeLinKai/2441187?utm_source=bbsseo[/url]

计算机辅助设计高级绘图员技能鉴定试题B下载: 计算机辅助设计高级绘图员技能鉴定试题B 相关下载链接：[url=//download.csdn.net/download/hualiu163/2882161?utm_source=bbsseo]//download.csdn.net/download/hualiu163/2882161?utm_source=bbsseo[/url]

相关热词 c# gdi 占用内存 c#中遍历字典 c#控制台模拟dos c# 斜率最小二乘法 c#进程延迟 c# mysql完整项目 c# grid 总行数 c# web浏览器插件 c# xml 生成xsd c# 操作sql视图

我们是很有底线的