Salve ragazzi mi aiutate a venir fuori da questo inghippo?

Tramite questo codice ho inserito in un array i dati estratti da una tabella di DB ed ho poi usato i dati presenti nell'array per generare una select.

Il problema si verifica quando la tabella del DB è vuota.
Come devo valorizzare l'array in questo caso?

Qualcuno può darmi una mano?

<%
Apro Connessione al db
Set RS = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT * FROM P_T ORDER BY ID;"
RS.Open strSQL, Cn, 3

arrTabella=RS.GetRows()

RS.Close
Set RS=Nothing

Chiudo Connessione

%>
<select name="a1" id="a1" />
For iRiga=0 to UBound(arrTabella, 2)
%>
<option value="<%=(arrTabella1(9,iRiga))%>"><%=(arrTabella 1(9,iRiga))%></option>
<%
Next
%>
</select>