Code à Traduire...

Code à Traduire... - ASP - Programmation

Marsh Posté le 31-08-2002 à 15:18:10    

Bonjour...
 
J'ai 2 Java script à faire tourner en alternance à un endroit défini.Soit:
 
BANNY 1 : <script language="Javascript" src="http://www.deltapub.net/script.php?idm=3000fr&lien=avec&ta=468">  
 
BANNY 2: <script language="JavaScript" src="http://www.pub-line.com/cgi-bin/gencode.pl?id=3000fr"></script>
 
On m'a donné ce code en PhP:
 
<?  
$tab[0] = "code 1";  
$tab[1] = "code 2";  
 
echo $tab[time()%2];  
?>  
 
Comment le mettre en ASP   :cry:  :cry: Merci
 


---------------
https://www.3000fr.com
Reply

Marsh Posté le 31-08-2002 à 15:18:10   

Reply

Marsh Posté le 31-08-2002 à 15:32:06    

Perso je vois pas le rapport entre le code en JavaScript et le code en PHP ...

Reply

Marsh Posté le 31-08-2002 à 15:38:32    

Euhhh  Me suis peut être mal exprimé...  
On m'a donné ce code en Php, Mais moi j'ai de l'ASP... et il semble qu'avec ce code php je pourrais faire apparaitre en alternance mes 2 javascript(echanges de Banniere) Soit:
 
<?  
$tab[0] = "<script language="Javascript" src="http://www.deltapub.net/script.php?idm=3000fr&lien=avec&ta=468">  ";  
$tab[1] = "<script language="JavaScript" src="http://www.pub-line.com/cgi-bin/gencode.pl?id=3000fr"></script>";  
 
echo $tab[time()%2];  
?>
 
Je peux pas tester, car suis en ASp donc, je demande si on peut faire la meme chose en ASp....
 
Merci..... :jap:    


---------------
https://www.3000fr.com
Reply

Marsh Posté le 31-08-2002 à 16:13:33    

Le code en PHP ne fait pas apparaître une fois sur deux le code 1 ou 2, mais le fait apparaître de façon aléatoire ...

Reply

Marsh Posté le 31-08-2002 à 16:17:01    

Ahh Ok.... Ben il me faudrait la même chose en ASP, mais en alternance... toute les 20 ou 30 secondes....
 
Est-ce possible....? :jap:


---------------
https://www.3000fr.com
Reply

Marsh Posté le 31-08-2002 à 16:22:00    

Désolé, mais moi je ne pourrais pas t'aider, je ne connais pas l'ASP ...

Reply

Marsh Posté le 31-08-2002 à 16:25:37    

Moi je dirai que c'est tout a fais posssible, en progamation on peut faire ceux qu'on veut.
 
Tu veut un morceau de code?

Reply

Marsh Posté le 31-08-2002 à 16:29:25    

Ben... Vi, je connais pas l'asp, je débute, j'ai plus de webmaster ASP, et j'ai un Forum en ASP  :cry:  :cry:  
 
Alors je cherche du secours ... J'apprends, mais c'est long....
 
Alors Oui...... :jap:  :jap:  
 
J'offre 7777 affichages de banny sur mon site... Lol..  
 
Tout travail merite salaire...
 
J'ai un sujet sur mon site... mais pas de reponse...http://www.3000fr.com/forum/images/icon_folder_open.gif


Message édité par Tabasco le 31-08-2002 à 16:37:20

---------------
https://www.3000fr.com
Reply

Marsh Posté le 31-08-2002 à 16:36:33    

essai un truc du genre
 
<%
if second(time()) >= 0 and second(time()) <= 30 then
   Response.Write ("<script language='Javascript' src='http://www.deltapub.net/script.php?idm=3000fr&lien=avec&ta=468'> " )
else
  Response.Write ("<script language='JavaScript' src='http://www.pub-line.com/cgi-bin/gencode.pl?id=3000fr'></script>" )
end if
%>


Message édité par drikc le 31-08-2002 à 16:37:01
Reply

Marsh Posté le 31-08-2002 à 16:38:45    

drikc a écrit a écrit :

essai un truc du genre
 
