日韩天天综合网_野战两个奶头被亲到高潮_亚洲日韩欧美精品综合_av女人天堂污污污_视频一区**字幕无弹窗_国产亚洲欧美小视频_国内性爱精品在线免费视频_国产一级电影在线播放_日韩欧美内地福利_亚洲一二三不卡片区

  • 3.1-增加可自定義每篇新聞的文件名功能

    2006-06-16
    也許大家用系統(tǒng)做網(wǎng)站,別人一看生成的文件總是能夠找到一點(diǎn)規(guī)律.用這個(gè)東西,每次添加新聞的時(shí)候,隨便輸入一些亂七八糟的文件名稱,是不是另有一種收獲呢? 在些時(shí)候還是用得著的. 本修改適合FoosunCMS V3.1.0930, 修改前,請(qǐng)備份原文件 . 1 、先在/inc/function.asp中最后

  • 3.1-添加視頻文件,高度自定義

    2006-06-16
    找到 editer/video.asp 第47行 str1=str1 "embed src=" document.VideoForm.url.value " width=" document.VideoForm.width. value "height =" document.VideoForm.height.value " autostart=true loop=true" 改為 str1=str1 "embed src=" document.VideoForm.url.valu

  • 3.1自由標(biāo)簽建立的簡(jiǎn)單介紹

    2006-06-16
    建立自由標(biāo)簽的時(shí)候，你需要選擇調(diào)用的字段，雙擊就可以插入字段了，在下面的代碼框可以看出來(lái)，假如要取消插入，則再次雙擊字段就可以了。設(shè)置欄目的條件也一樣 以下圖片請(qǐng)點(diǎn)擊放大: screen.width-500)this.style.width=screen.width-500;" border=0> 點(diǎn)擊下一步之后

  • 3.1-增加批量設(shè)置新聞屬性功能

    2006-06-16
    實(shí)現(xiàn)功能： 1、后臺(tái)新聞列表中可以按CTRL或shift鍵批量選擇新聞，然后通過(guò)右鍵菜單來(lái)統(tǒng)一設(shè)置新聞的屬性，如推薦新聞，圖片新聞，滾動(dòng)新聞等。 2、假如是設(shè)置成圖片新聞的話，還會(huì)自動(dòng)給圖片新聞添加內(nèi)容中第一張圖為圖片新聞的顯示圖片。 3、新聞?lì)愋鸵蛔痔崾竟δ�，這

  • 3.0SP2-顯示同級(jí)欄目修改方法

    2006-06-16
    適用系統(tǒng)：3.0SP2，其它系統(tǒng)應(yīng)該類似 實(shí)現(xiàn)思想：在最終文章列表頁(yè)顯示同級(jí)的其它分類 修改文件： /Admin/Refresh/RefreshFunction.asp /Admin/Refresh/SelectFunction.asp /Editer/LableEditer.asp 添加文件：/FunPages/LableClassNavi_last.asp /Images/Lable/Navi2.g

  • 3.0SP2-實(shí)現(xiàn)公用標(biāo)簽，超簡(jiǎn)單

    2006-06-16
    適用系統(tǒng)：3.0SP2，其它系統(tǒng)應(yīng)該類似 實(shí)現(xiàn)思想：一個(gè)標(biāo)簽應(yīng)用于所有模版，自動(dòng)讀取所生成類別下（包含子類）的內(nèi)容 修改文件：Admin/Refresh/RefreshFunction.asp 實(shí)現(xiàn)方法（三行代碼解決問(wèn)題，呵呵）： 第一步、打開(kāi)Admin/Refresh/RefreshFunction.asp文件 查找 Funct

  • 風(fēng)訊系統(tǒng)自建標(biāo)簽的方法和使用

    2006-06-16
    . 在RefreshFunciton.asp文件里建立一個(gè)想要的函數(shù)，需要傳遞值的在后邊跟上，比如Function YourFunction(str1,str2,str3)，最好是帶上值哪怕沒(méi)有用，否則在首頁(yè)用時(shí)會(huì)被屏蔽掉 2. 然后到SelectFunction.asp文件里加上個(gè)Case "YourFunction" 這是因?yàn)槌绦蛞呀?jīng)將標(biāo)簽轉(zhuǎn)

  • 添加新聞時(shí)自動(dòng)添加關(guān)鍵字

    2006-06-16
    我是先做抓取新聞時(shí)自動(dòng)添加要害字后，想到手工添加新聞時(shí)也可以把這個(gè)功能用上去。所以兩段程序可以說(shuō)是完全一樣的，只是應(yīng)用的場(chǎng)所不同～ 請(qǐng)先備份： Admin/Info/NewsWords.asp 下面開(kāi)始修改： 1、打開(kāi)Admin/Info/NewsWords.asp，拉到倒數(shù)第二行（也就是%的前面），

  • 采集新聞時(shí),自動(dòng)添加關(guān)鍵字

    2006-06-16
    這段程序是 根據(jù)采集到的新聞的標(biāo)題 數(shù)據(jù)庫(kù)中現(xiàn)有的要害字 匹配 來(lái)實(shí)現(xiàn)的。只怕會(huì)不符合有些朋友的需求。請(qǐng)見(jiàn)諒了！還有，采用這段程序會(huì)相應(yīng)增加一點(diǎn)采集的時(shí)間。（我沒(méi)具體測(cè)量過(guò)，但操作中感覺(jué)不出處理時(shí)間有明顯增加） 怎么實(shí)現(xiàn)的呢：把數(shù)據(jù)表Routine中的記錄一一

  • 防止被采集的代碼

    2006-06-16
    % user_agent=Request.ServerVariables("HTTP_USER_AGENT") http_reffer=Request.ServerVariables("HTTP_REFERER") server_name=Request.ServerVariables("SERVER_NAME") '檢查當(dāng)前用戶是否是蜘蛛人 function check(user_agent) allow_agent=split("Baiduspider,Scoote

  • 標(biāo)題過(guò)長(zhǎng),在后面加上省略號(hào)

    2006-06-16
    直接修改根/inc/Function.asp中的： Function GotTopic(Str,StrLen) Dim l,t,c, i,LableStr,regEx,Match,Matches ,tLen if IsNull(Str) then GotTopic = "" Exit Function end if if Str = "" then GotTopic="" Exit Function end if Set regEx = New RegExp regEx.Pat

  • 3.1-制作強(qiáng)大的通用標(biāo)簽

    2006-06-16
    什么是通用標(biāo)簽？ 簡(jiǎn)單地說(shuō)，就是標(biāo)簽中調(diào)用標(biāo)簽 如：{FS_{FS_當(dāng)前類目}_熱點(diǎn)} 通用標(biāo)簽有什么用？ 利用通用標(biāo)簽可以讓N個(gè)類目共同調(diào)用一個(gè)模板，而顯示的內(nèi)容又各不相同。 它可以大大減少你制作模板的工作，也會(huì)給日常的維護(hù)帶來(lái)很大的方便。 通用標(biāo)簽的原理是什么？

  • 3.0Sp1刪除下載、新聞的同時(shí)，刪除遠(yuǎn)程存圖的圖片

    2006-06-16
    功能簡(jiǎn)介：刪除下載、新聞的同時(shí)，刪除遠(yuǎn)程存圖的圖片補(bǔ)丁下載：screen.width-500)this.style.width=screen.width-500;border=0>點(diǎn)擊瀏覽該文件補(bǔ)丁運(yùn)

  • 遠(yuǎn)程存圖按日期目錄存放

    2006-06-16
    本文討論區(qū)：http://bbs.foosun.net/dispbbs.asp?boardID=22ID=7958page=1 方法： 1、修改圖片新聞文件：admin/Info/NewsPic.asp A、查找： If ISavePic = "1" then INewsAddObj("Content") = ReplaceRemoteUrl(Save_Content,"/" UpFiles "/" BeyondPicDir,RsNewsConfi

  • 增加指定文件名功能

    2006-06-16
    方法：在文件Admin\Info\NewsWords.asp中 (1)在 option % if IFileExtName = "asp" then Response.Write("Selected") % value="asp"asp/option /select/td /tr 后加入代碼 tr td height="30" div align="center"font color="#FF0000"指定文件名/font/div/td td height=

  • 3.0SP1如果沒(méi)有修改下載，下載修改時(shí)間顯示的是00.00.0.，修改成添加時(shí)間

    2006-06-16
    解決方法： 在文件Admin\Info\DownLoad.asp中 在 if IDownLoadID "" then IDownObj("EditTime") = Formatdatetime(IEditTime) 后插入 else IDownObj("EditTime") = Formatdatetime(IAddTime)

  • 修改站點(diǎn)管理退出時(shí)的地址轉(zhuǎn)向

    2006-06-16
    方法：在文件Admin\loginout.asp中 把 % Session.abandon Response.Redirect "login.asp" % 改成 % dim Url if Request("UrlAddress")"" then Url = Request("UrlAddress") else Url = "login.asp" end if Session.abandon Response.Redirect Url %

  • 3.0SP1下載列表內(nèi)容簡(jiǎn)介字?jǐn)?shù)修改控制

    2006-06-16
    方法:在文件Admin\Refresh\RefreshFunction.asp中 找到函數(shù)Function GetOneDownLoadList ( 把 If len(TempStr)40 then TempStr = left(TempStr,40) "......" 中的40改成你要的數(shù)字(我的改成110) If len(TempStr)110 then TempStr = left(TempStr,110) "......"

  • 3.0SP1不讓對(duì)聯(lián)廣告浮動(dòng)

    2006-06-16
    admin/ads/Cls_Ads.asp 316行四周找到以下紅色部分刪除即可，針對(duì)其他的廣告是否會(huì)產(chǎn)生影響還不大清楚！希望大家自覺(jué)點(diǎn)倍份一下文件！修改后對(duì)聯(lián)廣告固定在上方 "document.write(' ');" vbCrLf _

  • 3.0SP1變相使用搜索做文集

    2006-06-16
    黃玲 注：這一種只適合在首頁(yè)模板中使用， 在模板里邊插入以上代碼紅色部分為文章作者。這里是利用搜索里邊的 作者要害字來(lái)處理的！ 假如不想和搜索共同用一個(gè)頁(yè)面可以復(fù)制一份搜索文件換成其他的名稱。 另外一種 個(gè)人文集注：這一種適合在新聞瀏覽頁(yè)面中使用！ 思路

風(fēng)訊Cms教程Rss訂閱Cms教程搜索