Problema con l'admin di gestione

**spyro** · 21-05-2005, 12:06

Salve mi rivolgo qui' credo che sia il forum giusto, vi spiego

Ho realizzato un sito per una libreria in collaborazione con un programmatore, mi ha preparato i file.ASP e' andato tutto bene a parte l'inserimento degli eventi, se provo ad inserire dal pannello di controllo la data dell'evento e la descrizione dell'evento stesso,
sulla pagina eventi.asp non mi visualizza nulla, qualcuno puo' darmi una mano??

**optime** · 21-05-2005, 12:14

certo che puoi chiedere... ma - scusa la franchezza - non fai prima a fartelo sistemare dal programmatore che ha preparato le pagine?

**spyro** · 21-05-2005, 12:20

Il proble e che non c'è è partito e oggi la libreria innaugura .-)

**optime** · 21-05-2005, 12:21

allora... esponi, dai.

**spyro** · 21-05-2005, 12:26

In pratica ho il file ad_amin.asp dove trovo le voci da gestire(inserimento news ,offerte,ed inserisci EVENTI)ok quando clikko su inserisci eventi il link mi porta al file ad_ins_eventi.asp dove ho un pannello per inserire e la rispettiva data data , sol oche quando ritorno nella pagina eventi.asp non mi visualizza nulla

**optime** · 21-05-2005, 12:30

e' troppo poco quello che ci dici... servirebbe vedere un po' di codice.

**spyro** · 21-05-2005, 12:42

Ohye allora ti architetto il code ok?(questo è il pannello inserisci evento)

<% if Session("Riferimento2") = "ad_admin.asp" then %>

<% Response.Expires = -1 %>

<%
bytecount = UpLoad()
if bytecount > 0 then

