2 qq 33513745 qq_33513745 于 2016.01.22 23:20 提问

如何用ASP做网站,谢谢大家

请教各位如何用ASP语言做网站,最好有源代码,能修改就好,小弟感激不尽

2个回答

devmiao
devmiao   Ds   Rxr 2016.01.22 23:24

ASP快速入门教程
ASP快速入门教程能让你一个小时就学会ASP. 如果想看懂更多的ASP代码,希望大家在网上找找ASP教程,相信看完后大家对ASP更有个感性的认识。
请熟记下面的ASP语句是你快速入门的不二法则。

[html] view plain copy print?
<%

语句

……

%>

定义变量dim语句

[html] view plain copy print?
<%

dim a,b

a=10

b=”ok!”

%>

注意:定义的变量可以是数值型,也可以是字符或者其他类型的

简单的控制流程语句

  1. If 条件1 then 语句1 elseif 条件2 then 语句2 else 语句3 endif 2.while 条件 语句 wend 3.for count=1 to n step m 语句1 exit for 语句2 next

二.ASP数据库简单*作教程

.数据库连接(用来单独编制连接文件conn.asp)

[html] view plain copy print?
<%

Set conn = Server.CreateObject("ADODB.Connection")

conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &

Server.MapPath("bbsdb1\user.mdb")

%>

(用来连接bbsdb1目录下的user.mdb数据库)

显示数据库记录

原理:将数据库中的记录一一显示到客户端浏览器,依次读出数据库中的每一条记录如果是从头到尾:用循环并判断指针是否到末 使用: not rs.eof如果是从尾到头:用循环并判断指针是否到开始 使用:not rs.bof

[html] view plain copy print?

(包含conn.asp用来打开bbsdb1目录下的user.mdb数据库)

<%

set rs=server.CreateObject("adodb.recordset") (建立recordset对象)

sqlstr="select * from message" ---->(message为数据库中的一个数据表,即你

要显示的数据所存放的数据表)

rs.open sqlstr,conn,1,3 ---->(表示打开数据库的方式)

rs.movefirst ---->(将指针移到第一条记录)

while not rs.eof ---->(判断指针是否到末尾)

response.write(rs("name")) ---->(显示数据表message中的name字段)

rs.movenext ---->(将指针移动到下一条记录)

wend ---->(循环结束)


rs.close

conn.close 这几句是用来关闭数据库

set rs=nothing

set conn=nothing

%>

其中response对象是服务器向客户端浏览器发送的信息

增加数据库记录

增加数据库记录用到rs.addnew,rs.update两个函数
[html] view plain copy print?

(包含conn.asp用来打开bbsdb1目录下的user.mdb数据库)

<%

set rs=server.CreateObject("adodb.recordset") (建立recordset对象)

sqlstr="select * from message" ---->(message为数据库中的一个数据表,即你

要显示的数据所存放的数据表)

rs.open sqlstr,conn,1,3 ---->(表示打开数据库的方式)

rs.addnew 新增加一条记录

rs("name")="xx" 将xx的值传给name字段

rs.update 刷新数据库


rs.close

conn.close 这几句是用来关闭数据库

set rs=nothing

set conn=nothing

%>

删除一条记录
删除数据库记录主要用到rs.delete,rs.update
[html] view plain copy print?
<!--#include file=conn.asp--> (包含conn.asp用来打开bbsdb1目录下的user.mdb数据库)

<%

dim name

name="xx"

set rs=server.CreateObject("adodb.recordset") (建立recordset对象)

sqlstr="select * from message" ---->(message为数据库中的一个数据表,即你

要显示的数据所存放的数据表)

rs.open sqlstr,conn,1,3 ---->(表示打开数据库的方式)

while not rs.eof

if rs.("name")=name then

rs.delete

rs.update

查询数据表中的name字段的值是否等于变量name的值"xx",如果符合就执行删除,

else 否则继续查询,直到指针到末尾为止

rs.movenext

emd if

wend


rs.close

conn.close 这几句是用来关闭数据库

set rs=nothing

set conn=nothing

%>

关于数据库的查询
(a) 查询字段为字符型
[html] view plain copy print?
<%

dim user,pass,qq,mail,message

user=request.Form("user")

pass=request.Form("pass")

qq=request.Form("qq")

mail=request.Form("mail")

message=request.Form("message")

if trim(user)&"x"="x" or trim(pass)&"x"="x" then (检测user值和pass值是否

为空,可以检测到空格)

response.write("注册信息不能为空")

else

set rs=server.CreateObject("adodb.recordset")

sqlstr="select * from user where user=‘’"&user&"‘’" (查询user数据表中的user

字段其中user字段为字符型)

rs.open sqlstr,conn,1,3

if rs.eof then

rs.addnew

rs("user")=user

rs("pass")=pass

rs("qq")=qq

rs("mail")=mail

rs("message")=message

rs.update

rs.close

conn.close

set rs=nothing

set conn=nothing

response.write("注册成功")

end if

rs.close

conn.close

set rs=nothing

set conn=nothing

response.write("注册重名")

%>

(b)查询字段为数字型
[html] view plain copy print?
<%

dim num

num=request.Form("num")

set rs=server.CreateObject("adodb.recordset")

sqlstr="select * from message where id="&num (查询message数据表中id字段的

值是否与num相等,其中id为数字型)

rs.open sqlstr,conn,1,3

if not rs.eof then

rs.delete

