OLEObject PBObject
Long ll_status

PBObject=CREATE OLEObject
Ll_status=PBObject. ConnectToNewObject (" JRO. JetEngine ")
IF ll_status & lt;> 0 THEN
Messagebox (" system Error ", "Connect to JRO. JetEngine Error!" )
The ELSE
String sProvider="Provider=Microsoft. Jet. The OLEDB. 4.0;"
String sOldMDB, sNewMDB
SOldMDB=sProvider + "Data Source=" + "E: \ aiawenjian \ aia MDB"
SNewMDB=sProvider + "Data Source=" + "E: \ aiawenjian \ temp MDB"
PBObject.Com pactDatabase (sOldMDB sNewMDB)
PBObject. DisconnectObject ()
END the IF

DESTROY PBObject

Version pb9, how this code always perform error, compression is always failure, ace to help have a look, thanks

CodePudding user response:

No one knows to this problem?

CodePudding user response:

To tell you on Monday

CodePudding user response:

SOldMDB=sProvider + "Data Source=~" "+" E: \ aiawenjian \ aia MDB ~ ""
SNewMDB=sProvider + "Data Source=~" "+" E: \ aiawenjian \ temp MDB ~ ""

CodePudding user response:

The

reference 3 floor response:

sOldMDB=sProvider + "Data Source=~" "+" E: \ aiawenjian \ aia MDB ~ ""
SNewMDB=sProvider + "Data Source=~" "+" E: \ aiawenjian \ temp MDB ~ ""

This I can't, the same mistake