最近好多人对tsys很感兴趣,其实大家不知道的是tsys的asp版本早就已经停止开发了,为了不想让如此优秀的东西被埋没所以我在tsys的asp版本的基础上使用PHP重新开发了一个功能更强的cms,名字是blackhand,这个版本保留了tsys所有的优点,另外屏蔽了tsys的缺点,还增加了诸多很棒的功能,大家如果感兴趣可以看一下.
     另外,因为tsys的asp版本就要求站长会编写asp脚本,同样的,为了灵活性所以呢这个PHP版本就要求站长会写PHP脚本,只有如此才能更灵活,才能用它去做别的cms不敢涉及或永远做不到的功能.这才是tsys的真谛!
PHP版本的tsys浏览页面:http://hi.baidu.com/see7di/blog/item/4daf1955bd555bc8b745ae93.html
PHP版本的tsys下载地址:http://download.csdn.net/source/3248406

目前TSYS最新版本为2.0beta1,而且网络上有不少TSYS加强板,这使用的是官方发布的TSYS1.1正式版,

1。建好你的页面模版。实际上就是建好一个静态的页面,页面板块,形式全是自己定义的,也就可以用TSYS建出形式各样的页面,这也是和其他一些建站系统有所区别的,举例说明:
[code]
<html>
<head>
<style>
a:link   {font:9pt/12pt 宋体, MS Song; color:red}
a:visited   {font:9pt/12pt 宋体, MS Song; color:#4e4e4e}
</style>
<meta HTTP-EQUIV="Content-Type" Content="text-html; charset=gb2312">
<title>从此长大</title>
</head>
<body bgcolor="white">
<table width="400" cellpadding="3" cellspacing="5">
<tr>
    <td id="tablePropsWidth2" width="400" colspan="2">
   <a href=http://www.31u.net>从此长大演示页面</a>
   </td>
</tr>
</table>
<table width="400" cellpadding="3" cellspacing="5">
<tr>
    <td id="tablePropsWidth2" width="400" colspan="2"><font id="LID1"
    style="COLOR: black; FONT: 9pt/12pt 宋体, MS Song"><hr color="#C0C0C0" noshade>
    <p id="LID2">请尝试以下操作:</p><ul>
      <li id="list1">如果您已经在地址栏中输入该网页的地址,请确认其拼写正确。<BR>
      </li>
      <li id="list2">打开 <script> Homepage(); </script> 主页,然后查找指向您感兴趣信息的链接。 </li>
      <li id="list3">单击<a href="javascript:history.back(1)">后退</a>按钮,尝试其他链接。 </li>   
      <li ID="list4">单击搜索,寻找 Internet 上的信息</li>
    </ul>
    <p><br>
    </p>
    <h2 id="ietext" style="font:9pt/12pt 宋体, MS Song; color:black">HTTP 404 - 未找到文件<br>
    Internet Explorer <BR>
    </h2>
    </font></td>
</tr>
</table>
</body>
</html>
[/code]

2。在需要更新的地方使用标签(标签支持中文),如上例子,我要在“单击搜索,寻找 Internet 上的信息”这个地方替换为以后的“国内新闻”这个栏目~~就可以更改为
[code]
<html>
<head>
<style>
a:link   {font:9pt/12pt 宋体, MS Song; color:red}
a:visited   {font:9pt/12pt 宋体, MS Song; color:#4e4e4e}
</style>
<meta HTTP-EQUIV="Content-Type" Content="text-html; charset=gb2312">
<title>从此长大</title>
</head>
<body bgcolor="white">
<table width="400" cellpadding="3" cellspacing="5">
<tr>
    <td id="tablePropsWidth2" width="400" colspan="2">
   <a href=http://www.31u.net>从此长大演示页面</a>
   </td>
</tr>
</table>
<table width="400" cellpadding="3" cellspacing="5">
<tr>
    <td id="tablePropsWidth2" width="400" colspan="2"><font id="LID1"
    style="COLOR: black; FONT: 9pt/12pt 宋体, MS Song"><hr color="#C0C0C0" noshade>
    <p id="LID2">请尝试以下操作:</p><ul>
      <li id="list1">如果您已经在地址栏中输入该网页的地址,请确认其拼写正确。<BR>
      </li>
      <li id="list2">打开 <script> Homepage(); </script> 主页,然后查找指向您感兴趣信息的链接。 </li>
      <li id="list3">单击<a href="javascript:history.back(1)">后退</a>按钮,尝试其他链接。 </li>   
      <li ID="list4">
<!---国内新闻:开始--->
<!---国内新闻:结束--->
</li>
    </ul>
    <p><br>
    </p>
    <h2 id="ietext" style="font:9pt/12pt 宋体, MS Song; color:black">HTTP 404 - 未找到文件<br>
    Internet Explorer <BR>
    </h2>
    </font></td>
</tr>
</table>
</body>
</html>
[/code]

3。在TSYS后台添加“国内新闻”这个频道,可以看到它有个ID号,等会用的上的

4。在Tsys\Manage\UpdateSite中有系统自带的page01.asp......等4个用于游戏演示站的更新文件~~我们选择其中一个page01.asp,修改其中的代码为
[code]
<%Option Explicit%>
<!--#include file="../Include/Config.asp" -->
<!--#include file="../Include/Tkl_SYSProedomClass.asp" -->
<!--#include file="../Include/ClassList_Fun.asp" -->
<!--#include file="../Include/CreateFile_Fun.asp" -->
<!--#include file="../Include/Tkl_StringClass.asp" -->
<!--#include file="../Include/Tkl_TemplateClass.asp" -->
<!--#Include File="../Include/OnlineClass.asp" -->
<!--#Include File="../Include/UpdateAdminTime.asp" -->
<%
'
'//本页:
'//生成index.htm首页内容
'

Dim SysAdmin
Set SysAdmin=New SYSProedom_Class
If Not CBool(SysAdmin.Logined) Then
    Response.Write "<script>top.location='login.asp'</script>"
End If

If Not SysAdmin.UpdatePage Then
    Response.Write("<script>alert(""<操作失败>\n你的权限不足"& Def_SoftCopyright_Script &""");window.history.back();</script>")
    Response.End()
End If

Call UpdateAdminTime()

Dim Conn
Set Conn = Server.CreateObject("Adodb.Connection")
    Conn.Open ConnStr

Dim StrClass
Set StrClass = New Tkl_StringClass

Select Case Request("Work")
    Case "Update01" :
        Update01()
        UpdateOk()
    Case "All" :
        Update01()
        UpdateOk()
End Select

'//更新成功提示
Function UpdateOk()
    Response.Write("<script>alert(""<操作成功>\n页面更新成功"& Def_SoftCopyright_Script &""");window.history.back();</script>")
    Response.End()
End Function

'//国内新闻
Function Update01()
    Dim TemplateFilePath
        TemplateFilePath=Server.MapPath("../../../index.htm")  
'
'//../../../index.htm
'//以上路径,名称一定要设对,否则会报错
'
    Dim TClass,strHtml
    Set TClass=New Tkl_TemplateClass
        strHtml=""
    Dim Rs,Sql
        Sql="Select Top 8 Title,FilePath,AddTime From view_NewsInfo Where Class In (34" & AllChildClass(34) & ") Order By Id DESC"
'
'//红色的部分改为刚添加频道时系统给的ID号~~
'//蓝色的部分为要显示的新闻条数~~
'

Set Rs=Conn.ExeCute(Sql)
    While Not Rs.Eof
        strHtml=strHtml&"·[" & StrClass.FormatMyDate(Rs("AddTime"),"{m}/{d}") & "]<a href=""" & Rs("FilePath") & """ target=""_blank"">" & Rs("Title") & "</a><br>" & vbCrLf
'
'//以上为自定义输出方式
'
        Rs.MoveNext
    Wend
    Rs.Close
    Set Rs=Nothing

With TClass
        .OpenTemplate(TemplateFilePath)
        .StartElement="<!---国内新闻:开始--->"
        .EndElement="<!---国内新闻:结束--->"
'
'//改为和你使用的标签一致
'
        .Value=strHtml
        .ReplaceTemplate()
        .Save()
    End With
    Set TClass=Nothing
End Function
%>
[/code]

4。OK了~~在tsys后台“资源管理”里添加文章~~因为只是用了1.1正式版演示的后台,所以在添加文章时记得选“国内新闻”,然后在“站点更新”“页面资源更新”的第一个里选择全部更新~~现在去你刚建的网页刷新下~~是不是显示了刚才的文章?~

转载于:https://www.cnblogs.com/see7di/archive/2008/04/23/2239996.html

手把手教你TSYS建站相关推荐

  1. 【项目实践】手把手教你自建高性能对象存储服务器

    以项目驱动学习,以实践检验真知 对象存储的应用范围非常广泛,小至图床.文件服务,大至大数据应用.无论是个人还是企业,搭建一个对象存储服务器都是非常有必要的. 国内许多云厂商提供了对象存储服务:阿里 O ...

  2. 你目前在用的 RSS 服务还满意吗,赶紧进来手把手教你自建一个私有的 RSS 服务器!...

    9012 年了,别的小朋友们服务器上面跑着各式各样的东西:博客.云盘.监控脚本--再看看我们那台闲(bai)置(piao)很久的阿里云 Server,里面的 Git 竟然还是 1.8 的上古版本.?? ...

  3. 直播推流神器 Kplayer 手把手教你在B站7*24h全天直播

    开始前的准备工作 Linux服务器 (1)KPlayer目前仅支持Linux环境并需要满足x86_64(amd64)与aarch64(arm64)CPU架构的硬件环境上运行,我们已经将相关依赖库静态链 ...

  4. 【建站】手把手教你域名注册(腾讯云)

    最近在学hexo建站,梳理下注册域名的步骤,以腾讯云为例,阿里云等其他大致类似. 1.登录腾讯云,点击云产品,下拉菜单选择域名管理 2.域名管理界面,点击注册域名 3.域名查询. 输入你想要域名名称, ...

  5. 【新手建站教学】如何使用成本更低的虚拟主机实现快速建站?手把手教你搭建一个属于自己的网站。

    本篇文章教大家如何使用成本更低的虚拟主机去搭建一个网站. 虚拟主机价格远低于服务器,所以选择虚拟主机建站是个非常不错的选择. 虚拟主机就是一台服务器分出来的小空间,一台虚拟机只能建一个网站,一台服务器 ...

  6. 手把手教你建站,建站其实很简单!

    链接:https://pan.baidu.com/s/1QVN8W7PgjCeXhlBlNxFc7g  提取码:af9s  里面共有四个程序,网上90%的网站都是用的这几种程序,discuz已经有3. ...

  7. 如何解析lvx文档_建站零基础入门:手把手教你如何自助建站

    使用阿里云云服务器ECS搭建网站有多种方式,本文主要介绍自助建站的流程. 建站方式 使用ECS建站的方式如下表所示.请根据实际业务需求,选择适合您的建站方式. 自助建站步骤 1.选择服务器. 不同网站 ...

  8. 建站零基础入门:手把手教你如何自助建站

    使用阿里云云服务器ECS搭建网站有多种方式,本文主要介绍自助建站的流程. 建站方式 使用ECS建站的方式如下表所示.请根据实际业务需求,选择适合您的建站方式. 自助建站步骤 1.选择服务器. 不同网站 ...

  9. 手把手教你用杰奇建小说站

    本文针对想建书站的新人,老站长可以略过了. 本人建小说站只有不到一个月的时间,中间遇到了很多问题,走了很多弯路,如果不是有很多热心的站长帮忙,我想这个站(www.kanshu3.com)还要花更多的时 ...

最新文章

  1. 第02章 PyTorch基础知识
  2. Robert Hoekman,Jr 继《一目了然》后的又一经典力作
  3. LEADTOOLS HTML5/JavaScript 实现客户端图像处理
  4. 开源 Web 应用最常见漏洞是 XSS 和 SQLI 漏洞
  5. 干 MySQL 两千万数据的大表优化解决过程,三种厉害的解决方案
  6. visio 2013下载和安装
  7. setscale方法的用法_基于BigDecimal.setScale的用法小结
  8. BNU 34974 MATLAB大法好
  9. 征信逾期花钱就能修复?小心跳进骗子的坑里面去
  10. 发一个自己写的抓包软件,支持插件化脚本分析
  11. JavaWeb项目架构之NFS文件服务器
  12. 跟我学android-Android应用基本组件介绍(五)
  13. url-pattern配置技巧
  14. mysql 垂直分表技术的实战演练,有实战代码。
  15. CCF NOI1023 最大跨度
  16. 使用VSCode开发Electron的初步入门
  17. ctfmon是什么启动项_ctfmon是什么启动项?
  18. 关闭数字健康 android 魅族,魅族手机隐私模式开启关闭使用方法详解
  19. MMORPG大型游戏设计与开发(概述)updated
  20. Eclipse的下载与安装

热门文章

  1. python 解码js escape,encodeURI
  2. 国泰煤炭运销管理系统
  3. android应用前端,Android应用开发之浅谈移动前端适配
  4. Microsoft Outlook 2019 for mac(电子邮件和日历工具) v16.45Beta中文激活版
  5. Jmeter如何进行接口测试-实操
  6. 基于Vue实现的网页音乐播放器
  7. 100000以内的质数表
  8. flex osgi实现-potomac 实现页面与页面间数据传递和页面间各部分的数据传递
  9. PDF文档一键自动生成目录和书签
  10. 对比SQL学习power bi--(2)表关联顺序!