| 以下內(nèi)容為程序代碼: Do While Not rsField.EOF Dim vtempStr vtempStr = rsSoft(Trim(rsField("FieldName"))) If Instr(vtempStr, "FlvUrl") > 0 Then vtempStr = Replace(vtempStr, "&", "$thand$") strHtml = PE_Replace(strHtml, rsField("LabelName"), PE_HTMLEncode(vtempStr)) rsField.MoveNext Loop |
www.cmsxx.com,http://%77%77%77.cmsxx.com
這樣我們的Request.QueryString("flashUrl")就可以得到完整的flash地址了,我們在使用它之前再把“$thand$”替換成“&”,放到flash嵌入代碼的"Movie"參數(shù)值里。
測試結(jié)果:效果很好,內(nèi)嵌的flash播放器就是vlog提供的具有全屏、隨意拖動、隨意變換電影風(fēng)格、可控制進(jìn)度、可暫停、可調(diào)音量的flash播放器。視頻源地址依然是隱藏(對大多數(shù)訪問者而言)。
附1:還有另外一個(gè)問題——視頻縮略圖如果添加外部地址,還是會在前面被加上主站縮略圖上傳路徑的URL。添加外部URL地址如果不是以http開頭的,也一樣會被加上。而縮略圖地址即使以http開頭,仍然會被加上。建議這里加一個(gè)判斷,如果以“http://”打頭的,就不要再引用完整的上傳路徑了。 附2:如果你是自己管理,那么有更簡單的方式,添加視頻地址的時(shí)候把“$$$”改成“$$”,在ShowDownload.asp里再把它替換回去就行了。我是為了讓編輯的添加工作簡化,所以才把復(fù)雜的事情交給程序員來做。
新聞熱點(diǎn)
疑難解答
圖片精選