ASPÊý¾ÝÁ¬½Ó
1. ÓÃDSNÁ¬½Ó²¢ÇÒûÓÐÓû§ÃûºÍÃÜÂ룺
<%
set conn = Server.CreateObject("ADODB.Connection")
conn.open "YourDSNName"
%>
ÓÃDSNÁ¬½Ó²¢ÇÒÓÐÓû§ÃûºÍÃÜÂ룺
<%
set conn = Server.CreateObject("ADODB.Connection")
conn.open "YourDSNName","username","password"
%>
2. ÓÃʵ¼ÊµÄÊý¾Ý¿â¾ø¶Ô·¾¶Á¬½Ó£º
<%
Set conn = Server.CreateObject("ADODB.Connection")
Strconn="DRIVER={Microsoft Access Driver (*.mdb)}; "
Strconn=Strconn & "DBQ=e:\yanhang\database.mdb"
conn.Open Strconn
%>
ÓÃʵ¼ÊµÄÊý¾Ý¿âÏà¶Ô·¾¶Á¬½Ó£º
"provider=microsoft.jet.OLEDB.4.0;Data source="&server.mappath("/admin/#Database.mdb")
<%
Set conn = Server.CreateObject("ADODB.Connection")
Strconn="DRIVER={Microsoft Access Driver (*.mdb)}; "
Strconn=Strconn & "DBQ=" & Server.MapPath("/database/yanhang.mdb")
conn.Open Strconn
%>
¶þ¡¢MS SQL ServerÊý¾Ý¿âÁ¬½Ó
ÓÃDSNÁ¬½Ó£º
<%
set conn = Server.CreateObject("ADODB.Connection")
conn.open "DSN=MyDSN;UID=user;PWD=password;DATABASE=databasename"
%>
²»ÓÃDSNÁ¬½Ó£º
<%
Set conn = Server.CreateObject("ADODB.Connection")
DSNtemp="DRIVER={SQL Server};SERVER=ServerName;UID=USER;PWD=password;DATABASE=databasename"
conn.open DSNtemp
%>
Èý¡¢FoxProÊý¾Ý¿âÁ¬½Ó
<%
Set Conn = Server.CreateObject("ADODB.connection")
ConnStr= "Driver=Microsoft Visual Foxpro Driver; UID=userID;SourceType=DBC;SourceDB=C:\yanhang\database.dbc"
Conn.Open ConnStr
%>
ËÄ¡¢OracleÊý¾Ý¿âÁ¬½Ó£º
<%
set conn=server.createobject("adodb.connection")
conn.cursorlocation=adUseClient
DSNTemp="Provider=MSDAORA.1;Password=xxxxx;User ID=yanhang;Data Source=xxx.world"
conn.open DSNtemp
%>
Ïà¹ØÎĵµ£º
protected void Button1_Click(object sender, EventArgs e)
{
GridViewRow gvr = (sender as Button).NamingContainer as GridViewRow; //»ñµÃÈÝÆ÷
if(gvr != null)
{
int index = gvr.RowIndex;//index¾ ......
<!--#include file="conn.asp"-->
<!--#include file="inc/head.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="zh-cn" lang="zh-cn" xmlns:q ......
ASPÓë´æ´¢¹ý³Ì
ASPÓë´æ´¢¹ý³Ì(Stored Procedures)µÄÎÄÕ²»ÉÙ£¬µ«ÊÇÎÒ»³ÒÉ×÷ÕßÃÇÊÇ·ñÕæÕýʵ¼ù¹ý¡£ÎÒÔÚ³õѧʱ²éÔĹý´óÁ¿Ïà¹Ø×ÊÁÏ£¬·¢ÏÖÆäÖÐÌṩµÄºÜ¶à·½·¨Êµ¼Ê²Ù×÷ÆðÀ´²¢²»ÊÇÄÇô»ØÊ¡£¶ÔÓÚ¼òµ¥µÄÓ¦Óã¬ÕâЩ×ÊÁÏÒ²ÐíÊÇÓаïÖúµÄ£¬µ«½öÏÞÓÚ´Ë£¬ÒòΪËüÃǸù±¾¾ÍÊÇǧƪһÂÉ£¬»¥Ïà³Ï®£¬ÉÔ΢¸´ÔÓµãµÄÓ¦Ó㬾ÍÈ«¶¼ÓïÑɲ»ÏêÁË ......
ÏÂÔصØÖ·£º/download/rar/tot-cms-5.5(sp2).rar
꿅᣼http://www.totcms.com/html/200910-30/20091030001212.htm
¸üÐÂ˵Ã÷£º
1¡¢Ôö¼ÓÁË×Ô¶¨Ò庯Êý¹¦ÄÜ£¬Ö»Òª¹ÜÀíÔ±ÊìϤSQL²éѯ£¬¾Í¿ÉÒÔʹÓÃÆÕͨSQLÓï·¨²éѯÊý¾Ý¿âÉú³Éǰ̨¾²Ì¬HTM¼Ç¼¡£
2¡¢ÎÄÕÂÌí¼Ó²ÉÈ¡Á½¼¶Ä¿Â¼±£´æ£¬²»ÊÇʹÓÃÔÀ´µÄÈý²ãĿ¼·½Ê½¡£
3¡¢½â¾öÐ޸ı ......
<%
'ÒÔϲ¿·ÖÊÇÑéÖ¤Ìá½»µÄpageÊÇ·ñΪºÏ·¨µÄ²ÎÊý
'Õⲿ·Ö×îºÃÅжÏÒ»ÏÂÌá½»µÄ²ÎÊýÊÇ·ñΪÊýÖµ×Ö·û
dim page
page=Trim(request("page"))
If page="" Then
page=1
Elseif CInt(page)<=0 then
page=1
else
page=CInt(page)
End If
'½øÐвéѯ£¬È¡³öÒªÏÔʾµÄ¼Ç¼
str=rs1("content")
'°Ñ³ö ......