使えるものがあるのだから、新しいものを安易に買ってはいけないよ ありがと 大切にするから

仕事が出来て 正直で いつも笑顔で、優しくて 時には厳しくて、本気で叱ってくれる みんなから信頼されなくても 少なくても良いから 大切な人を大切にしている人

'******************************* '* DBコネクションを返却する '******************************* Public Function getDbConServer() As ADODB.Connection Dim errCnt%: errCnt = 0 On Error GoTo LBL_Err Retry: If Len(MyConnectionStr$) = 0 Then Call …