lyw505
卧底
卧底
  • 注册日期2004-12-04
  • 发帖数205
  • QQ52498211
  • 铜币3枚
  • 威望0点
  • 贡献值0点
  • 银元0个
  • GIS帝国居民
阅读:2446回复:5

The application is not licensed to perform this operation

楼主#
更多 发布于:2007-09-27 13:50
如题目,我用AE 开发读取SDE-ORACLE9I数据库中的数据,将数据的属性表读取出来,并放在数组中,修改数组中的值后,将数据重新写回数据库中的数据属性表中,但是在保存到属性表中时出现如题目的提示,说我没有LICENSE,但是我的AE是有LICENSE的,并且有数据库读写的许可,不知道什么原因,请高手指导!
喜欢0 评分0
Y.W.Lau qq:52498211 email:jxgis@126.com msn:lyw505@hotmail.com popo:jxgisrd@163.com
追风浪子
路人甲
路人甲
  • 注册日期2004-06-08
  • 发帖数166
  • QQ
  • 铜币782枚
  • 威望0点
  • 贡献值0点
  • 银元0个
1楼#
发布于:2007-09-27 15:59
有一点不明白,你是直接从oracle中读取图层的属性数据?如果是这样,肯定不可以.如果不是的话,建议你先在arcmap中修改一下,如果还没权限,那就说明你的访问权限不够,如果可以,那就说明程序里面编辑出了问题.
举报 回复(0) 喜欢(0)     评分
lyw505
卧底
卧底
  • 注册日期2004-12-04
  • 发帖数205
  • QQ52498211
  • 铜币3枚
  • 威望0点
  • 贡献值0点
  • 银元0个
  • GIS帝国居民
2楼#
发布于:2007-09-27 21:25
<P>对 啊,这位高手,我是直接从ORACLE中直接读取属性数据,这样不能直接修改属性表吗?要怎样处理才行呢?多谢!!!</P>
Y.W.Lau qq:52498211 email:jxgis@126.com msn:lyw505@hotmail.com popo:jxgisrd@163.com
举报 回复(0) 喜欢(0)     评分
追风浪子
路人甲
路人甲
  • 注册日期2004-06-08
  • 发帖数166
  • QQ
  • 铜币782枚
  • 威望0点
  • 贡献值0点
  • 银元0个
3楼#
发布于:2007-09-28 10:59
<P>  </P>
<P>  Dim pFName As IName<BR>  Dim pInputName As IName<BR>  <BR>  Set pFName = pFeatclsNm<BR>  Set pInputName = pInputFCName<BR>  <BR>  Dim pFeatcls As IFeatureClass<BR>  Dim pInputFCls As IFeatureClass<BR>  Set pFeatcls = pFName.Open<BR>  Set pInputFCls = pInputName.Open<BR> <BR>  ' get the workspace and start editing<BR>  Dim pDataset As IDataset<BR>  Set pDataset = pFeatcls<BR>  <BR>  Dim pWorkspace As IWorkspace<BR>  Set pWorkspace = pDataset.Workspace<BR>  <BR>  Dim pWorkspaceEdit As IWorkspaceEdit<BR>  Set pWorkspaceEdit = pWorkspace<BR>  <BR>  pWorkspaceEdit.StartEditing True<BR>  pWorkspaceEdit.StartEditOperation<BR>       <BR>  ' open a cursor on the input feature class with the given query filter<BR>  Dim pFeatCursor As IFeatureCursor<BR>  Set pFeatCursor = pInputFCls.Search(pQFilt, False)<BR>  <BR>  ' loop through the input features in the cursor, and insert<BR>  ' them into the destination feature class. This is slow since we must use<BR>  ' IFeature::Store to mimic an edit session.<BR>  Dim pFeat As IFeature<BR>  Dim pRow As IRow<BR>  Dim pFlds As IFields<BR>  Dim lSFld As Long<BR>  Dim i As Long<BR>  <BR>  Set pRow = pFeatCursor.NextFeature<BR>  Do Until pRow Is Nothing<BR>    Set pFeat = pFeatcls.CreateFeature<BR>    Set pFlds = pFeat.Fields<BR>    For i = 0 To pFlds.FieldCount - 1<BR>        lSFld = pRow.Fields.FindField(pFlds.Field(i).Name)<BR>        pFeat.Value(i) = pRow.Value(lSFld)<BR>    Next i<BR>    pFeat.Store<BR>    ' get next row<BR>    Set pRow = pFeatCursor.NextFeature<BR>  Loop<BR>  <BR>  pWorkspaceEdit.StopEditOperation<BR>  pWorkspaceEdit.StopEditing True<BR></P>
举报 回复(0) 喜欢(0)     评分
lyw505
卧底
卧底
  • 注册日期2004-12-04
  • 发帖数205
  • QQ52498211
  • 铜币3枚
  • 威望0点
  • 贡献值0点
  • 银元0个
  • GIS帝国居民
4楼#
发布于:2007-09-28 19:15
<img src="images/post/smile/dvbbs/em01.gif" /><img src="images/post/smile/dvbbs/em02.gif" />多谢了!<img src="images/post/smile/dvbbs/em05.gif" /><img src="images/post/smile/dvbbs/em06.gif" />
Y.W.Lau qq:52498211 email:jxgis@126.com msn:lyw505@hotmail.com popo:jxgisrd@163.com
举报 回复(0) 喜欢(0)     评分
whmwxhanshan123
路人甲
路人甲
  • 注册日期2006-06-17
  • 发帖数3108
  • QQ
  • 铜币6445枚
  • 威望0点
  • 贡献值0点
  • 银元0个
5楼#
发布于:2007-09-28 22:54
这么多讲究
举报 回复(0) 喜欢(0)     评分
游客

返回顶部