<%
if second(time()) >= 0 and second(time()) <= 30 then
   Response.Write ("<script language='Javascript' src='http://www.deltapub.net/script.php?idm=3000fr&lien=avec&ta=468'> " )
else
  Response.Write ("<script language='JavaScript' src='http://www.pub-line.com/cgi-bin/gencode.pl?id=3000fr'></script>" )
end if
%>




 
"Response.Write"?  
 
Beek, pas beau l'ASP?  :kaola:  
 
:D


---------------
Faux & usage de faux ¤ Machins roses ¤ ASCIImage ¤ HFR Enhance v0.8.6
Reply

Marsh Posté le 31-08-2002 à 16:38:45   

Reply

Marsh Posté le 31-08-2002 à 16:56:40    

J'ai essayé, j'ai mis la page sur mon ftp :  
 
Marche pas.... http://www.3000fr.com/__b$.asp
 
BOn, vais encore tester.....  MERCI
 
<html>
 
<head>
<title>essais 3000fr</title>
 
</head>
 
<body bgcolor="black" text="black" link="blue" vlink="purple" alink="red">
<p> </p>
<p align="center"> <%  
if second(time()) >= 0 and second(time()) <= 30 then  
  Response.Write ("<script language='Javascript' src='http://www.deltapub.net/script.php?idm=3000fr&lien=avec&ta=468'> " )  
else  
 Response.Write ("<script language='JavaScript' src='http://www.pub-line.com/cgi-bin/gencode.pl?id=3000fr'></script>" )  
end if  
%></p>
<p align="center"> </p>
<p align="center"> </p>
<p align="center"> <%  
if second(time()) >= 0 and second(time()) <= 30 then  
  Response.Write ("<script language='JavaScript' src='http://pubsrv.allopass.com/select.php4?ESP_ID=2100&IDC_ID=854118'> " )  
else  
 Response.Write ("<script language='JavaScript' src='http://www.pub-line.com/cgi-bin/gencode.pl?id=3000fr'></script>" )  
end if  
%></p>
</body>
 
</html>
 
 :jap:  :spookie:


---------------
https://www.3000fr.com
Reply

Marsh Posté le 31-08-2002 à 17:14:24    

Bon, je pense qu'il manquait le </script>Dans la 1ere bannière... mais n'alterne pas....  
 
reste sur la 1ere....  modifier les 30 sec...


---------------
https://www.3000fr.com
Reply

Marsh Posté le 31-08-2002 à 18:32:21    

Code :
  1. <%
  2. dim tab(2)
  3. tab(0) = "code 1"
  4. tab(1) = "code 2"
  6. response.write tab(second(now()) mod 2)
  7. %>


 
Ca ressemble plus au code original ;)


Message édité par MagicBuzz le 31-08-2002 à 18:32:48
Reply

Marsh Posté le 31-08-2002 à 18:35:54    

Vi....  Et bien je vais tester ca....  Merci
 
Mais la, le codes génère en aléatoire... Pas de temps entre...
 
Nouveaux liens pour les essais : http://www.3000fr.com/forum/img-general/_fl_bleu-r1.gif


Message édité par Tabasco le 31-08-2002 à 18:44:32

---------------
https://www.3000fr.com
Reply

Marsh Posté le 31-08-2002 à 20:16:06    

Bon, Le code de drikc va bien, mais les bannières ne changent pas toutes seules...
 
Celui de magicbuzz par contre semble lancer l'une des 2 aléatoirement à chaque chargement...  Pas mal... est-ce que on peut en mettre plus... 3 ou 4...?
Merci de votre aide... sympa... :jap:  
 
Page toujours icihttp://www.3000fr.com/forum/img-general/_fl_bleu-r1.gif


Message édité par Tabasco le 31-08-2002 à 20:16:51

---------------
https://www.3000fr.com
Reply

Marsh Posté le 31-08-2002 à 20:22:53    

mod 2
 
Met mod 3, mod 4, ...
 
et ajoute des lignes dans le tableau ;)
 
PS au delà de 60 ça marchera plus, car il se base sur les secondes, donc proutch ;)

Reply

Marsh Posté le 31-08-2002 à 20:24:49    

PS: mod x va te faire un truc assez aléatoire tant que tu restes avec des valeurs assez petites.
 
