< p > O p t i o n   E x p l i c i t 
 
 < / p > 
 < p > ' M u s t   h a v e   r e f e r e n c e   t o   M i c r o s o f t   J e t   A n d   R e p l i c a t i o n   O b j e c t s   x . x   L i b r a r y   
 < / p > 
 < p > P u b l i c   S u b   C o m p a c t D B ( D B N a m e   A s   S t r i n g ) 
 
 D i m   j r   A s   j r o . J e t E n g i n e 
 D i m   s t r O l d   A s   S t r i n g ,   s t r N e w   A s   S t r i n g 
 D i m   x   A s   I n t e g e r 
 
 S e t   j r   =   N e w   j r o . J e t E n g i n e 
 
 s t r O l d   =   D B N a m e 
 x   =   I n S t r R e v ( s t r O l d ,   & q u o t ; \ & q u o t ; ) 
 s t r N e w   =   L e f t ( s t r O l d ,   x ) 
 s t r N e w   =   s t r N e w   & a m p ;   & q u o t ; c h n g M e . m d b & q u o t ; 
 
 ' U s e   E n g i n e   T y p e   =   4   f o r   A c c e s s   9 7 ,   E n g i n e   T y p e   =   5   f o r   A c c e s s   2 0 0 0 
 j r . C o m p a c t D a t a b a s e   & q u o t ; P r o v i d e r = M i c r o s o f t . J e t . O L E D B . 4 . 0 ; D a t a   S o u r c e = & q u o t ;   & a m p ;   s t r O l d , 
 _ 
 & q u o t ; P r o v i d e r = M i c r o s o f t . J e t . O L E D B . 4 . 0 ; D a t a   S o u r c e = & q u o t ;   & a m p ;   s t r N e w   & a m p ;   & q u o t ; ; J e t 
 O L E D B : E n g i n e   T y p e = 4 & q u o t ; 
 
 K i l l   s t r O l d 
 D o E v e n t s 
 N a m e   s t r N e w   A s   s t r O l d 
 
 S e t   j r   =   N o t h i n g 
 
 E n d   S u b 
 < / p > 
 