Menu Home Forum Notizie Articoli Manuale 2.08 Manuale 2.0 Demo 2.08 F.A.Q. Libro degli ospiti Link Downloads Immagini Films Sondaggi Staff Tags Entra Iscriviti   Eventi < Settembre > L M M G V S D -- 01 02 03 04 05 06 07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 -- -- -- -- Questa settimana	Forum AspNuke.it - Il tuo Portale OpenSource in ASP Forum   SUPPORTO TECNICO 2.07       MODULI AGGIUNTIVI          Ultimi inserimenti Entra | Top 10 Ultimi inserimenti Autore Messaggio danika Amatore 25 Discussioni 13 luglio 2008 alle 19:47:54 Per favore com'e' possibile inserire in un blocco laterale il modulo last insert con scroll verticale Grazie delle eventusli risposte djveleno Amministratore Esperto 1025 Discussioni 13 luglio 2008 alle 22:07:43 Premetto che le modifiche sono parecchie, perché il modulo è stato riscritto per la visualizzazione in Home e non come blocco laterale. Per prima cosa si deve copiare il file last_insert-inc.asp nella cartella /public/dynblock, questo per avere disponibili le due Sub inserite nel file. Per secondo, si deve creare un nuovo file asp, sempre in dynblock, che io ho chiamato lastins.asp, il contenuto del file è il seguente: <!-- #include file="last_insert-inc.asp" --> <% Sub DisplayLastInsert() Response.write "<table width=""100%"" border=""0"" cellspacing=""0"" cellpadding=""5"">" & VbCrlf Response.Write "<tr>" & VbCrlf Response.Write "<td width=""100%"">" & VbCrlf UltimiEventiVerticale True,True Response.Write "</td>" & VbCrlf Response.Write "</tr>" & VbCrlf Response.Write "</table>" & VbCrlf End Sub %> La terza cosa, un pò più elaborata, è la modifica al file last_insert-inc.asp che abbiamo copiato nella cartella Dynblock, le modifiche riguardano la parte HTML che visualizza lo scroll degli inserimenti, perchè come abbiamo detto prima il modulo è stato creato per essere visualizzato in Home, mentre a noi serve uno scroll verticale delle dimensioni della colonna, la modifica mi farà vedere gli ultimi inserimenti incolonnati riga per riga, nella Sub UltimiEventiVerticale si dovranno modificare le righe che richiamano gli elementi aggiunti, ti posto l'esempio del codice che dovrà essere inserito per tutti gli elementi: 'ISCRITTO If uOK = True Then Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uuDate & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uSez & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uIns & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf iLine = 1 + ((iLine-1) Xor 1) End If In pratica si deve fare in modo che ogni voce vada a capo e sia visibile incolonnata. Poi, per ultimo si crea blocco come sempre. --------------- A lavare la testa ai somari, ci si rimette l'acqua e il sapone! http://aspnuke208.somee.com/Default.asp danika Amatore 25 Discussioni 15 luglio 2008 alle 15:30:50 grazie div ho apportato le modifiche ma si sono allargati i blocchi laterali puoi vedere da te http://www.danikabassolazio.it/Default.asp djveleno Amministratore Esperto 1025 Discussioni 15 luglio 2008 alle 21:24:37 Non hai applicato la modifica per far andare a capo le voci. --------------- A lavare la testa ai somari, ci si rimette l'acqua e il sapone! http://aspnuke208.somee.com/Default.asp danika Amatore 25 Discussioni 16 luglio 2008 alle 14:28:31 Si te le posto 'ISCRITTO If uOK = True Then Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uuDate & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uSez & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uIns & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf iLine = 1 + ((iLine-1) Xor 1) End If 'NEWS If nOK = True Then Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uuDate & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uSez & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uIns & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf iLine = 1 + ((iLine-1) Xor 1) End If 'ARTICOLO If aOK = True Then Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uuDate & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uSez & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uIns & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf iLine = 1 + ((iLine-1) Xor 1) End If 'IMMAGINI If iOK = True Then Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uuDate & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uSez & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uIns & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf iLine = 1 + ((iLine-1) Xor 1) End If 'DOWNLOAD If dOK = True Then Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uuDate & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uSez & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uIns & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf iLine = 1 + ((iLine-1) Xor 1) End If 'SONDAGGI If pOK = True Then Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uuDate & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uSez & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uIns & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf iLine = 1 + ((iLine-1) Xor 1) End If 'MERCATINO If bUsaMercatino=True Then If mOK = True Then Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uuDate & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uSez & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf Response.Write "<tr class=""tableline" & iLine & """>" & vbCRLF Response.Write "<td align=""center"" class=""normal""><span>&nbsp;" & uIns & "&nbsp;</span></td>" & vbCrlf Response.Write "</tr>" & vbCRlf iLine = 1 + ((iLine-1) Xor 1) djveleno Amministratore Esperto 1025 Discussioni 16 luglio 2008 alle 15:02:26 Io ho applicato la modifica in locale, e funziona correttamente. --------------- A lavare la testa ai somari, ci si rimette l'acqua e il sapone! http://aspnuke208.somee.com/Default.asp danika Amatore 25 Discussioni 16 luglio 2008 alle 15:22:16 come faccio adesso? help ho tolto il blocco dal mio sito spero che tu possa aiutarmi a risolverlo a proposito esisteva prima un modulo contatti sapresti dirmi dove scaricarlo? djveleno Amministratore Esperto 1025 Discussioni 16 luglio 2008 alle 15:31:57 Se non ti funziona questa modifica, non ti resta che riapplicare il modulo originale per la home page. Il modulo contatti lo abbiamo eliminato per la sicurezza, sarebbe da riscrivere ma, non ne ho il tempo, appena avrò un giorno libero lo riproporrò riscritto. --------------- A lavare la testa ai somari, ci si rimette l'acqua e il sapone! http://aspnuke208.somee.com/Default.asp danika Amatore 25 Discussioni 16 luglio 2008 alle 15:37:24 grazie div io ho trovato qualcosa on line da u n sito aspnuke per il modulo contatto scritto da e-bit se non erro se voui lo metto in download djveleno Amministratore Esperto 1025 Discussioni 16 luglio 2008 alle 15:47:37 Fai attenzione che non sia il mio modulo, perchè, ti ritroveresti con lo stesso problema. Comunque, se vuoi mettilo in download nel tuo portale, così lo scarico e lo controllo. --------------- A lavare la testa ai somari, ci si rimette l'acqua e il sapone! http://aspnuke208.somee.com/Default.asp  1  2  >>	Log in Login Password Memorizza i tuoi dati: Cerca Ovunque Notizie Downloads Films Articoli Link Immagini Commenti   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 : 102 Membri : 0  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: 5685284 Post sui forum: 51195 Libro degli ospiti: 4 Eventi: 7 Versioni English Version Versión en español Version Française Versione Italiana Temi default original

 

 © AspNuke | Contattaci | Realizzato con ASP-Nuke 2.0.8 |  webdesign:
 Versione stampabile | Questa pagina è stata eseguita in 0,1914063 secondi.