Forum 

Forum AspNuke.it - Il tuo Portale OpenSource in ASP

Mercatino 2.0.4

Autore Messaggio
asnaldo

Utente
Utente
75 Discussioni



Profilo - asnaldo
12 dicembre 2004 alle 13:30:30 Profilo - asnaldoInvia un messaggio privato asnaldo@hotmail.it Rispondi quotando
Sto testando il mercatino 2.0.4 con Access sul mio sito sembra che funziona perfettamente.. l'unica cosa è che mi da l'errore sotto quando clicco si "Amministrazione" ma nonostante l'errore sembra che fuonziona bene! Qualcuno sa cosa può sessere?



ErroreSQL 424: Object required
SQL : SELECT nID, nTitle, nAuthor, nDate FROM news where nValid=1 AND nDate > '20041212 12:24:42' ORDER BY nDate DESC

Microsoft VB Script runtime error '800a01a8'

Object required: '[undefined]'

/204/includes/admin_allinfo-inc.asp, line 55



Grazie!
---------------
Ciauz!
http://www.AsnaldoCartoons.it
lixuxis

Principiante
Principiante
9 Discussioni



Profilo - lixuxis
12 dicembre 2004 alle 22:59:16 Profilo - lixuxisInvia un messaggio privato Rispondi quotando
Modificato il 18 dicembre 2004 alle 20:18:20

Voglio provarlo anch'io. Ciao.
asnaldo

Utente
Utente
75 Discussioni



Profilo - asnaldo
18 dicembre 2004 alle 12:02:11 Profilo - asnaldoInvia un messaggio privato asnaldo@hotmail.it Rispondi quotando
Insieme a Zalabart abbiamo risolto il problema, che era nel file admin_allinfo-inc.asp, questo è il codice giusto da inserire:


' Mercatino - Articoli da validare
Set oCn = DBConnexion(DB_MERCATINO)
rSQL = "SELECT COUNT(id) FROM me_annuncio WHERE valido=0"
Set oRs = DBRecordSet (oCn, rSQL)
CreateTopTable "Mercatino", GetTranslation("LANG_MARKET_CONTROL")
Response.Write GLOBAL_SITE_SUBTABLE & vbCRLF
Response.Write " <tr class=""tableline1"">" & vbCRLF
If oRs(0) >=1 Then
Response.Write "<td align=""left""><b>" & GetTranslation("LANG_PRESENTS") & "" & oRs(0) & "" & GetTranslation("LANG_TYPE_CONTROL") & " - <a href=""" & GLOBAL_SITE_URL & GLOBAL_SITE_ADMIN_PATH & "mercatino.asp"" title=""Verifica gli annunci presenti"">" & GetTranslation("LANG_CONTROL_NOW") & "</a></b></td>" & vbCRLF
Else
Response.Write "<td align=""left""><b>" & GetTranslation("LANG_ALL_CONTROL") & "</b></td>" & vbCRLF
End If
Response.Write " </tr>" & vbCRLF
Response.Write "</table>" & vbCrlf
CreateBottomTable ""
oRs.Close
Set oRs = Nothing
oCn.Close
Set oCn = Nothing
Set oCn = DBConnexion(DB_MAIN)


Praticamente è stata aggiunta l'ultima riga.

---------------
Ciauz!
http://www.AsnaldoCartoons.it
kaos31

Amatore
Amatore
26 Discussioni



Profilo - kaos31
22 dicembre 2004 alle 17:00:27 Profilo - kaos31Invia un messaggio privato Rispondi quotando
Da dove lo scarico???
emu

Moderatore

Esperto
Esperto
1714 Discussioni



Profilo - emu
22 dicembre 2004 alle 17:18:17 Profilo - emuInvia un messaggio privato Rispondi quotando
Modificato il 22 dicembre 2004 alle 17:19:51

Tra pochi giorni su questo stesso sito.
Ora e' in test presso utenti selezionati.
Ciao
---------------
development@aspnuke.it

Log in

Login
Password
Memorizza i tuoi dati:

Cerca

 

Sostieni AspNuke

Un piccolo gesto per aiutarci a mantenere AspNuke.it online

Promo

MusicWebItalia.it
Video Testi Traduzioni Spot Colonne sonore Accordi e Spartiti gratis.

Visitatori

Visitatori Correnti : 99
Membri : 0 offline Anna

Iscritti

 Utenti: 18940
Ultimo iscritto : glauco
Lista iscritti
Messaggi privati: 3373 Commenti: 2210 Immagini: 39 Downloads: 144 Articoli: 49 Pagine: 101 Siti web: 558 Notizie: 180 Sondaggi: 11 Preferiti: 5685294 Post sui forum: 51195 Libro degli ospiti: 4 Eventi: 7

Versioni

Temi