Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de
  AutoCAD VBA
  AxDbDocument, Xref manipulieren - pfad problem

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte
  
PNY wird von NVIDIA zum Händler des Jahres gewählt - zum dritten Mal in Folge, eine Pressemitteilung
Autor Thema:  AxDbDocument, Xref manipulieren - pfad problem (705 mal gelesen)
tappenbeck
Mitglied
Vermessungsingenieur


Sehen Sie sich das Profil von tappenbeck an!   Senden Sie eine Private Message an tappenbeck  Schreiben Sie einen Gästebucheintrag für tappenbeck

Beiträge: 1218
Registriert: 30.05.2002

AutoCAD (Map)2024, Topobase, MapEdit, Lisp, .vb.net

erstellt am: 19. Jul. 2006 11:47    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

moin !

hat schon mal einer von euch xref-pfade bei geschlossenen zeichnungen editiert ? und hat das mit dem zuweisen des neuen pfades geklappt ?

bei nachfolgendem code bekomme ich in der gekennzeichneten zeile eine fehlermeldung, dass hier eine ungültige prozedure aufgerufen wurde.

gruß Jan :-)

hier mein code:

Code:
Public Sub ChangeXrefpath(sFilename As String)
    Dim sOld_xrefpath As String
    Dim sRelPath As String
    Dim sNewAbsolute_XrefPath As String
    Dim sNewRelative_XrefPath As String
    Dim sFileByFindfile As String
    Dim sErrMessage As String

    Dim blkname As AcadBlock
    Dim oAxDbDoc As New AxDbDocument


    'connect to DWG
    oAxDbDoc.Open sFilename

    Dim tempCounter As Integer
    tempCounter = 0

    For Each blkname In oAxDbDoc.Blocks
   

        If blkname.IsXRef Then

            'reading old path
            sOld_xrefpath = blkname.Path

           
            '************** here the mistake *******************
            oAxDbDoc.Blocks(blkname).Path="the new filepath"

            oAxDbDoc.Blocks(blkname).Reload

        End If    '------ blkname.IsXRef
    Next blkname


Exit_ChangeXrefpath:

    On Error GoTo 0
    Exit Sub

Err_ChangeXrefpath:

    Call "there is a mistake"

    GoTo Exit_ChangeXrefpath

End Sub


------------------
jan :-)

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Carsten1210
Mitglied
staatl. geprüfter Holztechniker


Sehen Sie sich das Profil von Carsten1210 an!   Senden Sie eine Private Message an Carsten1210  Schreiben Sie einen Gästebucheintrag für Carsten1210

Beiträge: 1360
Registriert: 24.07.2002

erstellt am: 19. Jul. 2006 12:10    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für tappenbeck 10 Unities + Antwort hilfreich

Hallo Jan,

Ich denke, das du ein Xref erst lösen und dann neu einbinden (Stichwort detach und attach). Sonst kannst du den Pfad nicht ändern.

Gruß, Carsten

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

tappenbeck
Mitglied
Vermessungsingenieur


Sehen Sie sich das Profil von tappenbeck an!   Senden Sie eine Private Message an tappenbeck  Schreiben Sie einen Gästebucheintrag für tappenbeck

Beiträge: 1218
Registriert: 30.05.2002

AutoCAD (Map)2024, Topobase, MapEdit, Lisp, .vb.net

erstellt am: 19. Jul. 2006 14:57    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

hallo carsten,

ein gedanke, über den ich einmal nachdenken muss !

vorerst vielen dank.

gruß jan :-)

------------------
jan :-)

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

tappenbeck
Mitglied
Vermessungsingenieur


Sehen Sie sich das Profil von tappenbeck an!   Senden Sie eine Private Message an tappenbeck  Schreiben Sie einen Gästebucheintrag für tappenbeck

Beiträge: 1218
Registriert: 30.05.2002

erstellt am: 21. Jul. 2006 15:51    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

moin !

hier ein beitrag in dem ich ein beispiel bekomme habe das bei mir funktioniert:

http://discussion.autodesk.com/thread.jspa?threadID=485757

gruß jan :-)

------------------
jan :-)

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Carsten1210
Mitglied
staatl. geprüfter Holztechniker


Sehen Sie sich das Profil von Carsten1210 an!   Senden Sie eine Private Message an Carsten1210  Schreiben Sie einen Gästebucheintrag für Carsten1210

Beiträge: 1360
Registriert: 24.07.2002

AutoCAD ACA 2024
Solidworks 2022 Sp5
Enterprise PDM 2022 Sp5
Pascam Woodworks
Visual Studio 2017 Pro
Windows 10 64Bit
Dell Precision 3660
Intel Core i9-12900K
32 GB Arbeitsspeicher
2x Dell U2415

erstellt am: 21. Jul. 2006 17:07    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für tappenbeck 10 Unities + Antwort hilfreich

Hallo Jan,

du hast wohl ein kleines Problem mit dem setzen der Links in den Beiträgen. Hier der Link funktioniert nun. 

Gruß, Cartsten

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2025 CAD.de | Impressum | Datenschutz