Au délà, utilise :
 

Code :
  1. <%
  2. dim tab(x)
  3. tab(0) = "code 1"
  4. tab(1) = "code 2"
  5. ...
  6. tab(x-1) = "code x-1"
  8. randomize
  9. response.write tab(int rnd(x) * x)
  10. %>

Reply

Marsh Posté le 31-08-2002 à 20:44:05    

Merci, j'ai tester:  j'ai mis  
 
[i]dim tab(x)  
  tab(0) = "<script src='http://surfplus.free.fr/surfliste/bansurf.php?id=834'></script>"  
  tab(1) = "<script language='JavaScript' src='http://www.pub-line.com/cgi-bin/gencode.pl?id=3000fr'></script>"  
  tab(2) = "<script language='JavaScript' src='http://pubsrv.allopass.com/select.php4?ESP_ID=2100&IDC_ID=854118'></script>"
  tab(x-1) = "code x-1"  
  randomize  
  response.write tab(int rnd(x) * x)  
  %>
 
Et en local, j'ai l'erreur: Redéfinition de nom  
 
/namoweb/Inetpub/wwwroot/forum/_temp_145a820.asp, line 37  
 
dim tab(x)
----^
 
Il faUT DéFINR X ???
 
Désolé....   merci
 
(pas encore mis sur ftp ce new code... ) je teste en local...


---------------
https://www.3000fr.com
Reply

Marsh Posté le 31-08-2002 à 21:02:20    

ben vire le X :o
 
X c'est pour dire que c'estle nombre de lignes que tu veux MDR ;)

Reply

Marsh Posté le 31-08-2002 à 21:03:06    

deplus, cérifie dans ton code que tu as pas déjà un dim tab(y)
 
(avec y = un nombre ou rien ;))

Reply

Marsh Posté le 31-08-2002 à 21:16:05    

Euuuh Dans la page, j'ai les autres essais avec 2 dim tab (2)
 
J'avais bien pensé pour les x... ci-dessous, j'ai mis la valeur 3  car 3 bannieres... est-ce bon, mais j'ai toujours l'erreur:
Redéfinition de nom  
 
/namoweb/Inetpub/wwwroot/forum/_temp_1524008.asp, line 37  
 
dim tab(3)
----^
Je vois pas ou est la faute?!
 
[i]<%  
  dim tab(3)  
  tab(0) = "<script src='http://surfplus.free.fr/surfliste/bansurf.php?id=834'></script>"  
  tab(1) = "<script language='JavaScript' src='http://www.pub-line.com/cgi-bin/gencode.pl?id=3000fr'></script>"  
  tab(2) = "<script language='JavaScript' src='http://pubsrv.allopass.com/select.php4?ESP_ID=2100&IDC_ID=854118'></script>"
  tab(3-1) = "code 3-1"  
  randomize  
  response.write tab(int rnd(3) * 3)  
  %>


---------------
https://www.3000fr.com
Reply

Marsh Posté le 31-08-2002 à 21:20:18    

tab ne doit être dimentionné qu'un fois.
 
met en commentaire les autres tests ;)
 
ou utilise d'autres variables :D


Message édité par MagicBuzz le 31-08-2002 à 21:20:32
Reply

Marsh Posté le 31-08-2002 à 23:04:42    

Je souffre... J'ai mis exactement ca dans une nouvelle pafe... rien d'autre et aussi erreur???
 
[i]<%  
  dim tab(3)  
  tab(0) = "<script src='http://surfplus.free.fr/surfliste/bansurf.php?id=834'></script>"  
  tab(1) = "<script language='JavaScript' src='http://www.pub-line.com/cgi-bin/gencode.pl?id=3000fr'></script>"  
  tab(2) = "<script language='JavaScript' src='http://pubsrv.allopass.com/select.php4?ESP_ID=2100&IDC_ID=854118'></script>"
  tab(3-1) = "code 3-1"  
  randomize  
  response.write tab(int rnd(3) * 3)  
  %></p>
 
ERREUR:
';)' attendu  
 
/namoweb/Inetpub/wwwroot/forum/_temp_141cff0.asp, line 22  
 
response.write tab(int rnd(3) * 3)
-----------------------^
 :??:


