Possible DLL version conflict [ERLEDIGT]

[Manfred]

Moin,

ich habe im Forum herum gesucht aber nichts gefunden.

Wenn die Meldung:

Code: Alles auswählen

 Exception 0xC0000005:Possible DLL version conflict.

beim Programmaufruf erhalte, dann ist das zwar nett, aber wie bekomme ich heraus, welche DLL gemeint ist? Ich suche mir gerade einen Wolf, finde aber nichts.

[brandelh]

Hallo Manfred,

das hatte ich zwar noch nie, ich vermute aber, dass diese Meldung nur von einer Alaska DLL verursacht werden konnte.
Da würde ich zuerst eine Textdatei mit dem Versionstand erzeugen und dann GENAU ansehen

Code: Alles auswählen

xppload version > Version.Txt

Eventuell nutzt du aber auch DLL, die du selbst mit Xbase++ erzeugt hast ?
Dann könnte ich mir vorstellen, dass davon eine mit einer älteren Version compiliert wurde -> alles neu erzeugen ist Pflicht !

[Manfred]

Hi Hubert,

die Meldung erscheint über die VX, wie ich gerade festgestellt habe. Es tauchte mehr oder weniger ganz plötzlich seit heute auf und ich weiß überhaupt nicht woher es kommen könnte. Es ist ein eines meiner Schablonen, die klitzeklein sind. Deshalb verstehe ich das ja nicht. Die DLL die hier drin sind, sind in anderen Programmen auch drin, dort gibt es aber keinen Konflikt.

Na gut, dann muß ich noch ein wenig suchen.

[UliTs]

Da Du nichts anderes geschrieben habe, vermute ich mal, Du benutzt reine xBase?

Ansonsten hilft Dir vielleicht der folgende Code, die benutzten DLL's zu überprüfen:

Code: Alles auswählen

#INCLUDE "Dll.CH"

STATIC PROCEDURE PruefDLLUmgebungBeispiel()
  PruefDLLVersion( "AceServer.dll","3.9","3.09.5"   )
  PruefDLLVersion( "AppClass.dll" ,"3.9","3.09.01"  )
  PruefDLLVersion( "TbxSysUt.dll" ,"2.0","3.9.2.0"  )
  //PruefDLLVersion( "TbxBC.dll","3.9","3.09.5"   )    // Fr Barcodes (DLL gibt zur Zeit keine Versions-Nummern zurck)
  PruefDLLVersion( "ACE32.DLL"    ,"8.10.0.18","8.10.0.18" )  //(low level database function library for ADS  -  Extended Systens (licensefree))                 º
  PruefDLLVersion( "AXCWS32.DLL"  ,"8.10.0.15","8.10.0.15" )  //(Communication library for Severtype ADS_REMOTE_SERVER -  Extended Systens (licensefree))        º
RETURN

STATIC PROCEDURE PruefDLLVersion( cDllDateiname,cProductVersionErwartet,cFileVersionErwartet )
LOCAL hDLL:=0,aVersion,n,cProductVersion,cFileVersion,lOk
  aVersion := LoadResource(1,cDllDateiname,RES_VERSION)
  IF aVersion==NIL
    hDLL := DLLLoad( cDllDateiname )
    IF hDLL > 0
      aVersion := LoadResource(1,hDll,RES_VERSION)
    ENDIF
  ENDIF
  IF aVersion==NIL
    MsgBox( cDllDateiname+" nicht gefunden!" )
  ELSE
    n := AScan(aVersion, {|e| e[RES_VERSION_KEY] == "ProductVersion"  })
    cProductVersion := IIF( n>0,aVersion[n,RES_VERSION_VALUE],"" )
    n := AScan(aVersion, {|e| e[RES_VERSION_KEY] == "FileVersion"  })
    cFileVersion    := IIF( n>0,aVersion[n,RES_VERSION_VALUE],"" )
    lOk := .NOT.( empty(cProductVersion).OR.empty(cFileVersion) ) .AND.;
           VersionOk( cProductVersion,cProductVersionErwartet )  .AND.;
           VersionOk( cFileVersion   ,cFileVersionErwartet    )
    IF .NOT. lOk
      MsgBox( cDllDateiname+" hat falsche Version:"+chr(13)+chr(10)+;
                 "ProductVersion "+cProductVersion+" (erwartet "+cProductVersionErwartet+")"+chr(13)+chr(10)+;
                 "FileVersion "   +cFileVersion   +" (erwartet "+cFileVersionErwartet   +")"+chr(13)+chr(10)+;
                 "Bitte die Entwickler benachrichtigen!" )
    ENDIF
  ENDIF
  IF hDLL > 0
    DLLUnload(hDLL)
  ENDIF
RETURN

