Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

ASPÁ¬½ÓMySQLÊý¾Ý¿âµÄ·½·¨

ASPÁ¬½ÓMySQLÊý¾Ý¿âµÄ·½·¨
 
 
 
ASPµÈÓïÑÔÁ¬½ÓmysqlÊý¾Ý¿â£¬¿ÉÒÔͨ¹ý°²×°mysqlµÄODBCÇý¶¯£¬Í¨¹ýÅäÖÃODBCÊý¾ÝÔ´£¬Á¬½Ó²¢²Ù×÷Êý¾Ý¿â¡£
mysql odbc 3.51°æ
ÏÂÔØµØÖ·:
http://dev.mysql.com/downloads/connector/odbc/3.51.html
£¼%
'²âÊÔ¶ÁÈ¡MySqlÊý¾Ý¿âµÄÄÚÈÝ
strconnection="driver={mysql odbc 3.51 driver};database=weste_net;server=localhost;uid=root;password="
'ÎÞÐèÅäÖÃdsn
set adodataconn = server.createobject("adodb.connection")
adodataconn.open strconnection
strquery = "select * from News"
set rs = adodataconn.execute(strquery)
if not rs.bof then
%£¾
£¼table£¾
£¼tr£¾
£¼td£¼b£¾ÐòÁкţ¼/b£¾£¼/td£¾
£¼td£¾£¼b£¾±êÌ⣼/b£¾£¼/td£¾
£¼/tr£¾
£¼%
do while not rs.eof
%£¾
£¼tr£¾
£¼td£¾£¼%=rs("News_id")%£¾£¼/td£¾
£¼td£¾£¼%=rs("News_Title")%£¾£¼/td£¾
£¼/tr£¾
£¼%
rs.movenext
loop
%£¾
£¼/table£¾
£¼%
else
response.write("ÎÞÊý¾Ý.")
end if
rs.close
adodataconn.close
set adodataconn = nothing
set rsemaildata = nothing
%£¾
PS£ºÈôÏëÖ±½ÓʹÓÃÒÔÉÏ´úÂ룬Ç뽫ȫ½Ç·ûºÅ“£¼£¾”Ìæ»»³É°ë½Ç·ûºÅ“<>”¡£


Ïà¹ØÎĵµ£º

PerlÖÐDBI¡¢DBD::mysqlÄ£¿éµÄ°²×°

PerlÖÐDBI¡¢DBD::mysqlÄ£¿éµÄ°²×°
ʹÓõÄÈí¼þ°æ±¾
DBI-1.604.tar.gz
DBD-mysql-4.006.tar.gz
½¨ÒéʹÓÃÒÔÉϰ汾´îÅ䣬·ñÔò¿ÉÄÜÁ¬½Ómysql´íÎó
Ò»¡¢DBIµÄ°²×°
 wget http://www.cpan.org/modules/by-module/DBD/DBI-1.604.tar.gz
 tar -zxvf DBI-1.604.tar.gz
 cd DBI-1.604
 perl Makefile.PL ......

ASPÖÐÈÕÆÚÏà¼Ó¼°Ïà¼õ

ÔÚASPÖÐΪÎÒÃÇÌṩÁËרÃŵÄÈÕÆÚ¼Ó¼õº¯Êý¡£
¡¡¡¡1.ÈÕÆÚÏà¼Ó
¡¡¡¡DateAdd º¯Êý 
¡¡¡¡·µ»ØÒÑÌí¼ÓÖ¸¶¨Ê±¼ä¼ä¸ôµÄÈÕÆÚ¡£ 
¡¡¡¡DateAdd(interval, number, date) 
¡¡¡¡DateAdd º¯ÊýµÄÓï·¨ÓÐÒÔϲÎÊý 
¡¡¡¡£¨1£©interval ±ØÑ¡Ïî¡£×Ö·û´®±í´ïʽ£¬±íʾҪÌí¼ÓµÄʱ¼ä¼ä¸ô¡£ÓйØÊýÖµ£¬Çë²ÎÔÄ“ÉèÖ ......

AspÈý¼¶Áª¶¯ÏÂÀ­²Ëµ¥Êý¾Ý¿âµ÷Óðæ

<%
Option Explicit
'Êý¾Ý¿â½á¹¹£º
'location
'±í1 loaction  ËùÔÚµÄÊÐ ±í
'   ×Ö¶Î
'   loactionid  £¨Ö÷¼ü£©
'   loactionname Ãû×Ö
'±í2 district  ËùÔÚµÄÏØ ±í
'   ×Ö¶Î
'   locationid £¨Ö÷¼ü£©
'    districtid
'&n ......

aspÎļþËÑË÷

aspÎļþËÑË÷
 
 
 
<%
'*************Set newsearch=new SearchFile 'ÉùÃ÷ *************
'*************newsearch.Folder="F:+E:"'´«ÈëËÑË÷Ô´*************
'*************newsearch.keyword="»ã±à"     '¹Ø¼ü´Ê*************
'*************newsearch.Search &nbs ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