网站ASP 代码 怎么写,
给你个参考例子吧
connection.asp里的代码是:
《%
set conn=server.createobject(“adodb.connection“)
conn.open “provider=microsoft.jet.oledb.4.0;data source=“&server.MapPath(“student.mdb“)
%》
2.yanzheng.asp里的代码是:
《!–#include file=“connection.asp“–》
《%
dim zhanghao,mima
zhanghao=request(“zhanghao“)
mima=request(“mima“)
if zhanghao=““ then
%》
《script language=javascript》
alert(“帐号为空“);
location.href=“denglu.asp“
《/script》
《% end if %》
《% if mima=““ then
%》
《script language=javascript》
alert(“密码为空“);
location.href=“denglu.asp“
《/script》
《% end if %》
《%set rs=server.createobject(“adodb.recordset“)
rs.open “select * from student where zhanghao=’“&zhanghao&“’“,conn,1,3
if not rs.eof then
if mima=rs(“mima“) then
session(“zhanghao“)=zhanghao
Response.write(“《script》location.href(’index.asp’)《/script》“ )
else
response.write (“《script》alert(’用户密码错误’);location.href(’denglu.asp’)《/script》“)
end if
end if
if rs.eof then
response.write (“《script》alert(’用户帐号错误’);location.href(’denglu.asp’)《/script》“)
end if
set rs=nothing
rs.close
%》
二、
conn.asp
《%
Set conn=Server.CreateObject(“ADODB.Connection“)
connstr=“DBQ=“+server.mappath(“haha.mdb“)+“;DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)}“
conn.Open connstr
%》
index.asp
《%@LANGUAGE=“VBSCRIPT“ CODEPAGE=“936“%》
《!DOCTYPE HTML PUBLIC “-//W3C//DTD HTML 4.01 Transitional//EN“ “http://www.w3.org/TR/html4/loose.dtd“》
《html》
《head》
《meta http-equiv=“Content-Type“ content=“text/html; charset=gb2312“》
《title》无标题文档《/title》
《/head》
《body》
《form name=“form1“ method=“post“ action=“login.asp“》
《table width=“50%“ height=“108“ border=“0“ cellpadding=“0“ cellspacing=“0“》
《tr》
《td》用户名:《/td》
《td》《input name=“us“ type=“text“ id=“us“》《/td》
《/tr》
《tr》
《td》密码:《/td》
《td》《input name=“pa“ type=“password“ id=“pa“ value=““》《/td》
《/tr》
《tr》
《td》 《/td》
《td》《input type=“submit“ name=“Submit“ value=“提交“》《/td》
《/tr》
《/table》
《/form》
《/body》
《/html》
login.asp
《!–#include file=“conn.asp“–》
《%
us=replace(request.form(“us“),“’“,“’“)
pa=replace(request.form(“pa“),“’“,“’“)
%》
《%
set rs=server.createobject(“adodb.recordset“)
sql=“select * from haha where us=’“&us&“’ and pa=’“&pa&“’“
rs.open sql,conn,1,1
%》
《%
if rs.eof or rs.bof then
response.write“密码错误~“
else
response.redirect“main.asp“
end if
%》
三、
连接数据库(conn.asp)
《%
dim db,conn,connstr
db=“@data.mdb“
set Conn = server.CreateObject(“ADODB.Connection“)
connstr=“provider=microsoft.jet.oledb.4.0;data source=“& server.MapPath(“../data/“&db&““)
conn.Open connstr
%》
登录页面(login.asp)
《% @language=vbscript %》
《!–#include file=“conn.asp“–》
《%
On Error Resume Next
dim uid
dim pwd
uid=trim(request.Form(“uid“)) ’获得用户名
pwd=trim(request.form(“pwd“)) ’获得密码
dim rs
set rs=server.createobject(“adodb.recordset“)
if uid《》““ then
dim sqlstr
sqlstr=“select uid,pwd from admin where uid=’“&replace(uid,“’“,“’’“)&“’ and pwd=’“&replace(pwd,“’“,“’’“)&“’“
rs.open sqlstr,conn,3,1
if not rs.eof then
session(“uid“)=uid
response.redirect “login_ok.asp“ ’重定位url
else
response.redirect “error.htm“
end if
else
response.redirect “error.htm“
end if
%》
关于ASP代码的问题
用
union
(all)
连接两个表
sql=“select
*
from
表1
union
select
*
from
表2”
要注意的是需要两个表的字段名和类型一致,如果字段名不一致,就用as转换,union
all将是所有数据的罗列,union是会过滤掉重复记录的
ASP后台代码
你好~!这是我(我也是新手,一起学习!)写的代码:
1、conn.asp(连接数据库)文件代码:
《%
set conn=server.CreateObject(“adodb.connection“)
conn.connectionstring=“driver={Microsoft Access Driver (*.mdb)};dbq=“ & server.MapPath(“#data.mdb“)
conn.open
%
2、addproduct.asp(产品添加)文件代码:
《form id=“form1“ name=“form1“ method=“post“ action=“addProduct.asp“》
《table width=“880“ border=“0“ align=“center“》
《tr》
《td colspan=“2“ align=“center“》《h1》添加产品《/h1》《/td》
《/tr》
《tr》
《td width=“210“ align=“right“》名称:《/td》
《td width=“654“》《label》
《input name=“p_name“ type=“text“ id=“title“ size=“85“ /》
《/label》《/td》
《/tr》
《tr》
《td height=“168“ align=“right“》介绍:《/td》
《td》《label》
《textarea name=“p_samllpic“ cols=“85“ rows=“23“ id=“content“》《/textarea》
《/label》《/td》
《/tr》
《tr》
《td align=“right“》种类:《/td》
《td》《label》
《input name=“p_class“ type=“text“ id=“from“ size=“85“ /》
《/label》《/td》
《/tr》
《tr》
《td colspan=“2“ align=“center“》《input type=“submit“ name=“Submit“ value=“添加产品“ /》
《input type=“reset“ name=“Submit2“ value=“重置“ /》《/td》
《/tr》
《/table》
《/form》
《!–#include file=“conn.asp“–》
《%
if (trim(request(“p_name“))《》““ and trim(request(“p_samllpic“))《》““) then
set rs=server.CreateObject(“adodb.recordset“)
rs.open “select * from web_Product“,conn,1,3
if not rs.eof then
response.Write“《script language=’javascript’》“& “alert(’此产品名称已存在,重复啦!’);history.go(-1);《/script》“
else
rs.close
rs.open
rs.addnew
rs(“p_name“)=trim(request(“p_name“))
rs(“p_samllpic“)=trim(request(“p_samllpic“))
rs(“p_class “)=trim(request(“p_class“))
rs.update
rs.close
response.Write“《script language=’javascript’》“& “alert(’产品添加成功!’);history.go(-1);《/script》“
end if
end if
%》
3、xiugai.asp(产品信息修改)文件代码:
《!–#include file=“conn.asp“–》
《form name=“form1“ method=“post“ action=“editnews.asp?action=save&id=《%=request(“id“)%》“》
《table width=“880“ border=“0“ align=“center“》
《tr》
《td colspan=“2“ align=“center“》《h1》修改产品《/h1》《/td》
《/tr》
《tr》
《td width=“210“ align=“right“》名称:《/td》
《td width=“654“》《label》
《input name=“p_name“ type=“text“ value=《%=rs(“p_name“)%》 id=“title“ size=“85“ /》
《/label》《/td》
《/tr》
《tr》
《td height=“168“ align=“right“》介绍:《/td》
《td》《label》
《textarea name=“p_samllpic“ cols=“85“ rows=“23“ id=“content“》《%=rs(“p_samllpic“)%》《/textarea》
《/label》《/td》
《/tr》
《tr》
《td align=“right“》种类:《/td》
《td》《label》
《input name=“p_class“ value=《%=rs(“p_class“)%》 type=“text“ size=“85“ /》
《/label》《/td》
《/tr》
《tr》
《td colspan=“2“ align=“center“》《input type=“submit“ name=“Submit“ value=“发布“ /》
《input type=“reset“ name=“Submit2“ value=“重置“ /》《/td》
《/tr》
《/table》
《/form》
《%
set rs=server.CreateObject(“adodb.recordset“)
rs.open “select * from news where id=“&request(“id“),conn,1,3
if trim(request(“action“))=“save“ then
rs(“p_name“)=trim(request(“p_name“))
rs(“p_samllpic“)=trim(request(“p_samllpic“))
rs(“p_class“)=trim(request(“p_class“))
rs.update
rs.close
set rs=nothing
response.Write“《script language=’javascript’》“& “alert(’产品信息修改成功!’);history.go(-1);《/script》“
end if
%》
4、manage.asp(管理维护)文件代码:
《!–#include file=“conn.asp“–》
《p》《a href=“addproduct.asp“》添加新闻《/a》《/p》
《form method=“post“ name=“manage“ action=“manage.asp“》
《table width=“645“ border=“1“ cellspacing=“0“ bordercolor=“#006633“》
《tr align=“center“》
《td width=“43“ height=“19“ bgcolor=“#FFFFFF“》 《/td》
《td width=“218“ bgcolor=“#FFFFFF“》名称《/td》
《td width=“167“ bgcolor=“#FFFFFF“》介绍《/td》
《td width=“111“ bgcolor=“#FFFFFF“》分类《/td》
《td width=“84“ bgcolor=“#FFFFFF“》 《/td》
《/tr》
《%
set rs=server.CreateObject(“adodb.recordset“)
rs.open “select * from web_Product“,conn,1,3
do while not rs.eof
%》
《tr》
《td bgcolor=“#FFFFFF“》《label》
《input type=“checkbox“ name=《%=cstr(rs(“id“))%》 value=“check“ /》
《/label》《/td》
《td bgcolor=“#FFFFFF“》《a href=“newshows.asp?id=《%=cstr(rs(“id“))%》“ target=“_blank“》
《%
response.Write rs(“p_name“)
%》
《/a》《/td》
《td bgcolor=“#FFFFFF“》《%=rs(“p_samllpic“)%》 《/td》
《td bgcolor=“#FFFFFF“》《%=rs(“p_class“)%》《/td》
《td bgcolor=“#FFFFFF“》《a href=“xiugai.asp?id=《%=cstr(rs(“id“))%》“》产品信息修改《/a》《/td》
《/tr》
《%
rs.movenext
loop
rs.close
set rs=nothing
%》
《/table》
《/form》
一共4个页面,基本上是这样了,刚好我也在做这个。你把这些代码放在《body》之间就可以了,要添加图片的话,好像要一个无组件上传什么的(也就是一串代码),有点麻烦,只能你自己在网上找了~!我这只写出向数据库导入、修改文本的代码而已。字段基本上照楼主给的写的,(测试的时候要保证数据库表里有数据,不然会出错的)。在测试时先要从manage.asp页面进入(因为只有这个页面才能把id这个参数传递给添加和修改页面),代码为ASP代码。希望对你有所帮助!!
ASP代码是什么
ASP(Active Server Pages)?
Active Server Pages(ASP,活动服务器页面)就是一个编程环境,在其中,可以混合使用HTML、脚本语言以及组件来创建服务器端功能强大的Internet应用程序。 如果你以前创建过一个站点,其中混合了HTML、脚本语言以及组件,你就可以在其中加入ASP程序代码。通过在HTML页面中加入脚本命令,你可以创建一个HTML用户界面,并且,还可以通过使用组件包含一些商业逻辑规则。组件可以被脚本程序调用,也可以由其他的组件调用。
ASP的工作原理:
当在Web站点中融入ASP功能后,将发生以下事情:
1 用户调出站点内容,默认页面的扩展名是.asp。
2 浏览器从服务器上请求ASP文件。
3 服务器端脚本开始运行ASP。
4 ASP文件按照从上到下的顺序开始处理,执行脚本命令,执行HTML页面内容。
5 页面信息发送到浏览器。
因为脚本是在服务器端运行的,所以Web服务器完成所有处理后,将标准的HTML页面送往浏览器。
这意味着,ASP只能在可以支持的服务器上运行。让脚本驻留在服务器端的另外一个益处是:用户不可能看到原始脚本程序的代码,用户看到的,仅仅是最终产生的HTML内容.
ASP在服务器端运行,而我们通过ie浏览ASP的运行结果,或者与服务器交互(如登陆等)。最早的网页是静态的(不包含交互内容。声音、文字、图片、视频、动化都属于静态内容。)
ASP代码指什么还有什么代码
ASP是Active Server Page的缩写,意为“活动服务器网页”。ASP是微软公司开发的代替CGI脚本程序的一种应用,它可以与数据库和其它程序进行交互,是一种简单、方便的编程工具。ASP的网页文件的格式是.asp,现在常用于各种动态网站中。 ASP是一种服务器端脚本编写环境,可以用来创建和运行动态网页或web应用程序。ASP网页可以包含HTML标记、普通文本、脚本命令以及COM组件等。利用ASP可以向网页中添加交互式内容(如在线表单),也可以创建使用HTML网页作为用户界面的web应用程序。 与HTML相比,ASP网页具有以下特点:
(1)利用ASP可以实现突破静态网页的一些功能限制,实现动态网页技术;
(2)ASP文件是包含在HTML代码所组成的文件中的,易于修改和测试;
(3)服务器上的ASP解释程序会在服务器端制定ASP程序,并将结果以HTML格式传送到客户端浏览器上,因此使用各种浏览器都可以正常浏览ASP所产生的网页;
(4)ASP提供了一些内置对象,使用这些对象可以使服务器端脚本功能更强。例如可以从web浏览器中获取用户通过HTML表单提交的信息,并在脚本中对这些信息进行处理,然后向web浏览器发送信息;
(5)ASP可以使用服务器端ActiveX组建来执行各种各样的任务,例如存取数据库、发现哦那个Email或访问文件系统等。
(6)由于服务器是将ASP程序执行的结果以HTML格式传回客户端浏览器,因此使用者不会看到ASP所编写的原始程序代码,可放置ASP程序代码被窃取。
ASP代码什么意思
大概意思就是说,如果classid是空的,或则不是数字那么classid就等于数字3。如果boardid是空的,那么就检索表class 。如果表class存在数据就检索board 里第0个字段,根据代码,这个0应该是代表classid,。如果board 也存在数据,那么它就调用class和board 所指定的那个内容!实际第一段代码(因为这逻辑不是我设计的,所以我不能很清晰的表达它的细节),它的做用就是首先检查classid是否为空,如果为空就显示ID为3的内容,如果否就显示它所指定的数字,然后通过get方式把值传递给zwgk.asp这个文件,并显示!top.asp这个文件你要检查一下连接数据库的代码是否正确。
ASP代码是如何工作的
用户在地址栏中请求一个asp程序。
浏览器向ASP服务器请求这个asp程序,而不是像html一样直接处理一个自身的html程序,不需要在服务器上的运行。
ASP程序中的服务器端脚本开始运行。
ASP程序连续的执行这个请求文件中的所有语句,然后生成一个HTML文件。
结果是,100%的纯HTML代码发送到客户端,所以我们在客户端看到的代码还是HTML,并不是ASP的源代码。这样做,就可以很少地考虑IE和Netscape 之间的区别了,而且我们也不怕别人看到我们的源代码!不过,我们只是不能看到ASP的源程序而已
网页设计asp代码请求(急)
这样直接是不可以的,
1,首先你要连接数据库,m.mdb
2,你要读取这个表(name)的列(web)。
3,如果你读取的列是赋值给一个变量的话,在你要放标题那裏《%=web%》
如果你是直接用GridView或者DataList来显示标题那就是直接《%web%》。
如果你是第三种的话,就是你还未把这个表的字段读取出来。所以你看下代码,或者贴出来看下。
asp代码中&_是什么意思
你说的没错,是vb/vbscript的人为换行符,表示的意思是下句仍是这一句代码.它不是ASP的,是语言的,所以如果采用ASP+JS时则不会出现这个符号的!
JS是C族的语言,它是在每句代码结果后要加分号(换行号)表示该句程序写完了,可以运行的,这种要求在C#等中明显,而JS是一个宽松的环境,所以有时可以不写,一般都是最后一句不用写换行号的,但C#等要求严格,必须要写的!
B族的要求也是严格的,但是它的规定恰恰相反,它是在代码在一行中写不完时加上&_来表示本行代码未写完,下行与本行是一句代码,当然你可以在一行写完时不用这个的!所以这里虽称换行符,但起的作用是“续行”的作用。如果不改格式的情况下,这个符号是不可以去掉的。如果不好理解,它有点像是去掉其后的第一个换行符的样子。所以后边如果打上一个空行时,如果空行后边什么也没有,它是会出错的!如:
conn.open “provider= microsoft.jet.oledb.4.0;data source=info.mdb;“&_
“jet oledb:database password=;“
conn.open “provider= microsoft.jet.oledb.4.0;data source=info.mdb;“&_
“jet oledb:database password=;“这个就会出错!