手机发送代码投放参考之新云网站管理系统

本次示例版本为v3.0.0.928,其他版本可参考修改。

1.准备工作

·站长的联盟ID;
·站点LOGO地址;
·后台管理帐号以便修改模板文件(后台默认地址http://www.mzwu.com/admin/admin_login.asp);
·inc/cls_main.asp,修改预览图代码,如果站点资源没有预览图可不要此文件

2.修改步骤

修改之前得查看"软件频道模板管理→下载信息页面模板→修改模板基本设置→26、是否新开下载页面"的值,下边的修改步骤会因为这个值的不同而有所不同。当是否新开下载页面的值为0时采用方法一进行,当值为1时采用方法二进行。

方法一:

①打开"软件频道模板管理→下载信息页面模板→修改模板基本设置→21、显示下载地址",修改如下(红色新增):
<img src="{$InstallDir}{$SkinPath}icon_downloadserver.gif" border="0" /> <a href="{$DownLoadUrl}" class="downLinks" target="_blank" name="unionsoftlinks">{$DownLoadName}</a><br />

②打开"软件频道模板管理→下载信息页面模板→编辑模板界面风格",找到"{$DownAddress}",在其前面增加下边代码:
<script language="JavaScript" type="text/JavaScript">
<!--
//悟空网盟(union.5k3g.com)手机发送代码
function mms()
{
    var uid = "";//联盟ID
    var resName = "{$SoftName}";//资源名称
    var fileUrl = GetDownloadUrl();//资源地址
    var imgUrl = "";//资源图片,没有直接用站点LOGO地址
    
    window.open("http://code.5k3g.com/tl/picDIY/Sendgame.aspx?uid="+uid+"&title="+escape(resName)+"&fileurl="+escape(fileUrl)+"&imgurl="+escape(imgUrl),"unionwin","width=450,height=400");
    return false;
}

function GetDownloadUrl()
{
    return document.getElementsByName("unionsoftlinks")[0].href;
}

function GetDownloadImg()
{
    return document.getElementsByName("unionsoftimg")[0].href;
}
//-->
</script>
<img src="{$InstallDir}{$SkinPath}icon_downloadserver.gif" border="0" /> <a href="javascript:;" onClick="return mms();" style='color:'>发送到手机</a><br/>

方法二:
①打开"软件频道模板管理→软件下载页面模板→修改模板基本设置→3、显示下载地址",修改如下(红色新增):
<img src="{$InstallDir}{$SkinPath}icon_downloadserver.gif" border="0" /> <a href="{$DownLoadUrl}" class="downLinks" target="_blank" name="unionsoftlinks">{$DownLoadName}</a><br />

②打开"软件频道模板管理→软件下载页面模板→编辑模板界面风格",找到"{$ShowDownAddress}",在其前面增加下边代码:
<script language="JavaScript" type="text/JavaScript">
<!--
//悟空网盟(union.5k3g.com)手机发送代码
function mms()
{
    var uid = "";//联盟ID
    var resName = "{$PageTitle}";//资源名称
    var fileUrl = GetDownloadUrl();//资源地址
    var imgUrl = "";//资源图片,没有直接用站点LOGO地址
    
    window.open("http://code.5k3g.com/tl/picDIY/Sendgame.aspx?uid="+uid+"&title="+escape(resName)+"&fileurl="+escape(fileUrl)+"&imgurl="+escape(imgUrl),"unionwin","width=450,height=400");
    return false;
}

function GetDownloadUrl()
{
    return document.getElementsByName("unionsoftlinks")[0].href;
}

function GetDownloadImg()
{
    return document.getElementsByName("unionsoftimg")[0].href;
}
//-->
</script>
<img src="{$InstallDir}{$SkinPath}icon_downloadserver.gif" border="0" /> <a href="javascript:;" onClick="return mms();" style='color:'>发送到手机</a><br/>

资源图片参数(imgUrl)设置说明:
如果站点资源有预览图时需修改cls_main.asp中的GetFlashAndPic函数,修改如下(红色新增):
Function GetFlashAndPic(ByVal url, ByVal height, ByVal width)
    Dim sExtName, ExtName, strTemp
    Dim strHeight, strWidth
    
    If Not IsNumeric(height) or height < 1 Then
        strHeight = ""
    Else
        strHeight = " height=""" & height & """"
    End If
    If Not IsNumeric(width) or width < 1 Then
        strWidth = ""
    Else
        strWidth = " width=""" & width & """"
    End If
    sExtName = Split(url, ".")
    ExtName = sExtName(UBound(sExtName))
    If LCase(ExtName) = "swf" Then
        strTemp = "<embed src=""" & url & """" & strWidth & strHeight & "/>"
    Else
        strTemp = "<img src=""" & url & """" & strWidth & strHeight & " border=""0""  name=""unionsoftimg"" />"
    End If
    GetFlashAndPic = strTemp
End Function

然后设置imgUrl = GetDownloadImg();
如果站点资源没有预览图则直接把LOGO地址赋值给imgUrl。

3.检查结果

在页面(静态页修改后得重新生成)上点击"发送到手机",在弹出的窗口中用右键点击空白部分选择属性,并复制出地址,应和下边地址类似:

http://code.5k3g.com/tl/picDIY/Sendgame.aspx?uid=10009&title=aa&fileurl=http%3A//www.mzwu.com/ebook/aa.rar&imgurl=http://www.mzwu.com/images/logo.gif

主要看下uid是否正确,fileurl必须为绝对地址并且可以直接下载到资源(不能有防盗链、要求安装迅雷、快车等)!

评论: 0 | 引用: 0 | 查看次数: 4420
发表评论
登录后再发表评论!