圖片系統源碼
❶ asp圖片管理系統
'功能:按照指定圖片生成縮略圖
'注意:以下提到的「路徑」都是值相對於調用本函數的文件的相對路徑
'參數:
'    s_OriginalPath:        原圖片路徑 例:images/image1.gif
'    s_BuildBasePath:    生成圖片的基路徑,不論是否以「/」結尾均可 例:images或images/
'    n_MaxWidth:            生成圖片最大寬度
'                        如果在前台顯示的縮略圖是 100*100,這里 n_MaxWidth=100,n_MaxHeight=100.
'    n_MaxHeight:        生成圖片最大高度
'返回值:
'    返回生成後的縮略圖的路徑
'錯誤處理:
'    如果函數執行過程中出現錯誤,將返回錯誤代碼,錯誤代碼以 「Error」開頭
'        Error_01:創建AspJpeg組件失敗,沒有正確安裝注冊該組件
'        Error_02:原圖片不存在,檢查s_OriginalPath參數傳入值
'        Error_03:縮略圖存檔失敗.可能原因:縮略圖保存基地址不存在,檢查s_OriginalPath參數傳入值;對目錄沒有寫許可權;磁碟空間不足
'        Error_Other:未知錯誤
'調用例子:
'    Dim sSmallPath '縮略圖路徑
'    sSmallPath = BuildSmallPic("images/image1.gif", "images", 100, 100)   
'================================================================
Function BuildSmallPic(s_OriginalPath, fileex,s_BuildBasePath, n_MaxWidth, n_MaxHeight)
    Err.Clear
    On Error Resume Next
   
    '檢查組件是否已經注冊
    Dim AspJpeg
    Set AspJpeg = Server.Createobject("Persits.Jpeg")
    If Err.Number <> 0 Then
        Err.Clear
        BuildSmallPic = "Error_01"
        Exit Function
    End If    '檢查原圖片是否存在
    Dim s_MapOriginalPath
    s_MapOriginalPath = Server.MapPath(s_OriginalPath)
    AspJpeg.Open s_MapOriginalPath '打開原圖片
    If Err.Number <> 0 Then
        Err.Clear
        BuildSmallPic = "Error_02"
        Exit Function
    End If    '按比例取得縮略圖寬度和高度
    Dim n_OriginalWidth, n_OriginalHeight '原圖片寬度、高度
    Dim n_BuildWidth, n_BuildHeight '縮略圖寬度、高度
    Dim div1, div2
    Dim n1, n2
    n_OriginalWidth = AspJpeg.Width
    n_OriginalHeight = AspJpeg.Height
    div1 = n_OriginalWidth / n_OriginalHeight
    div2 = n_OriginalHeight / n_OriginalWidth
    n1 = 0
    n2 = 0
    If n_OriginalWidth > n_MaxWidth Then
        n1 = n_OriginalWidth / n_MaxWidth
    Else
        n_BuildWidth = n_OriginalWidth
    End If
    If n_OriginalHeight > n_MaxHeight Then
        n2 = n_OriginalHeight / n_MaxHeight
    Else
        n_BuildHeight = n_OriginalHeight
    End If
    If n1 <> 0 Or n2 <> 0 Then
        If n1 > n2 Then
            n_BuildWidth = n_MaxWidth
            n_BuildHeight = n_MaxWidth * div2
        Else
            n_BuildWidth = n_MaxHeight * div1
            n_BuildHeight = n_MaxHeight
        End If
    End If    '指定寬度和高度生成
    AspJpeg.Width = n_BuildWidth
    AspJpeg.Height = n_BuildHeight
   
    '--將縮略圖存檔開始--
    Dim pos, s_OriginalFileName, s_OriginalFileExt '位置、原文件名、原文件擴展名
    pos = InStrRev(s_OriginalPath, "/") + 1
    s_OriginalFileName = Mid(s_OriginalPath, pos)
    pos = InStrRev(s_OriginalFileName, ".")
    s_OriginalFileExt = Mid(s_OriginalFileName, pos)    Dim s_MapBuildBasePath, s_MapBuildPath, s_BuildFileName '縮略圖絕對路徑、縮略圖文件名
    Dim s_EndFlag '小圖片文件名結尾標識 例: 如果大圖片文件名是「image1.gif」,結尾標識是「_small」,那麼小圖片文件名就是「image1_small.gif」
    If Right(s_BuildBasePath, 1) <> "/" Then s_BuildBasePath = s_BuildBasePath & "/"
    s_MapBuildBasePath = Server.MapPath(s_BuildBasePath)
    s_EndFlag = fileex '可以自定義,只要能區別大小圖片即可
    s_BuildFileName = Replace(s_OriginalFileName, s_OriginalFileExt, "") & s_EndFlag & s_OriginalFileExt
    s_MapBuildPath = s_MapBuildBasePath & "\" & s_BuildFileName
   
    AspJpeg.Save s_MapBuildPath '保存
    If Err.Number <> 0 Then
        Err.Clear
        BuildSmallPic = "Error_03"
        Exit Function
    End If
    '--將縮略圖存檔結束--    '注銷實例
    Set AspJpeg = Nothing
    If Err.Number <> 0 Then
        BuildSmallPic = "Error_Other"
        Err.Clear
    End If
    BuildSmallPic = s_BuildBasePath & s_BuildFileName
