kodlar zaten localde çalışıyor fakat serverda çalışmıyordu şöyle düzelttim

If IsNull(strVeri) Then Exit Function bu kısmı sildim kontrol yapmıyor yani artık ozmn düzeldi bende anlamadım ama düzeldi serverda biraz daha yük olmuş olcak sadece bu kadar