DataEvento = inputs("DataEvento")
Evento = inputs("Evento")
Evento = Replace (Evento, VbCrLf, "
")
set con=createobject("adodb.connection")
con.open "provider=microsoft.jet.oledb.4.0;data source="& server.mappath("database/dblibreria.mdb")

set rs=createobject("adodb.recordset")
rs.open "EVENTI",con,3,3
rs.addnew
rs("DataEvento")=DataEvento
rs("Evento")=Evento

rs.update
rs.close
set rs=nothing

con.close
set con=nothing
%>

<SCRIPT LANGUAGE=vbscript >
puls=MsgBox("Evento inserito correttamente! Vuoi inserirne un altro.",vbYesNo+vbQuestion)
if puls=vbYes then
window.location.href = "ad_ins_evento.asp"
else
window.location.href = "ad_admin.asp"
end if
</SCRIPT>

<%
else%>

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">

<html>
<head>
<title>Inserimento Evento</title>
<script language="VBScript">
function InsEvento_onsubmit
if len(document.InsEvento.DataEvento.value) < 10 then
alert "INSERIRE DATA EVENTO!"
InsEvento_onsubmit=false
ElseIf not isdate(document.InsEvento.DataEvento.value) then
alert "LA DATA NON E' IN FORMATO CORRETTO!"
InsEvento_onsubmit=false
ElseIf len(document.InsEvento.Evento.value) < 4 then
alert "INSERIRE LA DESCRIZIONE DELL'EVENTO!"
InsEvento_onsubmit=false
else
InsEvento_onsubmit=true
end if
end function
</script>
</head>

<body>
<form action="" method="post" enctype="multipart/form-data" name="InsEvento">
<table width="650" border="0" align="center" cellpadding="2" cellspacing="2">
<tr>
<td width="500" height="40" bgcolor="#CCCCCC" align="center"> <div align="left">
<input type="Submit" value="Inserisci">
<input type="Reset" value="Annulla">
<input type="Button" value="Admin" onclick="vbscript:window.location.href='ad_admin.a sp'">
</div></td>
</tr>
<tr>
<td width="500" height="40" bgcolor="#CCCCCC" style="font-family:verdana;font-size:10;color:#4d4d4d;font-weight=bold">
<font color="#FFFFFF" face="Arial, Helvetica, sans-serif">Data Evento (gg/mm/aaaa)</font>
<input type="Text" name="DataEvento">
</td>
</tr>
<tr>
<td width="500" height="40" bgcolor="#CCCCCC" style="font-family:verdana;font-size:10;color:#4d4d4d;font-weight=bold">

<font color="#FFFFFF" face="Arial, Helvetica, sans-serif">Testo (max 255 caratteri)</font>

<textarea name="Evento" rows="10" cols="30"></textarea>
</td>
</tr>
<tr>
<td width="500" height="30" bgcolor="#ff9900" style="font-family:verdana;font-size:10;color:#4d4d4d;font-weight=bold"></td>
</tr>
</table>

<table width="650" border="0" align="center">
<tr>
<td>[img]immagini/navgiu.gif[/img]
<map name="Map">
<area shape="rect" coords="435,6,473,17" href="contatti.html">
<area shape="rect" coords="346,5,425,17" href="iniziative.html">
<area shape="rect" coords="253,6,332,17" href="acquista.html">
<area shape="rect" coords="38,5,120,17" href="perche.html">
<area shape="rect" coords="126,6,158,17" href="libreria.html">
<area shape="rect" coords="169,6,203,17" href="servizi.html">
<area shape="rect" coords="209,4,242,20" href="eventi.asp">
<area shape="rect" coords="483,7,506,17" href="link.html">
<area shape="rect" coords="518,7,579,18" href="ad_admin.html">
<area shape="rect" coords="2,5,30,21" href="default.asp">
</map></td>
</tr>
</table>
</form>

</body>
</html>
<%
end if

'si riferisce a if Session("Riferimento2") = "admin.asp"
else
response.redirect "default.asp"
end if%>

**spyro** · 21-05-2005, 12:44

e questa è la pagina eventi.asp dove nella tabella aSX mi deve visualizzare l'evento o gli eventi:

<%
if request("pg") = "" then
rowcount=0
pg=1
else
Avanz=request("Avanz")
rowcount=0
pg=cint(request("Pg"))
if Avanz = "Avanti" then
PagineTotali=cint(request("PagineTotali"))
if pg < PagineTotali then
pg=cint(pg+1)
end if
ElseIf Avanz = "Dietro" then
if pg >= 2 then
pg=cint(pg-1)
end if
Else
Pg = Pg
end if
end if

set con=createobject("adodb.connection")
con.open "provider=microsoft.jet.oledb.4.0;data source="& server.mappath("database/dblibreria.mdb")

set rs=createobject("adodb.recordset")
rs.open "SELECT * FROM EVENTI where DataEvento > date() ",con,3,3
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Eventi</title>

</head>

<body>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td align="center">
<table width="650" height="310" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>

<td width="363" height="310" valign="top">
<div align="center">
<table width="363" height="310" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="163">[img]immagini/logosx.jpg[/img]</td>
<td width="200">[img]immagini/logodx.jpg[/img]</td>
</tr>
<tr bgcolor="#CCCCCC">
<td height="179" colspan="2" width="363">[img]immagini/eventiimmage.jpg[/img]</td>
</tr>
</table>
</div>
</td>

<td width="287" height="310 valign=" valign="top"top">
<div align="center">
<table width="287" height="310" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="172" height="32">[img]immagini/home.gif[/img]</td>
<td rowspan="10" valign="top" bgcolor="#FF9900">
<div align="center">[img]immagini/anderconst.gif[/img]
</div></td>
</tr>
<tr>
<td width="172" height="30">[img]immagini/percheatena.gif[/img]</td>
</tr>
<tr>
<td width="172" height="30">[img]immagini/libreria.gif[/img]</td>
</tr>
<tr>
<td width="172" height="30">[img]immagini/eventi.gif[/img]</td>
</tr>
<tr>
<td width="172" height="30">[img]immagini/servizi.gif[/img]</td>
</tr>
<tr>
<td width="172" height="30">[img]immagini/acquista.gif[/img]</td>
</tr>
<tr>
<td width="172" height="30">[img]immagini/iniziative.gif[/img]</td>
</tr>
<tr>
<td width="172" height="30">[img]immagini/link.gif[/img]</td>
</tr>
<tr>
<td width="172" height="32">[img]immagini/contatti.gif[/img]</td>
</tr>
<tr>
<td width="172" height="38">[img]immagini/sottovoci.gif[/img]</td>
</tr>
</table>
</div></td>
</tr>
</table>
</td>
</tr>
</table>

<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>

<td align="center">
<table border="0" width="650" cellpadding="0" cellspacing="0">

<tr>

<td width="363" height="380" bgcolor="#CCCCCC">
<table width="340" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>

<td width="400" height="300" align="center" valign="top" bgcolor="#CCCCCC">
<table width="340" height="300" border="1" align="center" cellpadding="0" cellspacing="5" bordercolor="#000000">
<tr>
<td width="80" height="30" bgcolor="#CCCCCC" style="font-family:arial;font-size:10;color:#000000;font-weight:bold">
<font color="#333333">DATA</font><font color="#FFFFFF"></font>
</td>
<td width="250" style="font-family:verdana;font-size:10;color:#000000;font-weight:bold"><font color="#000000">
EVENTO </font></td>
</tr>
<%
if not rs.eof then
rs.Pagesize=25
rs.AbsolutePage=pg
do while not rs.eof and rowcount < rs.pagesize
rowcount = rowcount+1 %>
<tr>
<td height="30" bgcolor="#eeeeee" style="font-family:verdana;font-size:9;color:#000000;font-weight:bold">
<%=rs("DataEvento")%> </td>
<td height="30" bgcolor="#eeeeee" style="font-family:verdana;font-size:9;color:#000000;font-weight:bold">
<%=rs("Evento")%> </td>
</tr>
<%
rs.movenext
loop
%>
<tr>
<td align="center" colspan="2"> <%if rs.PageCount > 1 then%> <a style="color:#004a95" href="file:///D|/LIBRERIA/eventi.asp?Pg=<%=pg%>&PagineTotali=<%=rs.PageCount %>&Avanz=<%="Dietro"%>"><<
</a> <%for i= 1 to rs.PageCount
if i <> cint(pg) then%> <%=i%> <%else%> <font style="font-family:verdana;font-size:12;color:#ff0000;">
<%=i%> </font> <%end if
next%> ">>>
<%end if%> </td>
</tr>
<% else%>
<tr>
<td colspan="2"><font color="#FF0000" face="Arial, Helvetica, sans-serif">SPIACENTI
MA LA RICERCA NON HA PRODOTTO ALCUN RISULTATO.</font></td>
</tr>
<tr> <td height="100&%"></td>
</tr>
<%
end if%>
</table>

</td>
</tr>
</table>

</td>

<td width="287" height="380" valign="top">
<div align="center">[img]immagini/illeventi.gif[/img]</div></td>
</tr>
</table>
<table width="650" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="650">[img]immagini/eventibarra.gif[/img]</td>
</tr>
</table></td>
</tr>
</table>
<map name="Map">
<area shape="rect" coords="21,10,66,26" href="default.asp">
</map>
<map name="Map2">
<area shape="rect" coords="22,6,157,24" href="perche.html">
</map>
<map name="Map3">
<area shape="rect" coords="22,7,96,23" href="libreria.html">
</map>
<map name="Map5">
<area shape="rect" coords="23,8,125,22" href="servizi.html">
</map>
<map name="Map6">
<area shape="rect" coords="24,7,156,22" href="acquista.html">
</map>
<map name="Map7">
<area shape="rect" coords="24,9,165,21" href="iniziative.html">
</map>
<map name="Map8">
<area shape="rect" coords="26,8,68,21" href="link.html">
</map>
<map name="Map9">
<area shape="rect" coords="25,11,91,24" href="contatti.html">
</map>
<map name="Map4">
<area shape="rect" coords="3,12,35,26" href="default.asp">
<area shape="rect" coords="42,10,117,26" href="perche.html">
<area shape="rect" coords="124,11,161,26" href="libreria.html">
<area shape="rect" coords="170,11,203,26" href="servizi.html">
<area shape="rect" coords="210,11,244,25" href="eventi.">
<area shape="rect" coords="257,11,307,26" href="acquista.html">
<area shape="rect" coords="323,12,409,25" href="iniziative.html">
<area shape="rect" coords="417,13,454,25" href="contatti.html">
<area shape="rect" coords="465,13,488,25" href="link.html">
<area shape="rect" coords="493,13,557,25" href="ad_admin.html">
</map>
</body>
</html>
<%
rs.close
set rs=nothing

con.close
set con=nothing
%>

**Roby_72** · 21-05-2005, 12:47

Direi di spezzare il problema.
Nel db l'evento e la data ci finiscono?
Almeno sai cosa controllare.

Roby

**spyro** · 21-05-2005, 12:51

Ciao roby 72 puoi spiegarmi meglio??

Discussione: Problema con l'admin di gestione

Strumenti discussione

Ricerca discussione

Visualizza

Problema con l'admin di gestione

Permessi di invio