asp视频发布网站源码_asp下载源码

文章目录：

• 1、网上下载了ASp网站源代码，现在要将其发布到网上，请问怎么办？
• 2、如何用开发一套完整的ASP网站源码
• 3、推荐几个学制作网页的网站,用ASP+ACCESS的那种,有经验的才说
• 4、ASP 新闻发布系统 源代码以及如何使用
• 5、asp网站源代码

网上下载了ASp网站源代码，现在要将其发布到网上，请问怎么办？

把这个文件夹改名，这个文件夹一般是独立的，越复杂越好不要用常用的名字。

数据库也要改名，尽量复杂点，改数据库的话，一般改conn里面相应的数据库名就可以了。

如何用开发一套完整的ASP网站源码

从你问的问题来看,你对asp编程还不太熟悉.

其实说一切都没有用,只有你用asp去做几个直正的网站后,你就明白了.不管你前期做出的网站的质量有多不好,但你会发现问题,然后你就会自然的去想解决这些问题,一旦解决这些问题,说明你的技术就更进一步了!当你解决了许多问题后,你就是高手了!

推荐几个学制作网页的网站,用ASP+ACCESS的那种,有经验的才说

只会DW，不懂编程，建议不要直接看购物车，系统太大。

基实可以通过ASP+ACC的留言本，新闻发布，产品发布一类的例子看起。最主要的是先做程序员，做程序员就是跟什么什么系统暂时无关的，只考虑功能模块的实现。

推荐去ASP3000这样的网站下载源代码看看。

去xunlei用关键字"

ASP

视频

"

这样的关键字下载些东东。

还用，ASP是用VBS做的吗？

ASP 新闻发布系统 源代码以及如何使用

!doctype html public "-/w3c/dtd html 4.01 transitional/en"

""

html

head

titleuntitled document/title

meta http-equiv="content-type" content="text/html; charset=gb2312"

/head

body

table width="770" border="0" align="center" cellpadding="0" cellspacing="0"

tr

tdform name="form1" method="post" action="send.asp"

table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#ccffff"

tr

td height="20"div align="center"发送消息/div/td

/tr

tr

tddiv align="center"

textarea name="msg" cols="100" rows="6"/textarea

/div/td

/tr

tr

tddiv align="center"

input type="submit" name="submit" value="submit"

input type="reset" name="submit2" value="reset"

/div/td

/tr

/table

/form/td

/tr

/table

/body

/html

把上面代码生成index.asp文件

%

'这是字符串处理函数

function get_pass(pass)

pass=cstr(pass)

pass=replace(pass," ","")

pass=replace(pass," ","")

pass=replace(pass,"-","")

pass=replace(pass," ","")

pass=replace(pass,":","")

pass=replace(pass,".","")

pass=replace(pass,"+","")

pass=replace(pass,"_","")

pass=replace(pass,"","")

pass=replace(pass,"","")

pass=replace(pass,"!","")

pass=replace(pass,"@","")

pass=replace(pass,"#","")

pass=replace(pass,"$","")

pass=replace(pass,"%","")

pass=replace(pass,"^","")

pass=replace(pass,"!amp;","")

pass=replace(pass,"*","")

pass=replace(pass,"(","")

pass=replace(pass,")","")

pass=replace(pass,"=","")

