网站导航网学 原创论文 原创专题 网站设计 最新系统 原创论文 论文降重 发表论文 论文发表 UI设计定制 论文答辩PPT格式排版 期刊发表 论文专题
返回网学首页
网学原创论文
最新论文 推荐专题 热门论文 论文专题
当前位置: 网学 > 设计资源 > 实用代码片段 > 正文

-ASP经典实用代码

论文降重修改服务、格式排版等 获取论文 论文降重及排版 论文发表 相关服务

  1、数据库连接。
  
  
  ASP与Access数据库连接:
  
  <%@ language=VBscript%>
  <%
  dim conn,mdbfile
  mdbfile=server.mappath("数据库名称.mdb")
  set conn=server.createobject("adodb.connection")
  conn.open "driver={microsoft access driver (*.mdb)};uid=admin;pwd=数据库密码;dbq="&mdbfile
  
  %>
  
  ASP与SQL数据库连接:
  
  <%@ language=VBscript%>
  <%
  dim conn
  set conn=server.createobject("ADODB.connection")
  con.open "PROVIDER=SQLOLEDB;DATA SOURCE=SQL服务器名称或IP地址;UID=sa;PWD=数据库密码;DATABASE=数据库名称
  %>
  
  DW中用字符串连接代码:
  
  "Driver={Microsoft Access Driver (*.mdb)};DBQ=数据库的绝对路径"
  
  等做完后再打开数据库服务器,把
  
  "Driver={Microsoft Access Driver (*.mdb)};DBQ=数据库的绝对路径"
  
  换成
  
  "Provider=Microsoft.Jet.OLEDB.4.0;data source="& server.mappath("服务器根目录下所在数据库路径")
  
  并把本地服务器修改成测试服务器
  
  
  2、加载别的页面。
  
  <!--#include file = "页面的路径和名称"-->
  
  3、显示数据库中的数据。
  
  <%=rs("字段")%>
  
  4、输出。
  
  Response.Write("文字或者字符串");
  
  5、打开数据库并建立数据集对象。
  
  set conn=server.CreateObject("ADODB.connection")
  conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&server.MapPath("***/photodata.mdb") '更改您的数据库文件存放路径
  set rs=server.createobject("ADODB.recordset") '建立数据集
  sql="SELECT * FROM data" '更改您的数据库表名
  rs.Open sql,conn,1,1
  
  6、获得系统的时间。
  
  <%=now()%>
  
  7、取得来访问的IP。
  
  <%=request.serverVariables("remote_host")%>
  
  8、随机数。
  
  <%randomize%>
  <%=(int(rnd()*n)+1)%>
  N为可改变数
  
  9、跳转页面。
  
  Response.Redirect("页面")
  
  10、弹出消息框。
  
  Response.Write("<script>alert('消息框!')</script>")
  
  11、用hidden类型来传递变量。
  
  < % form method="post" action="mynextpage.asp" >
  < % for each item in request.form % >
  < input namee="< %=item% >" type="HIDDEN"
  value="< %=server.HTMLEncode(Request.form(item)) % >" >
  < % next % >
  < /form >
  
  12、常用SQL语句整理。
  
  (1) 数据记录筛选:
  
  sql="select * from 数据表 where 字段名=字段值 order by 字段名 [desc]"
  
  sql="select * from 数据表 where 字段名 like ''%字段值%'' order by 字段名 [desc]"
  
  sql="select top 10 * from 数据表 where 字段名 order by 字段名 [desc]"
  
  sql="select * from 数据表 where 字段名 in (''值1'',''值2'',''值3'')"
  
  sql="select * from 数据表 where 字段名 between 值1 and 值2"
  
  (2) 更新数据记录:
  
  sql="update 数据表 set 字段名=字段值 where 条件表达式"
  
  sql="update 数据表 set 字段1=值1,字段2=值2 …… 字段n=值n where 条件表达式"
  
  (3) 删除数据记录:
  
  sql="delete from 数据表 where 条件表达式"
  
  sql="delete from 数据表" (将数据表所有记录删除)
  
  (4) 添加数据记录:
  
  sql="insert into 数据表 (字段1,字段2,字段3 …) values (值1,值2,值3 …)"
  
  sql="insert into 目标数据表 select * from 源数据表" (把源数据表的记录添加到目标数据表)
  
  (5) 数据记录统计函数:
  
  AVG(字段名) 得出一个表格栏平均值
  COUNT(*|字段名) 对数据行数的统计或对某一栏有值的数据行数统计
  MAX(字段名) 取得一个表格栏最大的值
  MIN(字段名) 取得一个表格栏最小的值
  SUM(字段名) 把数据栏的值相加
  
  引用以上函数的方法:
  
  sql="select sum(字段名) as 别名 from 数据表 where 条件表达式"
  set rs=conn.excute(sql)
  
  用 rs("别名") 获取统的计值,其它函数运用同上。
  
  (5) 数据表的建立和删除:
  
  CREATE TABLE 数据表名称(字段1 类型1(长度),字段2 类型2(长度) …… )
  
  例:CREATE TABLE tab01(name varchar(50),datetime default now())
  
  DROP TABLE 数据表名称 (永久性删除一个数据表)

  • 上一篇资讯: asp非常实用的代码
  • 下一篇资讯: ASP实用代码200个
  • 设为首页 | 加入收藏 | 网学首页 | 原创论文 | 计算机原创
    版权所有 网学网 [Myeducs.cn] 您电脑的分辨率是 像素
    Copyright 2008-2020 myeducs.Cn www.myeducs.Cn All Rights Reserved 湘ICP备09003080号 常年法律顾问:王律师