Code:
<script language=JScript>
<script language=JScript>
<script language=JScript>
function SortVBArray(arrInput) {
Dim con1 As ADODB.Connection Dim con2 As ADODB.Connection Dim recSet1 As ADODB.Recordset Dim recSet2 As ADODB.Recordset Set con1 = CurrentProject.Connection Set con2 = CurrentProject.Connection Set recSet1 = New ADODB.Recordset Set recSet2 = New ADODB.Recordset
DoCmd.OpenQuery "SortTableClientCN_ASC", acViewNormal, acEdit
SELECT tblClientCN.ClientCN FROM tblClientCN ORDER BY tblClientCN.ClientCN;
Leave a comment: