Tryabva mi mnogo prost script
12 отговора
324 прегледа
Tryabva mi mnogo prost script
Интересува ме следния въпрос - какъв трябва да е скрипта в script.pl, че да ми зарежда картинка. При това, независимо от променливата "NESHTOSI". Знам че трябва да е нещо ужас просто, ама сигурно ще ми отнеме много време да го открия.
<a href="[линк]" target="_new">
<IMG SRC="[линк]" border=0>
</a>
Благодаря за помощта!
<a href="[линк]" target="_new">
<IMG SRC="[линк]" border=0>
</a>
Благодаря за помощта!
Re: Tryabva mi mnogo prost script
Popitai v klub Perl
--
1000 кредита за всеки участник подарък -
--
1000 кредита за всеки участник подарък -
Re: Tryabva mi mnogo prost script
Oki, shte probvam da pomogna. Samo da pitam, kartinkata e e dna i syshta nezavisimo ot 'NESHTOSI' ??
--
1000 кредита за всеки участник подарък -
--
1000 кредита за всеки участник подарък -
Absolyutno
Трябва ми да зарежда една и съща картинка. Попаднах на домейн на брояч на посещения. Скриптът там е умрял, но има много връзки към този точно адрес. Това му е било УРЛ-то за брояча. Искам да сложа една картинка, която да казва на хората да се върнат на сайта и да си ъпдейтнат информацията...
Re: Tryabva mi mnogo prost script
Напиши го на PHP ето така:
asl-bg.com - шантаво като теб ;)
header('Content-type: image/jpeg');
readfile("images/img.jpg");
exit;
asl-bg.com - шантаво като теб ;)
Re: Absolyutno
<?
$imagefile=fopen("/full/path/from/root/yourimagefile.jpg","r");
Header("Content-type:image/jpeg");
fpassthru($imagefile);
fclose($imagefile);
?>
-----------------------
гърбавия ковчег ще го изправи
$imagefile=fopen("/full/path/from/root/yourimagefile.jpg","r");
Header("Content-type:image/jpeg");
fpassthru($imagefile);
fclose($imagefile);
?>
-----------------------
гърбавия ковчег ще го изправи
Re: Absolyutno
Ми аз не разбирам защо изобщо трябва да се усложняват нещата до отваряне на файл и четене...
#!usr/bin/perl
print "<p align=center><img src=kartinka.jpg></p>";
--
1000 кредита за всеки участник подарък -
#!usr/bin/perl
print "<p align=center><img src=kartinka.jpg></p>";
--
1000 кредита за всеки участник подарък -
Mersi za pomoshtta
Да си кажа честно, така и не успях да подкарам горните работи. Ама, намерих друго, което взе че проработи (след яко ?+#&&@#!, както с почти всеки cgi скрипт :)
#! /usr/bin/perl
##############################################################################
# Basic Random Image Displayer Version 1.2 #
# Copyright 1996 Matt Wright [email protected] #
# Created 7/1/95 Last Modified 7/20/95 #
# Scripts Archive at: [линк] #
##############################################################################
# COPYRIGHT NOTICE #
# Copyright 1996 Matthew M. Wright All Rights Reserved. #
# #
# Basic Random Image may be used and modified free of charge by anyone so #
# long as this copyright notice and the comments above remain intact. By #
# using this this code you agree to indemnify Matthew M. Wright from any #
# liability that might arise from it's use. #
# #
# Selling the code for this program without prior written consent is #
# expressly forbidden. In other words, please ask first before you try and #
# make money off of my program. #
# #
# Obtain permission before redistributing this software over the Internet or #
# in any other medium. In all cases copyright and header must remain intact.#
##############################################################################
# Necessary Variables
$basedir = "[линк]";
@files = ("image1.gif","image2.gif","image3.gif","image4.gif");
# Options
$uselog = 0; # 1 = YES; 0 = NO
$logfile = "/home/mattw/public_html/image/pics/piclog";
# Done
##############################################################################
srand(time ^ $$);
$num = rand(@files); # Pick a Random Number
# Print Out Header With Random Filename and Base Directory
print "Location: $basedir$files[$num]\n\n";
# Log Image
if ($uselog eq '1') {
open (LOG, ">>$logfile");
print LOG "$files[$num]\n";
close (LOG);
}
#! /usr/bin/perl
##############################################################################
# Basic Random Image Displayer Version 1.2 #
# Copyright 1996 Matt Wright [email protected] #
# Created 7/1/95 Last Modified 7/20/95 #
# Scripts Archive at: [линк] #
##############################################################################
# COPYRIGHT NOTICE #
# Copyright 1996 Matthew M. Wright All Rights Reserved. #
# #
# Basic Random Image may be used and modified free of charge by anyone so #
# long as this copyright notice and the comments above remain intact. By #
# using this this code you agree to indemnify Matthew M. Wright from any #
# liability that might arise from it's use. #
# #
# Selling the code for this program without prior written consent is #
# expressly forbidden. In other words, please ask first before you try and #
# make money off of my program. #
# #
# Obtain permission before redistributing this software over the Internet or #
# in any other medium. In all cases copyright and header must remain intact.#
##############################################################################
# Necessary Variables
$basedir = "[линк]";
@files = ("image1.gif","image2.gif","image3.gif","image4.gif");
# Options
$uselog = 0; # 1 = YES; 0 = NO
$logfile = "/home/mattw/public_html/image/pics/piclog";
# Done
##############################################################################
srand(time ^ $$);
$num = rand(@files); # Pick a Random Number
# Print Out Header With Random Filename and Base Directory
print "Location: $basedir$files[$num]\n\n";
# Log Image
if ($uselog eq '1') {
open (LOG, ">>$logfile");
print LOG "$files[$num]\n";
close (LOG);
}
Re: Tryabva mi mnogo prost script
Все пак би ли бил така добър да ни кажеш за какво ти е тва?
Защо ти е скрипт?
Май на никой не му стана ясно...
asl-bg.com - шантаво като теб ;)
Защо ти е скрипт?
Май на никой не му стана ясно...
asl-bg.com - шантаво като теб ;)
Ami...
Попаднах на домейн, който преди е бил брояч, но скрипта му е гръмнал и е зарязан.
В мрежата обаче има много места, където е нацвъкан тоя код
<a href="[линк]" target="_new">
<IMG SRC="[линк]" border=0>
</a>
и ми се искаше да пусна една картинка, дето да казва на собствениците да дойдат да си ъпдейтнат кода. Та тъй...
Нещо като reverse revival на сайт :)
Тоя скрипт дето го намерих зарежда произволна картинка от няколко възможни. Не е точно това, дето ми трябва, но важното е, че форматът е същия.
В мрежата обаче има много места, където е нацвъкан тоя код
<a href="[линк]" target="_new">
<IMG SRC="[линк]" border=0>
</a>
и ми се искаше да пусна една картинка, дето да казва на собствениците да дойдат да си ъпдейтнат кода. Та тъй...
Нещо като reverse revival на сайт :)
Тоя скрипт дето го намерих зарежда произволна картинка от няколко възможни. Не е точно това, дето ми трябва, но важното е, че форматът е същия.
Re: Mersi za pomoshtta
Dobre dokolkoto vijdam tozi script ti dava proizvolno izbrana kartinka a na teb ti trqbva edna opredelena taka li?I do kolkoto razbiram imash dostyp do nqkakva
/cgi-bin direktoriq i dyrjish to4no ot script,koito se namira tam da se otvarq kartinkata?Zashtoto ako e taka prosto 98% ot koda dolu e izlishen(da ne kaja 100%
)Ne moje da ne stane sas :
#!/usr/bin/perl
print "Content-type: image/jpeg\n\n";
print "[линк]";
Vse pak logi4no e da mahnesh si4ko izlishno dolu i da ostavish samo edna kartinka.Dori i da ne razbirash ot Perl.
/cgi-bin direktoriq i dyrjish to4no ot script,koito se namira tam da se otvarq kartinkata?Zashtoto ako e taka prosto 98% ot koda dolu e izlishen(da ne kaja 100%
#!/usr/bin/perl
print "Content-type: image/jpeg\n\n";
print "[линк]";
Vse pak logi4no e da mahnesh si4ko izlishno dolu i da ostavish samo edna kartinka.Dori i da ne razbirash ot Perl.
Prav si
И аз мислих по въпроса да пусна ножиците и да поорежа. Идеята да сложа няколко картинки, които да се въртят обаче ми допадна. Все пак, трябва да хвана вниманието на собственика на сайта, който преди си е сложил брояч. Та, малко допълителна функционалност би била полезна...
Иначе, за останалото си напълно прав
Иначе, за останалото си напълно прав