Labels:crt screen | dialog box | monitor | plant | sky | window OCR: DM API -NotePad 60x File e!P3 Priv Undo Clickr Din Din Cut Ir Copy Paste hows you thos Properties of a databaes connection vbHourglas Select 'aluel Istprops CJea ReDim. AdoConPropValue[0] 12t AdoConn New Connection create ope obiecl AdoConn ConnectionString Data Source= dh .mdb" create connectior the database AdoConn. Mode adModeR ean Read mode onli AdoConn. Provider 'Microsoft. Jet OLEDB.4 the Provider AdoConn. .Open open the connecl For Each Item In AdoConn .Properties Istprops Addltem Item. Name "We store the value the AdoConn. Properties in an ReDim Preserve AdoC ConPropValue[0 Tol UBound[AdoCon] PropValue] 1Resize array AdoConP ropy alue[UB oundAdoConF ropY 'alue]l Item. Value PP' value to the array NexI Edit Click vbHourglass Clea BeDim objecl Provide connect Propertie Resize Next
