Hola, no había visto esa forma de conectarse a una bd, por lo general la conección va aparte del SQL.
Pero bueno creo que o que deberías reemplazar sería desde server.mappath(....
Prueba esto:
Código:
Sql = " Insert into modiparada "
Sql = Sql & "IN '"& driver={SQL Server};server=Servidor;uid=usuario;pwd=clave;database=BASDATOS & "'"
sql = sql & " SELECT PARADA.ID, PARADA.PARADA, PARADA.FRECUENCIA, PARADA.DETENCION, PARADA.RE, PARADA.HORA, PARADA.OBS, PARADA.RECORRIDO, PARADA.TURNO,RECO.SUC"
SQL = SQL & " FROM RECO INNER JOIN PARADA ON (RECO.TURNO = PARADA.TURNO) AND (RECO.RECORRIDO = PARADA.RECORRIDO)"
sql = sql & " WHERE parada.id = " & modi & ""
Conn.Execute Sql , registros
No se si resulte

.
Lo otro es que pongas la conexión aparte, independiente del sql.
Saludos