Forum 

Forum AspNuke.it - Il tuo Portale OpenSource in ASP

Forum
  GRAFICA
      PERSONALIZZAZIONE
         Eliminazione colonna di dx nel modulo immagini

Eliminazione colonna di dx nel modulo immagini

Autore Messaggio
LatteSkaduto

Principiante
Principiante
5 Discussioni


Profilo - LatteSkaduto 		03 ottobre 2005 alle 00:01:26 Profilo - LatteSkadutoInvia un messaggio privato Rispondi quotando
Salve,
premetto che sto usando la versione 2.0.4.
Ho impostato la visualizzazione di blocchi grafici sia a sx che a dx. Questa impostazione mi va bene per quasi tutti i moduli, ma nella sezione "Immagini" volevo eliminare la colonna di destra, per avere più spazio per le foto.
Credo sia possibile eliminarne la visualizzazione solo su images.asp, ma non so dove mettere mano... Please, help me! :)
Mille grazie anticipatamente!!!
Riccardo
Arcanis

Avanzato
Avanzato
198 Discussioni


Profilo - Arcanis 		03 ottobre 2005 alle 23:39:55 Profilo - ArcanisInvia un messaggio privato Ser_Arcanis@libero.it Rispondi quotando
Modificato il 04 ottobre 2005 alle 00:04:53
Umh... d'istinto posso suggerirti di creare un include da mettere al posto del bottompage-inc.asp. O meglio fai così, lo apri con il blocco note o con dreamweaver se ce l'hai, ed elimini le parti di codice che richiamano la right column (puoi anche remmarle, cioè inserire a capo delle rispettive l'apostrofo ' ). e la salvi con nome bottompage1-inc.asp sempre nella dir includes.

Poi apri la pagina images.asp e sulla riga

<!-- #include file="includes/bottompage-inc.asp" -->

la modifichi così

<!-- #include file="includes/bottompage1-inc.asp" -->

Se hai modificato bene la bottom page dovrebbe funzionarti e vedrai la pagina senza al colonna di destra.

Fatto tutto però ti rimarrà lo spazio bianco al posto della colonna perchè questa viene aperta nel toppage-inc.asp. Quindi fai la stessa cosa con e su questo file.


Spero di esserti stato d'aiuto.

Un saluto, Claudio
Arcanis

Avanzato
Avanzato
198 Discussioni


Profilo - Arcanis 		04 ottobre 2005 alle 00:16:55 Profilo - ArcanisInvia un messaggio privato Ser_Arcanis@libero.it Rispondi quotando
Ho fatto delle prove ecco i contenuti:

toppage1-inc.asp:

<%
' ************************************************************************
' * ASPNUKE: Free web portal in ASP *
' ************************************************************************
' * ASP-Nuke 2.0 Copyright (c) 2004 by Aspnuke.it Staff *
' * (staff@aspnuke.it) http://www.aspnuke.it *
' * *
' * Re-design by Enrico Musante (c) 2004 (emu@libero.it) *
' * Re-design by Frank Zalabard (c) 2004 (fsarzana@hotmail.com) *
' * Re-design by Anna Santonicola (c) 2004 (webmaster@aspnuke.it) *
' * *
' * ASP-Nuke 1.0, 1.1, 1.2 Copyright (c) 2002-2003 by Gaetan Bouveret *
' * (webmaster@asp-nuke.com) http://www.asp-nuke.com *
' * *
' * This program is free software. You can redistribute it and/or modify *
' * it under the terms of the GNU General Public License as published by *
' * the Free Software Foundation; either version 2 of the License, or *
' * (at your option) any later version. *
' * *
' ************************************************************************
' * some base.js functions are from: *
' * ASP-Nuke Community 1.4 Copyright © 2004 by Rolf Thomassen *
' * (mrspock(a)rediff.com) http://www.rot.dk *
' ************************************************************************
%>
<!-- #include file="toolbar_js-inc.asp" -->
<%
Dim oImgFs, oImgFolder, oImgFile, sImgType, sImgList
Dim sColSpan
Dim dblStartTimer, dblFinishTimer
dblStartTimer = Timer()

