婷婷综合国产,91蜜桃婷婷狠狠久久综合9色 ,九九九九九精品,国产综合av

主頁(yè) > 知識(shí)庫(kù) > access中鏈接表的問題

access中鏈接表的問題

熱門標(biāo)簽:萊西電子地圖標(biāo)注 鳳臺(tái)百度地圖標(biāo)注店 金昌電話機(jī)器人價(jià)格 武夷山旅游地圖標(biāo)注 縣域地圖標(biāo)注打印店 外呼系統(tǒng)API接口 怎么在地圖標(biāo)注自己 個(gè)人可以辦理400電話么 修改地圖標(biāo)注
一個(gè)使用asp和mdb的站點(diǎn),某個(gè)mdb中使用了鏈接表,鏈接到當(dāng)前目錄的另一個(gè)mdb中的表,這樣可以達(dá)到數(shù)據(jù)共享。  
faq-it.org/delphi_win_sdk/問題來了,當(dāng)將網(wǎng)站發(fā)布到網(wǎng)站的時(shí)候,因?yàn)榫W(wǎng)上空間路徑和我本機(jī)不同,所以鏈接表失敗,網(wǎng)頁(yè)當(dāng)然也不能打開。  
我覺得解決辦法有:  
一種,在本機(jī)上創(chuàng)建與網(wǎng)上空間完全相同的目錄結(jié)構(gòu)。但這很麻煩,特別是經(jīng)常要換網(wǎng)站的話。  
一種,如何讓鏈接表使用相對(duì)路徑,就是鏈接到當(dāng)前目錄下的那個(gè)mdb文件?(對(duì)了,access很弱智,鏈接表記錄的是絕對(duì)路徑)。  
還一種,如何通過編程(asp  或者本地vba)來實(shí)現(xiàn)對(duì)鏈接表的鏈接的修改?(又對(duì)了,access還是弱智,更新鏈接表我只能使用手工更新,一定要找到那個(gè)路徑下的mdb才行!可本地路徑和網(wǎng)上不一樣呀)  

誰(shuí)能告訴我如何實(shí)現(xiàn)上面的后兩種方法?  

---------------------------------------------------------------  

以下是我自己在用的adox代碼,只為了證明我說的access有此功能(說句不好聽的:這關(guān)access  p事啊?這是ado模型該解決的問題。而且你也提錯(cuò)地方了,提到asp那一塊更合適),做access編程的都應(yīng)該看得懂,如果你看不懂我也只能說遺憾了。  

Public  Function  NewLinkedExternalTableMdb()  
       Dim  strTargetDB()  As  String  
       Dim  strProviderString()  As  String  
       Dim  strSourceTbl()  As  String  
       Dim  strLinkTblName()  As  String  
       Dim  catDB  As  ADOX.Catalog  
       Dim  tblLink  As  ADOX.Table  
       Dim  tmpLink  As  ADOX.Table  
       Dim  i  As  Integer  
       Dim  j  As  Integer  
       Set  catDB  =  New  ADOX.Catalog  
       catDB.ActiveConnection  =  CurrentProject.Connection  
       i  =  catDB.Tables.Count  
       ReDim  strTargetDB(i)  
       ReDim  strProviderString(i)  
       ReDim  strSourceTbl(i)  
       ReDim  strLinkTblName(i)  
       i  =  1  
       For  Each  tmpLink  In  catDB.Tables  
               If  tmpLink.Properties("Jet  OLEDB:Create  Link")  Then  
                       If  Trim(tmpLink.Properties("Jet  OLEDB:Remote  Table  Name"))  >  ""  Then  
                               strLinkTblName(i)  =  tmpLink.Name  
                               strTargetDB(i)  =  tmpLink.Properties("Jet  OLEDB:Link  Datasource")  
                               strProviderString(i)  =  tmpLink.Properties("Jet  OLEDB:Link  Provider  String")  
                               strSourceTbl(i)  =  tmpLink.Properties("Jet  OLEDB:Remote  Table  Name")  
                               Do  While  InStr(1,  strTargetDB(i),  "/")  >  0  
                                       strTargetDB(i)  =  Mid(strTargetDB(i),  InStr(1,  strTargetDB(i),  "/")  +  1,  Len(strTargetDB(i)))  
                               Loop  
                               strTargetDB(i)  =  CurrentProject.Path    "/"    strTargetDB(i)  
                               i  =  i  +  1  
                       End  If  
               End  If  

       Next  
       j  =  i  -  1  
       For  i  =  1  To  j  
               catDB.Tables.Delete  strLinkTblName(i)  
               Set  tblLink  =  New  ADOX.Table  
               With  tblLink  
                       .Name  =  strLinkTblName(i)  
                       Set  .ParentCatalog  =  catDB  
                       .Properties("Jet  OLEDB:Create  Link")  =  True  
                       .Properties("Jet  OLEDB:Link  Datasource")  =  strTargetDB(i)  
                       .Properties("Jet  OLEDB:Link  Provider  String")  =  strProviderString(i)  
                       .Properties("Jet  OLEDB:Remote  Table  Name")  =  strSourceTbl(i)  
               End  With  
               catDB.Tables.Append  tblLink  
               Set  tblLink  =  Nothing  
       Next  
       Set  catDB  =  Nothing  
End  Function   
 

標(biāo)簽:楚雄 涼山 清遠(yuǎn) 上海 南京 通遼 邢臺(tái) 赤峰

巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《access中鏈接表的問題》,本文關(guān)鍵詞  access,中,鏈接,表,的,問題,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題,煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們,我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《access中鏈接表的問題》相關(guān)的同類信息!
  • 本頁(yè)收集關(guān)于access中鏈接表的問題的相關(guān)信息資訊供網(wǎng)民參考!
  • 推薦文章
    主站蜘蛛池模板: 聂荣县| 永定县| 通州区| 屏山县| 林口县| 离岛区| 桐庐县| 桐城市| 五华县| 闽清县| 大关县| 偃师市| 鹰潭市| 旅游| 桐乡市| 甘德县| 松溪县| 墨玉县| 普陀区| 新乡县| 湛江市| 罗江县| 德钦县| 安塞县| 永兴县| 陆川县| 乌兰浩特市| 大理市| 漳浦县| 皮山县| 资中县| 大田县| 丹江口市| 灌南县| 永川市| 安顺市| 石狮市| 长海县| 神池县| 兰州市| 盐山县|