Foros del Web » Programando para Internet » ASP Clásico »

Asp & Access

Estas en el tema de Asp & Access en el foro de ASP Clásico en Foros del Web. hola me llamo ramon i soy un programador asp - php - asp.net pero tengo todos los dillas un problemilla es que e progrmadado la ...
  #1 (permalink)  
Antiguo 28/05/2009, 11:48
 
Fecha de Ingreso: mayo-2009
Mensajes: 3
Antigüedad: 15 años, 10 meses
Puntos: 0
Asp & Access

hola me llamo ramon
i soy un programador asp - php - asp.net
pero tengo todos los dillas un problemilla
es que e progrmadado la paginacion en asp
con "for"
bueno este es el codigo
Código PHP:
if mlev="7" or mlev="6" or show="1" or showe="1" then
strSQL 
"select id,cat_id,f_id,topic_id,r_author,r_message,r_date,r_hide,r_approve,r_hide_text,r_type,t_mem,r_sup from Ab_replies where topic_id="&topic("id")&" "
                        
else
strSQL "select id,cat_id,f_id,topic_id,r_author,r_message,r_date,r_hide,r_approve,r_hide_text,r_type,t_mem,r_sup from Ab_replies where topic_id="&topic("id")&" and r_sup=0 and r_hide=0"
                        
end if
        
set rep Server.CreateObject("ADODB.Recordset")
rep.open strSQLadoadOpenStatic 
if rep.EOF then 
recReplysCount 
"" 
else 
rep.movefirst 
rep
.pagesize 30 
inttotaltopics 
cLng(rep.recordcount
if 
pg cLng(rep.pagecountthen pg 
rep
.absolutepage pg 
maxpages 
cLng(rep.pagecount
totalpages maxpages 
allReplysData 
rep.GetRows(30
recReplysCount UBound(allReplysData,2
end if 
rep.close 
set rep
nothing
if recReplysCount "" then 
else
rid 
rcat_id  
1
rf_id  
2
rtopic_id  

rr_author  

rr_message  

rr_date  
6
rr_hide  

rr_approve  

rr_hide_text  

rr_type  
10
rt_mem  
11
rr_sup  
12
for i=0 to recReplysCount 
r_id 
allReplysData(ridi)
r_cat_id allReplysData(rcat_idi)
r_f_id allReplysData(tT_STATUSi)
r_topic_id allReplysData(rf_idi)
r_r_author allReplysData(rr_authori)
r_r_message allReplysData(rr_messagei)
r_r_date allReplysData(rr_datei)
r_r_hide allReplysData(rr_hidei)
r_r_approve allReplysData(rr_approvei)
r_r_hide_text allReplysData(rr_hide_texti)
r_r_type allReplysData(rr_typei)
r_t_mem allReplysData(rt_memi)
r_r_sup allReplysData(rr_supi)
colorssee "f2"
 
aqui tengo el codigo
next
end 
if 
i meda siempre
un eror ariba
-*
ADODB.Recordset error '800a0bb9'
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.

/asaher/xx/Files/topic.asp, line 370
*-
podeis ayudarme i el error indiqua a
''
rep.absolutepage = pg
'''
porfa aydarme
  #2 (permalink)  
Antiguo 28/05/2009, 16:48
Avatar de Myakire
Colaborador
 
Fecha de Ingreso: enero-2002
Ubicación: Centro de la república
Mensajes: 8.849
Antigüedad: 23 años, 2 meses
Puntos: 146
Respuesta: Asp & Access

No esperarás de verdad que alguien te tome en serio con semejante redacción, ortografía y planteamiento del problema ¿o si?

vamos, que aunque uno quisiera ayudarte a pesar de lo anterior, no dices cuál es la linea específica que da el error
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 03:20.