当前位置:首页 » 操作系统 » 图片系统源码

图片系统源码

发布时间: 2022-08-09 15:08:19

❶ 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系统相册源码怎么查看

把扫描内存卡的功能关掉,自带的图片浏览就看不到卡内的图片了。然后就用下面的办法了,建个文件夹,把重要的图片放入其中,不想让别人看的话,把文件夹隐藏了,或者用个加密软件加密了。

热点内容
停车场管理系统c语言 发布:2025-01-16 09:02:35 浏览:437
学校宣传片拍摄脚本 发布:2025-01-16 09:00:50 浏览:155
ubuntuphpmcrypt 发布:2025-01-16 08:26:46 浏览:429
安卓图片如何添加苹果的水墨印 发布:2025-01-16 08:18:12 浏览:731
fmp脚本 发布:2025-01-16 08:12:23 浏览:231
nagios自定义脚本 发布:2025-01-16 08:09:52 浏览:365
安卓为什么下不了方舟生存进化 发布:2025-01-16 08:02:32 浏览:195
如何登录男朋友的微信密码 发布:2025-01-16 07:41:14 浏览:194
宝骏解压流程 发布:2025-01-16 07:35:35 浏览:2
两匹压缩机多少钱 发布:2025-01-16 07:29:19 浏览:635