---------------
https://www.3000fr.com
Reply

Marsh Posté le 31-08-2002 à 23:32:53    

tabasco a écrit a écrit :

Je souffre... J'ai mis exactement ca dans une nouvelle pafe... rien d'autre et aussi erreur???
 
[i]<%  
  dim tab(3)  
  tab(0) = "<script src='http://surfplus.free.fr/surfliste/bansurf.php?id=834'></script>"  
  tab(1) = "<script language='JavaScript' src='http://www.pub-line.com/cgi-bin/gencode.pl?id=3000fr'></script>"  
  tab(2) = "<script language='JavaScript' src='http://pubsrv.allopass.com/select.php4?ESP_ID=2100&IDC_ID=854118'></script>"
  tab(3-1) = "code 3-1"  
  randomize  
  response.write tab(int rnd(3) * 3)  
  %></p>
 
ERREUR:
';)' attendu  
 
/namoweb/Inetpub/wwwroot/forum/_temp_141cff0.asp, line 22  
 
response.write tab(int rnd(3) * 3)
-----------------------^
 :??:  




 
déjà, dans le dim, met "4" et remplace "3-1" par 3 dans la dernière ligne de déclaration de ton tableau.
 
sinon, pour ligne qui plante, zarb...
 
essaie :
 
cint(rnd(10) * 4) (si tu as 4 lignes dans ton tableau)
(avec un "C" à int, car maintenant c'est une fonction et non un opérateur)


Message édité par MagicBuzz le 31-08-2002 à 23:34:37
Reply

Marsh Posté le 31-08-2002 à 23:47:57    

Bon j'arrive pas a le faire marcher pour l'instant...  
 
J'ai l'autre (le 1er avec 3 banny... ca marche.... )
change a chaque chargement de la page... des fois 2 ou 3 x de suite... mais bon....
 
Vais voir pour le 30 sec ou 1 minutes.....
Page toujours icihttp://www.3000fr.com/forum/img-general/_fl_bleu-r1.gif
 
Merci de ton aide....
 
Pour le 2emme code....
Et ca je sais pas très bien ou placer par rapport au reste...
 
 
[i]déjà, dans le dim, met "4" et remplace "3-1" par 3 dans la dernière ligne de déclaration de ton tableau.  
 
cint(rnd(10) * 4) (si tu as 4 lignes dans ton tableau)  
(avec un "C" à int, car maintenant c'est une fonction et non un opérateur)


---------------
https://www.3000fr.com
Reply

Marsh Posté le 01-09-2002 à 00:02:34    

<%    
dim tab(4)  
 tab(0) = "<script src='http://surfplus.free.fr/surfliste/bansurf.php?id=834'></script>"    
 tab(1) = "<script language='JavaScript' src='http://www.pub-line.com/cgi-bin/gencode.pl?id=3000fr'></script>"    
 tab(2) = "<script language='JavaScript' src='http://pubsrv.allopass.com/select.php4?ESP_ID=2100&IDC_ID=854118'></script>"  
tab(3) = "code 3-1"  
 randomize  
response.write tab(cint(rnd(10) * 4))  
 %>
 
En gras ce qu'il faut changer


Message édité par MagicBuzz le 01-09-2002 à 00:02:47
Reply

Marsh Posté le 01-09-2002 à 05:29:29    

Merci, oui, la ca marche... mais 1 fois sur 2, au lieu d'avoir une bannière affichée, j'ai 1) Ou rien du tout - 2) ou , écrit à la place de la bannière: code 3-1
 
Bizarre....
 
 :jap:


---------------
https://www.3000fr.com
Reply

Marsh Posté le 01-09-2002 à 05:34:02    

ben vire la ligne "code 1-3" :lol:
 
et passe 4 à 3 car t'as plus que 3 lignes ;)
 
poste voir ton script ;)

Reply

Marsh Posté le 01-09-2002 à 05:57:13    

