Forum 

Forum AspNuke.it - Il tuo Portale OpenSource in ASP

Come integro questi due files?

Autore Messaggio
sisso

Utente
Utente
83 Discussioni



Profilo - sisso
07 maggio 2003 alle 14:19:27 Profilo - sissoInvia un messaggio privato Rispondi quotando
Devo metter il mod download ed il mod login, il problema che tutti e due hanno due blok-inc.asp.
ho provato in mille modi ma non riesco come faccio ad integrarli? I codici sono i seguent:

<%
' Display a custom block
' IN : iBlockNumber (int) : superior to 0 (exemple 1, 2 ...)
' OUT : -
Sub DisplayCustomBlock(iBlockNumber)
' Exemple for one block
' Add also a translation for the title of the block, for pattern.asp pages (as LANG_BLOCK_1 ...)
If iBlockNumber > 0 Then
Select Case iBlockNumber

Case 1 :
Dim sPreviousPage, iPos, sMemo

if sPseudo="" then

CreateTopTable "login", "Log in"

If Request.Form("urlpage") <> "" Then
sPreviousPage = Request.Form("urlpage")
Else
sPreviousPage = Request.ServerVariables("HTTP_REFERER")
iPos = InstrRev(sPreviousPage, "/")
If iPos > 0 and iPos > 7 Then
sPreviousPage = Mid(sPreviousPage, iPos+1)
Else
sPreviousPage = "Default.asp"
End If
End If

Response.Write GLOBAL_SITE_SUBTABLE & vbCRLF
Response.Write "<form name=""Authentication"" method=""post"" action=""" & GLOBAL_SITE_PATH & "authent.asp"">" & vbCRLF
Response.Write "<input type=""hidden"" name=""Do"" value=""authent"">" & vbCRLF
Response.Write "<input type=""hidden"" name=""urlpage"" value=""" & sPreviousPage & """>" & vbCRLF
Response.Write " <tr class=""myTD"">" & vbCRLF
Response.Write " <td><font class=""small"">" & GetTranslation("LANG_LOGIN") & "</font></td>" & vbCRLF
Response.Write " <td align=""right"">" & vbCRLF
Response.Write " <input name=""pseudo"" maxlength=""20"" size=""9"" value=""" & vbCRLF
If Request.Form("pseudo") <> "" Then
Response.Write Server.HTMLEncode(Request.Form("pseudo"))
Else
Response.Write GetTranslation("LANG_LOGIN")
End If
sMemo = GetTranslation("LANG_MEMORIZE_SHORT")
if sMemo = "LANG_MEMORIZE_SHORT" then sMemo = "Memorizza i tuoi dati :"
Response.Write """ onFocus=""this.value='';"" class=""cell""></td>" & vbCRLF
Response.Write " </tr>" & vbCRLF
Response.Write " <tr class=""myTD"">" & vbCRLF
Response.Write " <td><font class=""small"">" & GetTranslation("LANG_PASSWORD") & "</font></td>" & vbCRLF
Response.Write " <td align=""right""><input name=""mdp"" type=""password"" maxlength=""20"" size=""8"" onFocus=""this.value='';"" class=""cell""></td>" & vbCRLF
Response.Write " </tr>" & vbCRLF
Response.Write "</table>" & vbCRLF
Response.Write GLOBAL_SITE_SUBTABLE & vbCRLF
Response.Write " <tr class=""myTD"">" & vbCRLF
Response.Write " <td><font class=""small"">" & sMemo & "</font></td>" & vbCRLF
Response.Write " <td align=""right""><input name=""memo"" type=""checkbox"" checked></td>" & vbCRLF
Response.Write " </tr>" & vbCRLF
Response.Write " <tr class=""myTD"">" & vbCRLF
Response.Write " <td colspan=""2"" align=""center""><input name=""bsubmit"" type=""submit"" value=""" & GetTranslation("LANG_VALIDATE") & """ class=""button""></td>" & vbCRLF
Response.Write " </tr>" & vbCRLF
Response.Write "</form>" & vbCRLF
Response.Write "</table>" & vbCRLF
CreateBottomTable ""
End if
End Select
End If
End Sub
%>


Quello sopra e del mod login. invece questo sotto è del mod download:

<%
' Display a custom block
' IN : iBlockNumber (int) : superior to 0 (exemple 1, 2 ...)
' OUT : -
Sub DisplayCustomBlock(iBlockNumber)
' Exemple for one block
' Add also a translation for the title of the block, for pattern.asp pages (as LANG_BLOCK_1 ...)
If iBlockNumber > 0 Then
Select Case iBlockNumber
Case 1 :
CreateTopTable "Titolo", "Downloads "
DisplayTopDownloads GLOBAL_DOWNLOADS_TOP, "hits"
CreateBottomTable ""
End Select
End If
End Sub
%>

Datemi una mano grazie.
---------------
http://www.giulin.net
brunobellini

Utente
Utente
52 Discussioni



Profilo - brunobellini
07 maggio 2003 alle 15:21:24 Profilo - brunobelliniInvia un messaggio privato 162814285 Rispondi quotando
devi innanzitutto salvarli come file. poi nel block-inc devi impostare il Case...
es.
Case 1 :
CreateTopTable "Nome", "Nome"
%>
<!-- #include file="nome.asp" -->
<%
CreateBottomTable ""

Successivamente nel file configuration-inc.asp , verso la fine, dove dice
Const GLOBAL_CUSTOM_BLOCKS = N

al posto della N devi incrementare il valore ke hai in base al numero dei blocchi.

Spero di essere stato kiaro...
---------------
"Br1" Bruno Bellini www.brunobellini.net www.vivimonopoli.com
sisso

Utente
Utente
83 Discussioni



Profilo - sisso
07 maggio 2003 alle 15:49:09 Profilo - sissoInvia un messaggio privato Rispondi quotando
Scusami non ho capito bene: Li devo salvare tutti e due così insieme in un unico file, o devo lasciarli così come sono e richiamarli semplicemente dall'include.
---------------
http://www.giulin.net
brunobellini

Utente
Utente
52 Discussioni



Profilo - brunobellini
07 maggio 2003 alle 16:06:01 Profilo - brunobelliniInvia un messaggio privato 162814285 Rispondi quotando
Modificato il 07 maggio 2003 alle 16:06:51

devi salvare un file per il mod login e l'altro x il mod download, che a quanto pare sono i 2 mod ke vuoi installare.
e quindi devi crearti i 2 case...
---------------
"Br1" Bruno Bellini www.brunobellini.net www.vivimonopoli.com
sisso

Utente
Utente
83 Discussioni



Profilo - sisso
07 maggio 2003 alle 16:56:20 Profilo - sissoInvia un messaggio privato Rispondi quotando
Scusami se faccio fatica e che in asp sono un po imbranato:
Allora io il mod login l'ho già, e composto da due file (bloks-inc.asp e display-inc.asp) li metto nella cartella include, poi devo fare le modifiche come da post:http://www.aspnuke.it/forum/Forum.asp?forum=7&section=3&post=2719 per inserire il mod Top 10, il problema e che devo andare a modificare il file bloks-inc.asp x aggiungere probabilmente il case ma non sò in che modo.
---------------
http://www.giulin.net

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 : 112
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: 425 Notizie: 180 Sondaggi: 11 Preferiti: 199272 Post sui forum: 51195 Libro degli ospiti: 4 Eventi: 7

Versioni

Temi