rs.update

rs.close

conn.close

set rs=nothing

set conn=nothing

response.write("删除成功")

end if

rs.close

conn.close

set rs=nothing

set conn=nothing

response.write("删除失败")

%>

几个简单的asp对象的讲解

response对象:服务器端向客户端发送的信息对象,包括直接发送信息给浏览器,重新定向URL,
或设置cookie值
request对象:客户端向服务器提出的请求
session对象:作为一个全局变量,在整个站点都生效
server对象:提供对服务器上方法和属性的访问

(a) response对象的一般使用方法
比如:
[html] view plain copy print?
<%

resposne.write("hello, welcome to asp!")

%>

在客户端浏览器就会看到 hello, welcome to asp! 这一段文字
[html] view plain copy print?
<%

response.Redirect(" www.sohu.com")

%>

如果执行这一段,则浏览器就会自动连接到 “搜狐” 的网址关于response对象的用法还有很多,大家可以研究研究request对象的一般使用方法比如客户端向服务器提出的请求就是通过request对象来传递的列如 :你在申请邮箱的所填写的个人信息就是通过该对象来将你所填写的信息传递给服务器的
比如:这是一段表单的代码,这是提供给客户填写信息的,填写完了按“提交”传递给request.asp文件处理后再存入服务器数据库

[html] view plain copy print?

那么request.asp该如何将其中的信息读入,在写入数据库,在这里就要用到request对象了,下面我们就来分析request.asp的写法
[html] view plain copy print?
<%

dim name,password (定义user和password两个变量)

name=request.form(“user”) (将表单中的user信息传给变量name)

password=request.form(“pass”) (将表单中的pass信息传给变量password)

%>

通过以上的asp代码我们就将表单中的数据读进来了,接下来我们要做的就是将信息写入数据库了。

enpterexpress
enpterexpress   Rxr 2016.01.23 14:19
Csdn user default icon
上传中...
上传图片
插入图片
准确详细的回答,更有利于被提问者采纳,从而获得C币。复制、灌水、广告等回答会被删除,是时候展现真正的技术了!
其他相关推荐
首先谢谢大家的关注!
首先谢谢大家的关注! 谢谢大家! 谢谢大家!! 谢谢大家!!! 重要的事情要说好几遍~ 首先做个自我介绍吧 中文名字是乔浩磊  英文名字是feiyu~ 哈哈当个玩笑就好了~ 现就读于河南某高校 正在完成小时候的梦想——步入IT 行业 本人从小酷爱计算机,接触电脑时间比较早打过无数游戏用过无数电脑系统当然~~也玩坏过无数次系统 想在大学期间利用空闲时间积
MATLAB提取矩阵中的一部分
     MATLAB对矩阵的操作十分灵活,下面对最近遇到的进行总结:    格式A(m,n),用于提取矩阵A中符合m,n要求的部分1、提取某个元素,则m,n为数字标量,如A(2,3)为第二行第三列的元素。2、提取某行某列      A(:,n)提取第n列的所有元素,如A(:,3)提取第三列的所有元素;      A(m,:)提取第m行的所有元素,如A(3,:)提取第三行的所有元素;3、提取任意的...
dreamweaver做asp
如何用dreamweaver做asp,连接数据库等
顺序高斯消去法求线性方程组
%采用顺序高斯消去法求n*n的线性方程组 %消元过程中出现A(k,k)=0将导致消元无法进行,计算报错 function x=Gauss(A,b)     tic;     n=max(size(A));     x=zeros(n,1);%初始化x     %消元过程     for k=1:n-1         if A(k,k)==0            error('
如何用asp编写网站数据采集程序?
引:假如你想从网上自动采集数据,把它们写进本地数据库中,那就看看本文介绍的方法吧。笔者为了解决这个问题,花了三天的时间,终于大功告成,下面就是完整的ASP代码,能让你随心所欲地从网上采集数据入库,非常实用啊!一、网站数据采集方法 目前网站数据采集方法主要有两种,一是使用现成的软件,二是自己编写采集程序。 1、使用现成的软件 很多软件(例如网络信息采集大师、BK通用信息采
一个asp.net制作的简单图书管理系统
该程序是我们做的一个小作业,拿来跟大家分享.运行环境在VS2005,SQLserver
使用MVC框架开发网站(一)
概述 本章您将学会: 1.MVC的概念及使用 2.MVC与ASP.NET的区别 3.路由和URL导向 4.控制器和视图 5.模型与模型状态 6.过滤器 7……. 第1章_MVC与ASP.NET的区别 1.1概述 MVC是一种流行的Web应用架构技术,他把Web应用划分成Model、Controller和View三部分! 优点:可测试,可维护等 MVC是ASP.NET...
利用ASP打造网站论坛DIY
教你如何用ASP打造论坛 教你如何用ASP打造论坛 教你如何用ASP打造论坛
收集大家的想法,谢谢参与。。
  我们刚上了软件工程,老师让我们这组做个“文件检索系统”,我想用软件工程的角度去做这个,但是我觉得单纯做一个类似于windows的文件搜索,用处不是很大,用户的对这个需求不是很高。。。所以希望大家帮我想个运用到这个功能的项目,同时用户比较需求这个。。 希望大家给点建议,拜谢。。。
感谢大家的关注
本人也是工作10年的IT人,特开这个板块每周就是想写几篇自己身边的故事!目前固定的是每周三篇,贵在坚持!感谢大家!