padavan无线中继:Microsoft JET Database Engine (0x80040E10)
来源:百度文库 编辑:高考问答 时间:2024/04/29 12:15:21
错误类型:
Microsoft JET Database Engine (0x80040E10)
至少一个参数没有被指定值。
/bbs/Announce/Announce.asp, 第 849 行
Dim FirstID_2,LastID_2
Dim GetData_2
SQL = "Select top " & SQL & " T1.ID,T1.ParentID,T1.TopicSortID,T1.BoardID,T1.RootID,T1.ChildNum,T1.Layer,T1.Title,T1.PrintContent,T1.FaceIcon,T1.ndatetime,T1.LastTime,T1.Hits,T1.Length,T1.UserName,T1.UserID,T1.HTMLFlag,T1.UnderWriteFlag,T1.NotReplay,T1.IPAddress,T2.Mail,T2.OICQ,T2.Userphoto,T2.UserLevel,T2.Homepage,T2.PrintUnderwrite,T2.Points,T2.Officer,T2.OnlineTime,T2.Birthday,T2.ApplyTime,T2.Sex,T2.LastDoingTime,T2.AnnounceNum2,T2.FaceUrl,T2.FaceWidth,T2.FaceHeight,T2.UserLimit,T1.TopicType,T1.NeedValue,T1.OtherInfo,T2.NongLiBirth,T2.ShowFlag,T2.NotSecret,T2.UserTitle,T1.TitleStyle,T1.PollNum,T2.CachetValue,T2.CharmPoint,T2.UserGroup,T2.CharmPoint as mypet from LeadBBS_Announce as T1 left join LeadBBS_User as T2 on T2.Id=T1.Userid " & SQLEndString
Set Rs = Con.ExeCute(SQL)(就这行有问题,郁闷)
GBL_DBNum = GBL_DBNum + 1
If (LMT_First = 0 and LastNum = 0 and Page >= 1 and NoPage = 0) or JMPage > 0 Then
If Not Rs.Eof Then
If JMPage > 0 Then
If Upflag="0" Then
Rs.Move (JMPage-1)* DEF_TopicContentMaxListNum
Else
If Page < MaxPage Then
Rs.Move (JMPage-2) * DEF_TopicContentMaxListNum + DEF_TopicContentMaxListNum
End If
End If
Microsoft JET Database Engine (0x80040E10)
至少一个参数没有被指定值。
/bbs/Announce/Announce.asp, 第 849 行
Dim FirstID_2,LastID_2
Dim GetData_2
SQL = "Select top " & SQL & " T1.ID,T1.ParentID,T1.TopicSortID,T1.BoardID,T1.RootID,T1.ChildNum,T1.Layer,T1.Title,T1.PrintContent,T1.FaceIcon,T1.ndatetime,T1.LastTime,T1.Hits,T1.Length,T1.UserName,T1.UserID,T1.HTMLFlag,T1.UnderWriteFlag,T1.NotReplay,T1.IPAddress,T2.Mail,T2.OICQ,T2.Userphoto,T2.UserLevel,T2.Homepage,T2.PrintUnderwrite,T2.Points,T2.Officer,T2.OnlineTime,T2.Birthday,T2.ApplyTime,T2.Sex,T2.LastDoingTime,T2.AnnounceNum2,T2.FaceUrl,T2.FaceWidth,T2.FaceHeight,T2.UserLimit,T1.TopicType,T1.NeedValue,T1.OtherInfo,T2.NongLiBirth,T2.ShowFlag,T2.NotSecret,T2.UserTitle,T1.TitleStyle,T1.PollNum,T2.CachetValue,T2.CharmPoint,T2.UserGroup,T2.CharmPoint as mypet from LeadBBS_Announce as T1 left join LeadBBS_User as T2 on T2.Id=T1.Userid " & SQLEndString
Set Rs = Con.ExeCute(SQL)(就这行有问题,郁闷)
GBL_DBNum = GBL_DBNum + 1
If (LMT_First = 0 and LastNum = 0 and Page >= 1 and NoPage = 0) or JMPage > 0 Then
If Not Rs.Eof Then
If JMPage > 0 Then
If Upflag="0" Then
Rs.Move (JMPage-1)* DEF_TopicContentMaxListNum
Else
If Page < MaxPage Then
Rs.Move (JMPage-2) * DEF_TopicContentMaxListNum + DEF_TopicContentMaxListNum
End If
End If
出错提示:
操作必须使用一个可更新的查询。
win2k win2003 系统
问题应该是服务器数据库目录的写入权限没有设置好。
数据库目录 属性 安全 EVERYONE ……给他写入权限就OK了。
winXP系统
XP操作系统安装好,文件夹选项里面默认使用简单共享(推荐),把这个选项去掉,
再在文件夹上右键点击,就会出现安全这个选项卡,
原来默认的没有,然后在安全选项卡里面可以设置用户的写入权限了
右击数据库>安全>everyone>将需要的勾上
Microsoft JET Database Engine是什么?
Microsoft JET Database Engine是什么?
microsoft jet 4.0 service pack 8是什么?
Microsoft .Jet.OLEDB.4.0怎么下载安装?
Microsoft JET Database Engine (0x80004005)
Microsoft Jet 数据库引擎打不开文件 怎么办?
Microsoft JET Database Engine (0x80004005)
Microsoft JET Database Engine (0x80040E10)
Microsoft JET Database Engine (0x80040E14)
Microsoft JET Database Engine (0x80040E4D)