<%
'Generate Credit Card List
Do While NOT RSCC.EOF
ccOption = ccOption & vbCrLf & ""
RSCC.MoveNext
Loop
%>
<%
'Generate State List
Do While NOT RSState.EOF
stateOption = stateOption & vbCrLf & ""
RSState.MoveNext
Loop
%>
<%
'Generate Country List
Do While NOT RSCountry.EOF
countryOption = countryOption & vbCrLf & ""
RSCountry.MoveNext
Loop
%>