MOD:Watch youtube video,see pictures,download them
Printed From: Web Wiz Forums
Category: Web Wiz Web App Support Forums
Forum Name: Web Wiz Forums Modifications
Forum Description: Mod's and Add-on's for Web Wiz Forums.
URL: https://forums.webwiz.net/forum_posts.asp?TID=24717
Printed Date: 28 March 2026 at 10:32pm
Software Version: Web Wiz Forums 12.08 - https://www.webwizforums.com
Topic: MOD:Watch youtube video,see pictures,download them
Posted By: edizz
Subject: MOD:Watch youtube video,see pictures,download them
Date Posted: 30 October 2007 at 1:15pm
|
Watch youtube videos,see their pictures and download them
İf you use web wiz forums 8.x you can read my http://forums.webwiz.net/forum_posts.asp?TID=23575 - youtube video for 8.x topic
For 9.x
1-you must edit functions/functions_format_post.asp
before %> add this code
function youtube(strMessage)
do while inStr(1,strMessage,"[tube]",1)>0
Dim tube_bas,tube_son,adres,kod
tube_bas=inStr(1,strMessage,"[tube]",1)
tube_son=instr(tube_bas,strMessage,"[/tube]",1)
adres=duzenle(mid(strMessage,tube_bas+6,tube_son-tube_bas-6))
kod="<br><object width=""425"" height=""350"">"
kod=kod&"<param name=""movie"" value=""http://www.youtube.com/v/sLNZ0QuNtmg""></param>"
kod=kod&"<param name=""wmode"" value=""transparent""></param>"
kod=kod&"<embed src=""http://www.youtube.com/v/"&adres&""" type=""application/x-shockwave-flash"" wmode=""transparent"" width=""425"" height=""350""></embed></object>"
kod=kod&"<br><img height=""100"" src=""http://img.youtube.com/vi/"&adres&"/1.jpg"" width=122><img height=""100"" src=""http://img.youtube.com/vi/"&adres&"/2.jpg"" width=""122""><img height=""100"" src=""http://img.youtube.com/vi/"&adres&"/3.jpg"" width=""122""><br>"
kod=kod&"<a target=""_blank"" href=""http://www.izletin.com/video_indir.asp?adres=http://www.youtube.com/watch?v="&adres&""">Download this video</a><br>"
strMessage=replace(strMessage,mid(strMessage,tube_bas,tube_son-tube_bas+7),kod)
loop
youtube=strMessage
end function
function duzenle(adres)
dim baslangic,karakter,kod
baslangic=instr(adres,"=")+1
karakter=instr(baslangic,adres,"&")
if karakter>0 then
kod=mid(adres,baslangic,karakter-baslangic)
else
kod=mid(adres,baslangic)
end if
duzenle=trim(kod)
End Function
|
2-you must edit forums_posts.asp
Delete this line
If InStr(1, strMessage, "[TUBE]", 1) > 0 AND InStr(1, strMessage, "[/TUBE]", 1) > 0 Then strMessage = formatYouTube(strMessage)
|
and add this code there
if inStr(1,strMessage,"[TUBE]",1)>0 and inStr(1,strMessage,"[/TUBE]",1)>0 then strMessage=youtube(strMessage)
|
-------------
http://www.forumselcuk.com" rel="nofollow - selçuk forum
|
Replies:
Posted By: Scotty32
Date Posted: 30 October 2007 at 10:04pm
umm Web Wiz Forum V9 actually comes WITH a youtube tag (click BBCodes below)
-------------
S2H.co.uk - http://www.s2h.co.uk/wwf/" rel="nofollow - WebWiz Mods and Skins
For support on my mods + skins, please use http://www.s2h.co.uk/forum/" rel="nofollow - my forum .
|
Posted By: edizz
Date Posted: 04 February 2008 at 10:13am
|
but this shows 3 picture under the video and includes download link
for example http://www.forumselcuk.com/forum/forum_posts.asp?TID=18308 - http://www.forumselcuk.com/forum/forum_posts.asp?TID=18308
-------------
http://www.forumselcuk.com" rel="nofollow - selçuk forum
|
|