End Function
❷ 圖片+新聞 系統源碼
6 |易 |我們可以為你提供一份針對你的題目的適用於初學者的代碼
5 |軟 |如有進一步需求,請我們聯系,
7 |科 |告訴我你的問題和Email,
1 |技 |有時間可以幫你,絕對救急,
5 |為 |請到個人資料里查看QQ,或見每行開頭
6 |您 |或者使用網路Hi給我留言
1 |提 |陪你順利畢業,
5 |供 |此回復針對所有來訪者和需求者有效,帶著你的Email和問題來找我
❸ 求一個圖片管理系統或開源相冊,支持無限分類和tag標簽
推薦使用Gallery,是一個專業的圖片管理軟體。。。
相關介紹:
Gallery是一款基於WEB的軟體。它使得你可以對自己網站中的相片進行管理。你的網站必須有PHP和資料庫的支持來安裝和使用Gallery。通過使用Gallery,你能輕松地在一個直觀的界面中創建和維護相冊。相片管理包括縮略圖的自動創建,圖像尺寸重設,旋轉,排序,字幕及搜索等。相冊和相片可以進行查看和刪除。通過身份驗證的用戶還可以擁有其他的許可權,從而獲取額外的隱私保護。它具有很好的社群向 - 將帳號分配給你的朋友與家人。然後他們就可以在你的網站里上傳和管理自己的相片了。
❹ PHP相冊系統怎麼實現
首先你需要做一個相冊的資料庫表
create table XX(
int id not null prima...忘了 反正是防止重復的屬性  ,因為ID是作為索引用的。
name varchar(100),    相冊名字
pass varchar(100),   相冊密碼
attribute varchar(5)  相冊屬性
)
首先,用mysql連接進入這 成功則可以進入相冊,其實這些包括許可權判斷等,你可以增加更多的屬性
在建一個資料庫作為相片的存儲
create table XX(
int id not null prima...  同樣
name varchar(100),        同樣
pass varchar(100),       同樣
attribute varchar(5),     同樣
imglink varchar(100),     圖片存儲位置
small varchar(100),      縮略圖存儲位置
bak varchar(300)          圖片注釋
)
屬性都可以添加  我只是給你舉個例子
 要相冊系統的話  我也可以給個類似的例子的源碼給你。
❺ 求一個圖片展示的網站源碼或程序,要支持分類瀏覽
以前下了個用織夢做的圖片站程序挺簡潔的效果如圖要的話留個郵箱我把模板文件發你DEDECMSV5.3版本

❻ 求圖片站源碼,要可以生成靜態的
InterPhoto
圖片網站系統(相冊網站系統)是一個功能強大,
使用簡單,
專業型的多用戶圖片網站管理系統.
可用於建設以展示
圖片為主要目的的網站,
如:
設計公司,
時裝公司,
展覽展示公司,
攝影圖片,
創意圖片,
繪畫圖片等等類型的網站. 
摘自其主站。
你可以看下我以前用過。還行。可以生成靜態……
❼ 誰有圖片網站的源碼,來幫下小弟。類似http://www.quanjing.com/ 全景網這樣子的就可以
很多CMS都可以做到:pageadmin cms、discha都是不錯的、簡單、方便,直接!
❽ 誰曉得美空MP會員 後台的圖片管理系統 網上有類型的源碼下載不
我們用這個系統很多年了,推薦給樓主。
【立友信MyCRM】客戶關系管理軟體——動靜結合的客戶管理 
廣義客戶管理:直銷客戶、渠道夥伴、供應商、其它機構/個人、客戶聯系人
信息完整深入:360度記錄與呈現客戶的靜態信息與動態信息
多維分類查詢:按當前業務狀態分類列表客戶菜單 
自助查詢條件:每個操作員用戶可定義自己常用的客戶數據查詢條件和任意組合的臨時查詢條件組合 
數據分析挖掘:支持用戶按自定義的區域、類型、行業等多維度統計分析客戶構成;基於完善的客戶數據全方位精準挖掘商機
特色應用功能:客戶人脈關系圖、客戶聯系人決策樹、聯系人跳槽跟蹤、客戶數據查重與合並、客戶來電彈屏。樓主有興趣可以網路搜索立友信。
❾ 求android的圖片管理瀏覽功能的源碼,要系統自帶的那種,有相冊分類的,有的能給發一個嗎
快圖瀏覽 ,已發
❿ android系統相冊源碼怎麼查看
把掃描內存卡的功能關掉,自帶的圖片瀏覽就看不到卡內的圖片了。然後就用下面的辦法了,建個文件夾,把重要的圖片放入其中,不想讓別人看的話,把文件夾隱藏了,或者用個加密軟體加密了。