sTheme = GetAndSetTheme()
if sDynTitle = "" Then
sDynTitle = " - " & sTitlePage
End If
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<_html>
<_head>
<_title><%=GLOBAL_PAGE_NAME & sDynTitle%><_/title>
<_meta http-equiv="Content-Type" content="text/html;charset=<%=sCharset%>">
<_meta name="Keywords" content="<%=GLOBAL_META_KEYWORDS%>">
<_meta name="Description" content="<%=GLOBAL_META_DESCRIPTION%>">
<_meta name="Author" content="<%=GLOBAL_META_AUTHOR%>">
<_meta name="Generator" content="<%=GLOBAL_SITE_VERSION%>">
<_meta name="robots" content="index,follow">
<%
If sIcon <> "" Then
Response.write "<link rel=""Shortcut Icon"" href=""" & GLOBAL_SITE_URL & GLOBAL_SITE_PATH & sIcon & """>"
End If
%>
<link rel="stylesheet" href="<%=GLOBAL_SITE_THEMES_PATH & sTheme & "/default.css"%>" type="text/css">
<%
' Added to have a addons.css to mantain compatibility with old themes
IF ExistFile(Server.MapPath(GLOBAL_SITE_THEMES_PATH & sTheme & "/addon.css")) Then
Response.Write "<link rel=""stylesheet"" href=""" & GLOBAL_SITE_THEMES_PATH & sTheme & "/addon.css"" type=""text/css"">" & vbCRLF
ElseIF ExistFile(Server.MapPath(GLOBAL_SITE_THEMES_PATH & "addon.css")) Then
Response.Write "<link rel=""stylesheet"" href=""" & GLOBAL_SITE_THEMES_PATH & "addon.css"" type=""text/css"">" & vbCRLF
End IF
%>
<!-- #include file="base_js-inc.asp" -->
<_Script type="text/Java_Script" language="Java_Script">
var myWin;
var opened = false;
var myimages=new Array();
var ie4 = false;
var RGB = new Array(256);
var k = "0123456789abcdef";

for (var i = 0; i < 16; i++)
for (var j = 0; j < 16; j++)
RGB[16*i+j] = k.charAt(i) + k.charAt(j);

preloadimages(<%
If bPreloadImages Then
sImgList = ""
Set oImgFs = Server.CreateObject("Scripting.FileSystemObject")
Set oImgFolder = oImgFs.GetFolder(Server.MapPath(GLOBAL_SITE_IMAGES_PATH))
For Each oImgFile In oImgFolder.Files
sImgType = lcase(right(oImgFile.Name, 4))
If sImgType = ".jpg" Or sImgType = ".gif" Or sImgType = ".png" Then
If sImgList = "" Then
sImgList = "'" & GLOBAL_SITE_IMAGES_PATH & oImgFile.Name & "'"
Else
sImgList = sImgList & ",'" & GLOBAL_SITE_IMAGES_PATH & oImgFile.Name & "'"
End If
End If
Next
Set oImgFolder = Nothing
Set oImgFs = Nothing
Response.write sImgList
End If
%>);

if(document.all) {
ie4 = true;
}

getZone();
</_Script>
<%
'True is you want to use WYGSIWYG Editor
If bWYSIWYGeditor then
PrepareWYSIWYGeditor
End if
%>
<_/head>
<_body bottommargin="0" leftmargin="0" marginheight="0" marginwidth="0" rightmargin="0" topmargin="0" onunload="closeChild()" onload="updateToolbar()">
<table id="TopPage" width="100%" height="60" border="0" align="center" cellpadding="0" cellspacing="0" class="topbanner">
<tr>
<td align="left" width="40%"><a href="<%=GLOBAL_SITE_PATH%>"><img src="<%=GLOBAL_SITE_THEMES_PATH & sTheme & "/logo.gif"%>" border="0" alt="Logo"></a></td>
<td align="right" width="60%">
<%
If bDisplayAdvertising Then
DisplayWebsiteAdvertising()
End if
%>
</td>
</tr>
</table>
<%
if bDisplayToolbar then
DisplayToolBar
end if
%>
<table id="InfoPage" width="100%" border="0" align="center" cellpadding="0" cellspacing="0" class="InfoPage">
<tr>
<td width="10">&nbsp;</td>
<td width="300"><%=sTitlePage%>&nbsp;
<%
DisplayNewPrivateMessages(sPseudo)
%>
</td>
<td align="right">&nbsp;<%=sInfoPage%></td>
<td width="10">&nbsp;</td>
</tr>
</table>
<%
Response.Flush
%>
<table id="MainPage" width="100%" border="0" align="center" cellpadding="0" cellspacing="0" class="mytable">
<tr class="mytr">
<%
if Session("printable") = "OK" Then
%>
<td width="100%">
<%
else
%>
<td width="10">&nbsp;</td>
<%
If IsArray(tLeftColumn) Then
%>
<td width="150">&nbsp;</td>
<td width="10">&nbsp;</td>
<%
End If
%>
<td>&nbsp;</td>
<%
'If IsArray(tRightColumn) Then
%>

<%
End If
%>
<td width="10">&nbsp;</td>
</tr>
<tr class="mytr">
<td width="10">&nbsp;</td>
<%
If IsArray(tLeftColumn) Then
%>
<td width="150" valign="top">
<%
DisplayColumn(tLeftColumn)
%>
</td>
<td width="10">&nbsp;</td>
<%
End If
%>
<td valign="top">
<table id="Display" width="100%" height="450" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="440" valign="top">
<%
Response.Flush

%>


Poi questo il contenuto del bottompage1-inc.asp

