replace

    mailinuse = Format(Round(db.percentused*dbsize/100,1),&quot;0.0&quot;)<br/>

with

    If dbmax&lt;&gt;0 Then<br/>
        mailinuse = Format(Round((dbsize/dbmax)*100,1),&quot;0.0&quot;) <br/>
    End If