STATIC FUNCTION VersionOk( cVersion1,cVersion2 )
LOCAL lOk,n1,n2,n3,n4,n5,m1,m2,m3,m4,m5
  FormatiereVersion( cVersion1,@n1,@n2,@n3,@n4,@n5 )
  FormatiereVersion( cVersion2,@m1,@m2,@m3,@m4,@m5 )
  lOk := (n1>=m1)
  IF n1=m1
    lOk := (n2>=m2)
    IF n2=m2
      lOk := (n3>=m3)
      IF n3=m3
        lOk := (n4>=m4)
        IF n4=m4
          lOk := (n5>=m5)
        ENDIF
      ENDIF
    ENDIF
  ENDIF
RETURN( lOk )

STATIC FUNCTION FormatiereVersion( cVersion,n1,n2,n3,n4,n5 )
LOCAL I
  STORE 0 TO n1,n2,n3,n4,n5
  cVersion := StrTran( cVersion,".","," )
  cVersion := StrTran( cVersion," ","" )
  n1 := val( cVersion )
  I := at( ",",cVersion )
  IF I>0
    cVersion := SubStr( cVersion,I+1 )
    n2 := val( cVersion )
    I := at( ",",cVersion )
    IF I>0
      cVersion := SubStr( cVersion,I+1 )
      n3 := val( cVersion )
      I := at( ",",cVersion )
      IF I>0
        cVersion := SubStr( cVersion,I+1 )
        n4 := val( cVersion )
        I := at( ",",cVersion )
        IF I>0
          cVersion := SubStr( cVersion,I+1 )
          n5 := val( cVersion )
        ENDIF
      ENDIF
    ENDIF
  ENDIF
RETURN( cVersion )

[Manfred]

Hi,

ich benutze in dem Falle express++. Aber wie schon oben erwähnt, mit anderen Programmen klappt es.

[UliTs]

Dann hilft Dir ja vielleicht der Code. Ich hatte mal ein ähnliches Problem. In der Entwicklungsumgebung lief das Programm, in einem anderen Verzeichnis aber nicht!
Mit dem Code habe ich rausgefunden, dass dabei verschiedene DLL's geladen wurden (ich hatte unbeabsichtigt verschiedene Versionen auf dem Rechner).

Uli

[Manfred]

Hm,

den Verursacher habe ich gefunden, aber noch nicht was er genau macht.

[Koverhage]

Hm,

wer ist der Verursacher, vielleicht können wir dir helfen ?

[Manfred]

Mein Notebook mit Win7 drauf. Sobald ich das PRG damit kompiliere, gibt es die Probleme. Der Source liegt aber komplett im Netz auf einem Fileserver und Notebook und WS greifen auf die selben Quellen zu. (denke ich jetzt mal, woanders gibt es nämlich nichts) Was da jetzt genau abgeht, weiß ich auch nicht. Muß ich mal in aller Ruhe nachsehen. Ich meine das hätte bis vor kurzem noch geklappt. Aber ganz sicher, ob ich jemals unter Win7 schon mal probiert hatte oder noch unter XP bin ich mir jetzt auch nicht.

[hschmidt]

Hallo Manfred,

ich bin mir nicht ganz sicher, aber ich meine, diese Meldung auch schon mal gehabt zu haben.
Und zwar bei dem Versuch mit VX ein Programm zu debuggen, das ohne Debugging-Informationen compiliert wurde.

Hans

[Manfred]

Hallo Manfred,

ich bin mir nicht ganz sicher, aber ich meine, diese Meldung auch schon mal gehabt zu haben.
Und zwar bei dem Versuch mit VX ein Programm zu debuggen, das ohne Debugging-Informationen compiliert wurde.

Hans

Hi Hans,

ich komme erst am WE dazu die Sache genauer zu untersuchen. Bisher habe ich nur festgestellt, dass es lokal keine Probleme gibt. Erst wenn ich das Projekt im Netzwerk (linux/samba) kompiliere. Wenn ich es auf der andere XP Maschine kompiliere, dann gibt es keine Probleme. Ich weiß somit nicht genau, ob es irgendwelche WIN7 Dinge sind. Ich vermute aber einmal, dass ich irgendwo eine DLL nicht richtig liegen habe. Aber wie gesagt, nach dem WE weiß ich mehr. Ich muß auch eh das Notebook neu installieren und dann sehe ich weiter.

[AUGE_OHR]

Erst wenn ich das Projekt im Netzwerk (linux/samba) kompiliere. Wenn ich es auf der andere XP Maschine kompiliere, dann gibt es keine Probleme. Ich weiß somit nicht genau, ob es irgendwelche WIN7 Dinge sind.

siehe dir mal PDR
http://www.alaska-software.com/scripts/ ... PDRID=6244 an

[Manfred]

Vielen Dank Jimmy,

da hätte ich überhaupt nicht nachgesehen.

[Manfred]

Das war es. Jetzt klappt es wieder.

Danke.