远程发布插件发布(在版本3.1.112的上测试过)没有任何问题
需求:远程发布。本地管理,没有任何安全隐患,或者多站点部署
试用范围:对安全性要求比较高,而且不想把后台放到服务器上的用户
功能:能够通过设置远程服务器ftp的地址和用户来选择不同的站点。
进行本地或者远程发布站点
比方。你的网站是www.aaa.com 。网站服务器的ip地址是
202.111.2.23 。你的ftp用户是 aaa,密码是 1234
那么你在本机上把风迅网站配置好。通过在本地添加新闻。同步的
就可以在服务器上生成相关内容
操作步骤和相关说名
原理:把站点生成的东西。通过ftp协议传输到指定的站点。与其生成完以后再通过ftp上传省略一个步骤。同时减少对ftp工具的依赖,实现动态更新。因为asp不像php那样直接有ftp函数支持,所以必需利用组建来完成。这里借鉴了国外大师写的一个免费ftp组建(vb)写的。修改了一下提供给大家(最后有列表)。因为在本地发布。所以不存在不能用组建问题,本机上总可以注册组建吧。
风迅新闻的两个生成步骤主要集中在
\Foosun\Admin\Refresh\Function.asp 中的两个过程
sub FSOSaveFile(生成文件) 和Sub CheckFolderExists(生成目录)
1:sub FSOSaveFile 中77行
'add by zxw ftp component up file
if IsRemote = 1 then
Dim objFTP ,TRANSFER_TYPE_ASCII
Set objFTP = Server.CreateObject("NIBLACK.ASPFTP")
objFTP.sServerName = FtpIp
objFTP.sUserID = FtpUser
objFTP.sPassword = FtpPass
objFTP.sPort = FtpPort
If objFTP.bConnect Then
TRANSFER_TYPE_ASCII = 1
objFTP.lTransferType = TRANSFER_TYPE_ASCII
call objFTP.bPutFile(Server.MapPath(LocalFileName), LocalFileName)
else
response.write "ftp服务器配置不对或者ftp服务器没有打开"
response.end
end if
set objFTP = Nothing
end if
'add by zxw end
2:Sub CheckFolderExists 举个例子
'add by zxw ftp component init
if IsRemote = 1 then
Dim objFTP
Set objFTP = Server.CreateObject("NIBLACK.ASPFTP")
objFTP.sServerName = FtpIp
objFTP.sUserID = FtpUser
objFTP.sPassword = FtpPass
objFTP.sPort = FtpPort
If not objFTP.bConnect Then
set objFTP = Nothing
response.write "ftp服务器配置不对或者ftp服务器没有打开"
response.end
end if
end if
'add by zxw init end
Dim FSOObj,TempPath,FolderObj,FileObj,ItemObj,FtpDir,FtpDateDir
Dim DateDirChar,FtpDateDirChar
Set FSOObj = Server.CreateObject(G_FS_FSO)
TempPath = Server.MapPath(Path)
'add by zxw ftppath
if IsRemote = 1 then
FtpDir = Path
If not objFTP.bSetCurrentDir(FtpDir) Then
response.write TempPath & "----"&FtpDir&"1<hr>"
objFTP.bMakeDir(FtpDir)
end if
end if
'add by zxw end
这个文件再最后我将提供
3:
Const.asp里面加入全局配置
Const FtpIp ="192.168.0.123" ‘远程发布的ip地址’
Const FtpUser = "aaaa"
Const FtpPass = "123"
Const FtpPort = "2121"
Const IsRemote = 1
'是否使用远程发布1使用。0不使用
4:本机上注册组建
5:完善。因为考虑现在只解决了html目录下的发布和生成问题。图片或者js这块没有解决。其实实现方法和上述原理一样。现在已经能够看到远程发布没有图片的新闻的完整样子了。如果有图片必需在Foosun\FunPages
里面的FolderImageList.asp和UpFileSave.asp 里面在相应位置添加上述参考代码
里面还有一些需要进一步完善的地方。希望网友一起来完善一下。这里我只是因为项目需要。把基本需求给实现了。作为一个真正的远程发布站点。里面还是需要进一步细化的。在加上必需用组建来完成。所以还是有些局限。但是这个跟asp本身语言特点是有关联的
提供完整function.asp文件和ftp组建源文件和dll组建
function.asp文件[upload=rar]viewFile.asp?ID=3534[/upload]
ftp组建和dll文件
[upload=rar]viewFile.asp?ID=3535[/upload]
有什么疑问和建议可以联系qq:645026267
恩再说明一下步骤
1:注册组建 下载包里面的
aspftp_zxw.dll 加入了端口号的功能
aspftp.dll这个没有端口号的功能
regsvr32 aspftp_zxw.dll 当然你也可以修改源代码然后生成自己的dll注册
下载包里面有演示怎么用相关功能
2:在inc/const.asp 中加入相关全局配置
Const FtpIp ="192.168.0.123" ‘远程发布的ip地址’
Const FtpUser = "aaaa"
Const FtpPass = "123"
Const FtpPort = "2121"
Const IsRemote = 1 '是否使用远程发布1使用。0不使用
这些参数应该根据自己实际的情况设置。你测试必需远程的ftp服务要开。而且配置要对
其实装个serv-u。然后本地测试也可以,增加一个ip 然后往新增ip上发布
3:把function覆盖Foosun\Admin\Refresh\Function.asp
4:你远程服务器的配置也要相应配置好。其实也就是网站域名或者ip,还有就是目录名以及目录文档
5:然后添加栏目。发布新闻。试试
没有合适的资源?快使用搜索试试~ 我知道了~
温馨提示
原理:把站点生成的东西。通过ftp协议传输到指定的站点。与其生成完以后再通过ftp上传省略一个步骤。同时减少对ftp工具的依赖,实现动态更新。因为asp不像php那样直接有ftp函数支持,所以必需利用组建来完成。这里借鉴了国外大师写的一个免费ftp组建(vb)写的。修改了一下提供给大家(最后有列表)。因为在本地发布。所以不存在不能用组建问题,本机上总可以注册组建吧。
资源推荐
资源详情
资源评论
收起资源包目录
AspFtp.rar (47个子文件)
AspFtp
AspFtp.dll组件功能补充.txt 844B
Asp免费FTP组件的用法.files
level12.gif 1014B
blank.gif 43B
reanc.gif 217B
OfFeMale.gif 613B
newanc.gif 283B
sx8s.gif 118B
0081.gif 2KB
level9.gif 891B
sx11s.gif 103B
z4.gif 610B
newpoll.gif 203B
null(1).gif 43B
style0.css 5KB
re.gif 621B
0216.gif 3KB
level11.gif 1006B
z2.gif 386B
171143s.jpg 9KB
level16.gif 1004B
signature.gif 162B
banner17.gif 5KB
leadcode.js 40KB
null.gif 43B
home.gif 357B
c.htm 2KB
MINI.gif 68B
message.gif 377B
LeadBBS.gif 2KB
menu.js 2KB
z12.gif 608B
level4.gif 970B
face15.gif 685B
sx9s.gif 102B
sx1s.gif 96B
NULL(2).gif 43B
down.gif 85B
OfMale.gif 621B
002848.gif 4KB
174639.jpg 6KB
RSS.gif 64B
face0.gif 699B
z8.gif 390B
3441.rar 11KB
Asp免费FTP组件的用法.htm 126KB
远程发布插件.txt 5KB
3442.rar 76KB
共 47 条
- 1
骑猪行钢线
- 粉丝: 7
- 资源: 16
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
最新资源
- mmexport1713192608513.mp4
- 斯特林V4发动机 斯特林V4发动机
- 基于C实现的N阶数字正方形 ;N阶数字三角形;N阶数字递减三角形;乘法表
- 基于分水岭算法的图像分割的python源码(课程设计).zip
- 基于Java 实现的二进制十进制之间的相互转换
- Pytorch实现基于卷积神经网络的面部表情识别项目源码+数据集+全部资料(毕业设计).zip
- Pytorch实现基于深度学习卷积神经网络的面部表情识别项目源码+面部表情数据集(人脸面部表情识别项目).zip
- 淘金小游戏助手.apk
- 基于卷积神经网络的人脸面部表情识别项目源码+面部表情数据集+训练好的模型(人脸面部表情识别项目).zip
- 深度学习基于卷积神经网络的人脸面部表情识别项目源码+面部表情数据集+训练好的模型(人脸面部表情识别项目).zip
资源上传下载、课程学习等过程中有任何疑问或建议,欢迎提出宝贵意见哦~我们会及时处理!
点击此处反馈
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功
- 1
- 2
- 3
前往页