aspºÍÊý¾Ý¿âµÄ¹ÊÊÂ
1.ASPÁ¬½ÓAccessÊý¾Ý¿â
<%
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
%>
2. ASPÓëSQLÊý¾Ý¿âÁ¬½Ó£º
<%
dim conn
set conn=server.createobject("ADODB.connection")
con.open "PROVIDER=SQLOLEDB;DATA SOURCE=SQL·þÎñÆ÷Ãû³Æ»òIPµØÖ·;UID=sa;PWD=Êý¾Ý¿âÃÜÂë;DATABASE=Êý¾Ý¿âÃû³Æ
%>
½¨Á¢¼Ç¼¼¯¶ÔÏó£º
Set rs=server.createobject("adodb.recordset")
rs.open SQLÓï¾ä,conn,3,2
3. SQL³£ÓÃÃüÁîʹÓ÷½·¨£º
(1) Êý¾Ý¼Ç¼ɸѡ£º
sql="select * from Êý¾Ý±í where ×Ö¶ÎÃû=×Ö¶ÎÖµ order by ×Ö¶ÎÃû "
sql="select * from Êý¾Ý±í where ×Ö¶ÎÃû like ‘%×Ö¶ÎÖµ%‘ order by ×Ö¶ÎÃû "
sql="select top 10 * from Êý¾Ý±í where ×Ö¶ÎÃû order by ×Ö¶ÎÃû "
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 …) valuess (Öµ1,Öµ2,Öµ3 …)"
sql="insert into Ä¿±êÊý¾Ý±í select * from Ô´Êý¾Ý±í" (°ÑÔ´Êý¾Ý±íµÄ¼Ç¼Ìí¼Óµ½Ä¿±êÊý¾Ý±í)
(5) Êý¾Ý¼Ç¼ͳ¼Æº¯Êý£º
AVG(×Ö¶ÎÃû) µÃ³öÒ»¸ö±í¸ñÀ¸Æ½¾ùÖµ
COUNT(*|×Ö¶ÎÃû) ¶ÔÊý¾ÝÐÐÊýµÄͳ¼Æ»ò¶ÔijһÀ¸ÓÐÖµµÄÊý¾ÝÐÐÊýͳ¼Æ
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
Ïà¹ØÎĵµ£º
<head runat="server">
<title></title>
<meta http-equiv="Expires" CONTENT="0">
<meta http-equiv="Cache-Control" CONTENT="no-cache">
<meta http-equiv="Pragma" CONTENT="no-cache">
<script language="JavaScript"> ......
<!--#include file="config.asp" -->
<!--#include file="Fun.asp" -->
<%
'Êý¾Ý¿â¹ÜÀíÀà
class Datas
'±¸·Ý
public sub Bk()
Set fso=server.createobject("scripting.filesystemobject")
fso.CopyFile Server.MapPath(SiteDataPath),Server.MapPath(SiteDataBakPath)
......
<%
'¹ºÎï³µÀà ÀàÃû£ºUserCart
'×÷Õß:gameing
'»ù±¾ÔÀí:´ËÀàÓ÷þÎñÆ÷Session±äÁ¿±£´æÉÌÆ·Êý¾Ý,ÉÌÆ·ÓÃÒ»¸öÊý×é±íʾ.´ËÀàÀïÃæ±£´æÁËÈýÖÐÉÌÆ·¼Û¸ñ.
'1¡¢2008-11-25ÐÞ¸ÄFunction AddItem() by tommy ÉÌÆ·Ôö¼ÓÔÚ×îºó
'2¡¢2008-11-25ÐÞ¸Äby tommy Ôö¼Óɾ³ýÉÌÆ·¹ý³Ì Sub DelItem()
'3¡¢2008-11-25ת»»Ò»Ð©Êý¾ÝÀàÐͲÅÄÜÔ ......
1) DelphiÏòoracleÖд«µÝ²ÎÊý ÈçoracleÖеIJÎÊýÃûΪerpcx
´ð£ºÈç¹ûÏë´Ó±íÀïȡֵµ½oracle£¬Ôòerpcx:=trim(aq1.fieldbyname('erpcx').AsString);
·ñÔòÖ±½ÓÓÿؼþÃû×Ö
Óï¾äΪ
with aperp do
begin
connection:=dm.ADOCerp;
parameters.Clear;&nbs ......
<!--#include file="conn.asp" -->
<!--#include file="Fun.asp" -->
<%
'·¢ËÍÓʼþÀà
class SendEmails
'·¢ËÍ
private flag
private info
public sub Class_Initialize()
flag=false
info=""
end sub
public sub Class_Terminate()
flag=false
info=""
......