alter table se tabella esiste e metti in ordine

[djjunior]

Carissimi
come posso implementare al seguente codice il controllo se la tabella è esistente:

nome = request.form("nomepagina")

sql ="ALTER TABLE nometabella ADD COLUMN "&nome&" MEMO "
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, Conn , 3

Nonchè a quest'altro codice se posso mettere in ordine alfabetico?

<%
sql = "SELECT * FROM pagine"
Set rs = Server.CreateObject("ADODB.Recordset")   
rs.Open sql, Conn, 3   
%>
<select size="1" name="pagina" onChange="MM_jumpMenu('parent',this,0)">
<option selected value="" <%if pp = "0" then%> selected="selected"<%end if%>>Seleziona la pagina da modificare
</option>
<%
For Each objField In rs.Fields
	nome = objField.name
	if nome = "id" then
	elseif nome = "code" then
	else
%>
<option value="pagina.asp?pag=<%=nome%>" <%if pp = "" & nome & "" then%> selected="selected"<%end if%>><%=nome%></option>
<%
end if
Next

%>
</select>

Grazie
G.

[djjunior]

suggerimenti?

[optime]

1. metti una on error (fai prima)
2. usa un array (cerca nel forum, ci sono mille esempi)

[djjunior]

grazie optime
per il secondo quesito farò una ricerca, ma per il primo non capisco
on error
Grazie
G.

[djjunior]

per il controllo ho risolto così:

Err.Clear
On Error Resume Next

sql ="ALTER TABLE tabella ADD COLUMN "&nome&" MEMO "
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, Conn , 3

 
If Err.Number <> 0 Then
 
%>
nome esistente

 <%
End If
On Error GoTo 0

%>

ok

Per l'array per l'ordine alfabetico non riesco potete aiutarmi?
Grazie
G.

[optime]

hai cercato? se ne è parlato un sacco di volte

[djjunior]

certo ho cercato e provato, puoi indicarmi un link tu?
grazie
g

[optime]

basta che cerchi sort e trovi