<%
' ************************************************************************
' * ASPNUKE: Free web portal in ASP *
' ************************************************************************
' * ASP-Nuke 2.0 Copyright (c) 2004 by Aspnuke.it Staff *
' * (staff@aspnuke.it) http://www.aspnuke.it *
' * *
' * Re-design by Enrico Musante (c) 2004 (emu@libero.it) *
' * *
' * ASP-Nuke 1.0, 1.1, 1.2 Copyright (c) 2002-2003 by Gaetan Bouveret *
' * (webmaster@asp-nuke.com) http://www.asp-nuke.com *
' * *
' * This program is free software. You can redistribute it and/or modify *
' * it under the terms of the GNU General Public License as published by *
' * the Free Software Foundation; either version 2 of the License, or *
' * (at your option) any later version. *
' * *
' ************************************************************************
%>
<%
If IsArray(tLeftColumn) Then'and IsArray(tRightColumn) Then
sColSpan = "7"
ElseIf IsArray(tLeftColumn) Then'or IsArray(tRightColumn) Then
sColSpan = "5"
Else
sColSpan = "3"
End If

Response.Flush

dblFinishTimer = Timer()
%>
</td>
<%
if Session("printable") = "OK" Then
on error resume next
Session.Contents.remove("printable")
If Err <> 0 Then
Err.Clear
Session("printable") = ""
End If
On Error Goto 0
else
%>
</tr>
</table>
</td>
<td width="10">&nbsp;</td>

</tr>
<tr class="myTr">
<td colspan="<%=sColSpan%>" height="20" align="center"><span class="small">
&nbsp;<%=GLOBAL_SITE_COPYRIGHT%>&nbsp;<br>
<a href="<%=encodeMailto(GLOBAL_SITE_EMAIL)%>"><%=GetTranslation("LANG_CONTACTS")%></a><br>
<%=GetTranslation("LANG_DESIGN_WITH")%>&nbsp;<%=GetTranslation("LANG_CREDITS")%><br>
<%=GetTranslation("LANG_EXECUTION_TIME_PRE")%>&nbsp;<%=CStr(dblFinishTimer - dblStartTimer) & GetTranslation("LANG_EXECUTION_TIME_POST")%>
<br><a href="<%=GLOBAL_SITE_PATH%>do_printable.asp"><img src="<%=GLOBAL_SITE_IMAGES_PATH & "print.gif"%>" border="0" alt="<%=GetTranslation("LANG_PRINTABLE_VERSION")%>">&nbsp;<%=GetTranslation("LANG_PRINTABLE_VERSION")%></a>
</span></td>
<%
end if
%>
</tr>
<tr class="myTr">
<td colspan="<%=sColSpan%>" class="bottompage">&nbsp;</td>
</tr>
</table>
<_/body>
<_/html>


Ed infine il tuo images.asp:

<%
' ************************************************************************
' * ASPNUKE: Free web portal in ASP *
' ************************************************************************
' * ASP-Nuke 2.0 Copyright (c) 2004 by Aspnuke.it Staff *
' * (staff@aspnuke.it) http://www.aspnuke.it *
' * *
' * Re-design by Enrico Musante (c) 2004 (emu@libero.it) *
' * Re-design by Frank Zalabard (c) 2004 (fsarzana@hotmail.com) *
' * Re-design by Anna Santonicola (c) 2004 (webmaster@aspnuke.it) *
' * *
' * ASP-Nuke 1.0, 1.1, 1.2 Copyright (c) 2002-2003 by Gaetan Bouveret *
' * (webmaster@asp-nuke.com) http://www.asp-nuke.com *
' * *
' * This program is free software. You can redistribute it and/or modify *
' * it under the terms of the GNU General Public License as published by *
' * the Free Software Foundation; either version 2 of the License, or *
' * (at your option) any later version. *
' * *
' ************************************************************************
%>
<!-- #include file="includes/includes-inc.asp" -->
<!-- #include file="includes/images-inc.asp" -->
<!-- #include file="includes/imgsz-inc.asp" -->
<!-- #include file="includes/comments-inc.asp" -->
<%
If sPseudo = "" and bRestrictedImages Then
ReleaseObjects
Response.Redirect GLOBAL_SITE_PATH & GLOBAL_SITE_DENIED_PAGE
Response.End
End If
sTitlePage = GetTranslation("LANG_TITLE_IMAGES")
GetDynamicTitle()
DoImagesPage()
DoComments()
%>
<!-- #include file="includes/toppage1-inc.asp" -->
<%
DisplayImagesPage()
DisplayCommentsPage()
%>
<!-- #include file="includes/bottompage1-inc.asp" -->
<!-- #include file="includes/clearitall-inc.asp" -->


A me in locale funziona perfettamente. Sono modifiche casareccie... sicuramente si poteva fare di meglio... però funziona così! Ho seplicemente tolto i riferimenti alla right column, e fiammato qualche else if di troppo ^_*

Ciao, Claudio
LatteSkaduto

Principiante
Principiante
5 Discussioni


Profilo - LatteSkaduto 		04 ottobre 2005 alle 00:24:34 Profilo - LatteSkadutoInvia un messaggio privato Rispondi quotando
hai ricambiato stra-pienamente il favore... in 2 secondi ho fatto quello che volevo ottenere! Grazie 10e3 :D

Mitico!!!

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 : 198
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: 5688352 Post sui forum: 51195 Libro degli ospiti: 4 Eventi: 7

Versioni

Temi