本不想弄这个的,今天一客户应该是想升级DVBBS,还想用8.0时修改的这个功能吧,下面把修改方法发上来吧,还是和原来的8.0时的修改差不多,只不过修改的时候小心仔细点就可以了,这次没去DV官方发布,好久不用DV了,感觉去那没意思了,也不想去发贴了。


---------------------------------------------------优美的分割线------------------------------------------------------


下面来修改:

1、打开inc/upload_class.asp

找到判断文件类型:0=其它,1=图片,2=FLASH,3=音乐,4=电影

在下面的类别里添加自己想要增加的扩展名:如第三类添加"wma","wmv",第四类添加,"rm"

如改成以下这样:

如改成这样:

Private Function CheckFiletype(Byval FileExt)
  FileExt = Lcase(Replace(FileExt,".",""))
  Select Case FileExt
    Case "gif", "jpg", "jpeg","png","bmp","tif","iff"
     CheckFiletype=1
    Case "swf", "swi"
     CheckFiletype=2
    Case "mid", "wav", "mp3","rmi","cda","wma","wmv"
     CheckFiletype=3
    Case "avi", "mpg", "mpeg","ra","ram","wov","asf","rm"
     CheckFiletype=4
    Case Else
     CheckFiletype=0
  End Select
End Function

2、在Skins\Default\filetype

目录里添加与刚添加扩展名一样的图标如"wma.gif","wmv.gif","rm,gif"(用原有图标直接复制粘贴下即可)。

3、打开post_upload.asp

找到:
    If F_Type=1 then
    Response.write "<script>parent.Dvbbs_Composition.document.body.innerHTML+='[upload="&FileExt&","&F_OldName&"]"&ShwoFileName&"[/upload]<br>'</script>"
  Else
    Response.write "<script>parent.Dvbbs_Composition.document.body.innerHTML+='[upload="&FileExt&","&F_OldName&"]viewFile.asp?ID="&DownloadID&"[/upload]<br>'</script>"
  End If
在下面添加:


  If F_Type=2 then
    Response.write "<script>parent.Dvbbs_Composition.document.body.innerHTML+='[flash=480,360]"&ShwoFileName&"[/flash]<br>'</script>"
  End If
  If F_Type=3 then
    Response.write "<script>parent.Dvbbs_Composition.document.body.innerHTML+='[MP=480,68,true]"&ShwoFileName&"[/MP]<br>'</script>"
  End If
  If F_Type=4 then
    Response.write "<script>parent.Dvbbs_Composition.document.body.innerHTML+='[RM=480,360,true]"&ShwoFileName&"[/RM]<br>'</script>"
  End If

修改完成。

---------------------------------------------------优美的分割线------------------------------------------------------
分页: 1/1 第一页 1 最后页 [ 显示模式: 摘要 | 列表 ]