pass=replace(pass,"\","")

pass=replace(pass,"/","")

pass=replace(pass,"|","")

pass=replace(pass,"下午","")

get_pass=pass

end function

'这是文件路径生成函数，参数为生成路径的时间

function namecheck(time)

webname=get_pass(time)

path=server.mappath("index.asp")

path1=path

total_length=len(path)

path=right(path,9)

right_length=len(path)

left_length=total_length-right_length

path=left(path1,left_length)

path=path"\children_page\"webname".html"

namecheck=path

set myfile=nothing

end function

'这是判断文件是否存在的过程,其中参数为最后更新时间

Sub isdelete(edittime)

filename=namecheck(edittime)

set fso=server.CreateObject("scripting.filesystemobject")

set file=fso.getfile(filename)

if fso.fileexists(file) then

file.delete

response.write("script language='javascript'alert('成功删除！');location.href='index.asp';/script")

end if

set fso=nothing

end Sub

'这是生成文件过程

Sub create

set fso=server.CreateObject("scripting.filesystemobject")

datastream=request("msg")

set myfile=fso.opentextfile(server.mappath("/muban/muban1.txt"))

dataall=myfile.readAll

datastream=replace(dataall,"list",datastream)

myfile.close

set myfile=nothing

set createfile=fso.CreateTextFile(namecheck(now()))

createfile.Write datastream

createfile.close

set createfile=nothing

set fso=nothing

response.write("script language='javascript'alert('成功提交！');location.href='index.asp';/script")

end Sub

%

%call create%

把上面代码复制生成send.asp文件

在同一目录中新建muban文件夹，在里面用下面代码生成muban1.txt文件

!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" ""

html xmlns=""

head

meta http-equiv="Content-Type" content="text/html; charset=gb2312" /

title无标题文档/title

style type="text/css"

!--

body {

background-image: url(pic002s.jpg);

}

--

/style/head

body

table width="900" border="0"

tr

tdtable width="100%" border="0"

tr

td!-- Search Google --

center

form method=get action=""

table background="pic002s.jpg"trtd

a href=""

img src=""

border="0" alt="Google" align="absmiddle"/a

input type=text name=q size=31 maxlength=255 value=""

input type=hidden name=ie value=GB2312

input type=hidden name=oe value=GB2312

input type=hidden name=hl value=zh-CN

input type=submit name=btnG value="Google 搜索"

/td/tr/table

/form

/center

!-- Search Google --/td

td /td

/tr

/table/td

/tr

tr

tdtable width="100%" height="100%" border="1"

tr

td height="476" align="center" valign="top"!-- TemplateBeginEditable name="list" --list!-- TemplateEndEditable --/td

/tr

/table

div style="text-align:center;"

pa href="" style="text-decoration:none; color:#FFFFFF;"用户留言/abr /font color="#FFFFFF"版权所有@违法必究/font

/div

/td

/tr

/table

/body

/html

在同一目录中新建children_page文件夹，一切完好。确保你的主机安装了FSO，具体方法如下：1、首先在系统盘中查找scrrun.dll，如果存在这个文件，请跳到第三步，如果没有，请执行第二步。

2、在安装文件目录i386中找到scrrun.dl_，用winrar解压缩，得scrrun.dll，然后复制到

你的系统盘:\windows\system32\目录中。

3、运行regsvr32 scrrun.dll即可。

删除fso、regsvr32/u scrrun.dll

开启/关闭系统FSO支持方法

windows98系统

在DOS命令行状态输入以下命令：

关闭命令：RegSvr32 /u C:\WINDOWS\SYSTEM\scrrun.dll

打开命令：RegSvr32 C:\WINDOWS\SYSTEM\scrrun.dll

win2000/XP

在CMD命令行状态输入以下命令：

关闭命令：RegSvr32 /u C:\WINNT\SYSTEM32\scrrun.dll

打开命令：RegSvr32 C:\WINNT\SYSTEM32\scrrun.dll (注意有可能是在SYSTEM中，所以这样写：RegSvr32 C:\WINNT\SYSTEM\scrrun.dll，主要看scrrun.dll这个文件是在哪里！ )

一切完好以后到这个地方下载ASP服务器：ASP小旋风到桌面上，关闭端口为80的程序，主要是迅雷，把所有文件考到:

C:\Program Files\ASP小旋风\wwwroot中，在浏览其中输入：http://你的IP地址，回车，输入数据，你看一下在children_page文件夹中是不是生成了，一个网页文件，新闻系统就是这样做的！

asp网站源代码

在局域网里搭建一个web服务器，固定该机的内网IP，要win2003系统,XP的不行，因为IIS连接数有限制，搭建好，把程序放上去，其他电脑直接输入这台服务器的IP地址就可以访问了。

如果要外网登陆，要先把局域网的路由器映射到这台服务器上，一般是在路由器里设置DMZ主机，然后填上服务器的内网IP。

外网访问时是要输入外网的IP，可以上IP138查询到。

如果你们宽带是固定IP的话申请个域名指向这个IP就行了，如果不是固定IP，就需要使用动态域名，现在常用的是 “花生壳”