Voui, Ca Marche.... :bounce:  :spookie: (pas mis encore dans ftp,,,
 
<%    
dim tab(3)    
tab(0) = "<script src='http://surfplus.free.fr/surfliste/bansurf.php?id=834'></script>"    
tab(1) = "<script language='JavaScript' src='http://www.pub-line.com/cgi-bin/gencode.pl?id=3000fr'></script>"    
tab(2) = "<script language='JavaScript' src='http://pubsrv.allopass.com/select.php4?ESP_ID=2100&IDC_ID=854118'></script>"  
 
randomize    
response.write tab(cint(rnd(10) * 3))    
%>
 
--------------
 
Au fait, ce genre de code--- ca va aussi???? C'est pas un script ....  je mets des ' à la place des " ?
 
<A HREF="http://www.ooads.com/cgi-bin/ads1/ads.pl?member=3000fr;banner=NonSSI;page=07" TARGET="_blank"><IMG SRC="http://www.ooads.com/cgi-bin/ads1/ads.pl?member=3000fr;page=07" WIDTH=468 HEIGHT=60 ALT="ooAds" BORDER=0></A><BR><A HREF="http://www.ooads.com" TARGET="_blank"><IMG SRC="http://www.ooads.com/images/logo/sousbande.gif" WIDTH=468 HEIGHT=12 ALT="ooAds" BORDER=0>


---------------
https://www.3000fr.com
Reply

Marsh Posté le 01-09-2002 à 06:21:40    

Bon, je teste en local, tout va bien, sauf:
 
[i]ab(3) = "<A HREF='http://www.ooads.com/cgi-bin/ads1/ads.pl?member=3000fr;banner=NonSSI;page=07' TARGET='_blank'><IMG  
SRC='http://www.ooads.com/cgi-bin/ads1/ads.pl?member=3000fr;page=07' WIDTH=468 HEIGHT=60 ALT='ooAds' BORDER=0></A><BR><A HREF='http://www.ooads.com'  
TARGET='_blank'><IMG SRC='http://www.ooads.com/images/logo/sousbande.gif' WIDTH=468 HEIGHT=12 ALT='ooAds' BORDER=0>"
 
Ca charge bien, pas de problème, mais tous les txt, lignes...etc... enfin tout ce qui est sur ma page se souligne et devient un lien pour OOADS (http://www.ooads.com/)....  Rigolo... maîs pas bien... bon... pas grave... si on peut rien faire... je supprimerais ce compte....
 
je mets en ligne...    
 
 
 


---------------
https://www.3000fr.com
Reply

Marsh Posté le 01-09-2002 à 06:41:14    

ferme le "<a>" à la fin :sarcastic:

Reply

Marsh Posté le 01-09-2002 à 09:47:53    

AAAAA  Pffftt  quel nul je suis... oui, c'est parfait  :ouch:  
 
Lequel des deux est le mieux... le 2eme...?
 
Et aussi,  
Question  sur le code, les valeurs à changer si je rajoute une ou deux ligne c'est lesquels exactements:
 
dim tab(4)
response.write tab(cint(rnd(10) * 4))  
Ces 2 la, et toujours idem le nombres de lignes?
 
<%    
dim tab(4)    
tab(0) = "<script src='http://surfplus.free.fr/surfliste/bansurf.php?id=834'></script>"    
tab(1) = "<script language='JavaScript' src='http://www.pub-line.com/cgi-bin/gencode.pl?id=3000fr'></script>"    
tab(2) = "<script language='JavaScript' src='http://pubsrv.allopass.com/select.php4?ESP_ID=2100&IDC_ID=854118'></script>"
tab(3) = "<A HREF='http://www.ooads.com/cgi-bin/ads1/ads.pl?member=3000fr;banner=NonSSI;page=07' TARGET='_blank'><IMG  
SRC='http://www.ooads.com/cgi-bin/ads1/ads.pl?member=3000fr;page=07' WIDTH=468 HEIGHT=60 ALT='ooAds' BORDER=0></A><BR><A HREF='http://www.ooads.com'  
TARGET='_blank'><IMG SRC='http://www.ooads.com/images/logo/sousbande.gif' WIDTH=468 HEIGHT=12 ALT='ooAds' BORDER=0></A>"  
randomize    
response.write tab(cint(rnd(10) * 4))    
%>


---------------
https://www.3000fr.com
Reply

Marsh Posté le 01-09-2002 à 16:12:53    

Oui.
 
Bon, c'est pas compliqué, j'ai vraiment l'impression que t'as rien compris au script :
 
dim tab(4)
=> Crée un tableau avec 4 lignes.
 
tab(0) =...
[..]
tab(3) =...
=> Le tableau commence à 0 donc son plus grand index sera n-1, soit 3
 
randomize : réinitialise le générateur de chiffres aléatoires. Toujours réinitialiser au moins une fois quand tu veux des nombre aléatoires, sinon la suite de nombres que rnd va te donner sera toujours la même.
 
rnd(x)
=> Génère un nombre aléatoire en 0 et 1 en flotant. Le "x" je ne sais pas à quoi il sert, mais il est obligatoire. Met n'importe quel numéro, 10 est pas mal.
 
cint()
=> Fonction qui converti un nombre en entier en supprimant la virgule => cint(2.9) = 2
 
cint(rnd(x) * z)
=> Génère un nombre entier compris entre 0 et z - 1
 
Voilà, maintenant, t'as plus d'excuses pourne pas comprendre ;)


Message édité par MagicBuzz le 01-09-2002 à 16:13:12
Reply

Marsh Posté le 01-09-2002 à 16:42:04    

:(  Tu as raison... c'est encore du chinois pour moi....
 
Mais ca commence à rentrer... et ca marche en rezo... demain je mets en pratique aux endroits que j'ai utilités....
 
Pour l'instant.. il y a la page provisoires...
 
Merci pour toutes tes expliquations... mais je commence l'asp et à 52 balais, pas evident.
 
Te tiens au courant quand j'ai fini...
 
(Tu as un BÔ Site....) En Asp ....J'ai vu....
Je vais venir le visiter plus en détail....
 
@@@+++ et merci.... :jap:


---------------
https://www.3000fr.com
Reply

Marsh Posté le 01-09-2002 à 17:18:49    

Le forum est là pour ça ;)
 
Sinon tu peux aussi poster sur le forum de mon site, j'y suis beaucoup plus souvent ;)
 
(je ne viens ici que quand j'ai unproblème et que j'attends une réponse ou que jem'ennuie prodigieusement :D)


Message édité par MagicBuzz le 01-09-2002 à 17:19:13
Reply

Marsh Posté le 01-09-2002 à 17:22:26    

Euhhh  j'ai un peu Honte....  Mais bon...
 
cint(rnd(x) * z)  
=> Génère un nombre entier compris entre 0 et z - 1
 
Z oui, mais je mets quoi... J'ai mis 5  :ouch:  :cry:  
 
PS: Y A t-til un bon bouquin pour l'ASP... Sais pas quoi prendre... J'ai déjà l'ASP Facile (marabout... ) Pfft nul, y rien qui concerne mon forum... etc... enfin...
 
Merci....


---------------
https://www.3000fr.com
Reply

Marsh Posté le 01-09-2002 à 17:38:15    

Tu met le nombre de lignes te ton tableau, puisqu'il va de 0 à nbLignes - 1

Reply

Marsh Posté le 01-09-2002 à 17:38:46    

donc le même nombre que ce que tu as mis dans ton dim tab(x)

Reply

Marsh Posté le 01-09-2002 à 17:43:24    

:ange: Ahhh, bon, je crois que cette fois j'ai compris.... Ouf.... Suis lent... Mais aussi Suisse  :lol:  
 
Ton site sera visité par une de mes filles  :D  
Vi, j'ai vu ton forum.... Je vais venir poster... Mais j'ai pas vu de Topic pour ce genre de discussion....  
 
Merci infiniment ...A Bientôt sur ton forum... tu me diras ou poster si j'ai un probl... :jap:  :jap:  :jap:  
 
Au fait : NESCAPE reconnait le code qu'on a fait (TU as Fais)???


---------------
https://www.3000fr.com
Reply

Marsh Posté le 01-09-2002 à 17:52:23    

Pour ce code, aucun e problème avec NetScape.
Seul la HTML peut poser problème, l'ASP est totalement interprété côté serveur, donc indépendant de la plateforme de l'utilisateur.
 
Sinon, c'est normal, tu arrives par défaut dans la catégorie "Manga" sur mon forum ;) Faut aller dans la cat "programmation" (ça marche comme ici en fait)

Reply

Marsh Posté le    

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed