IsSqlDataBase = 0 'Ö÷Êý¾Ý¿âÀàÐÍ(1=SQL£¬0=AC)
'===========================================================================
SqlDatabaseName = "ads365" 'Ö÷Êý¾Ý¿âÃû
SqlUsername = "sa" 'Ö÷Êý¾Ý¿âµÇ¼Óû§
SqlPassword = "" 'Ö÷Êý¾Ý¿âµ ......
ÎÒдÁËÒ»¶Î£¬µ«ÊÇÓеãÎÊÌâ¡£°ïæ¿´¿´¡£
<%
action=request("action")
if action="make_excel" then'Ö»ÓлñÈ¡Ö¸Áî²Å½øÐвÙ×÷
dim conn,ConnStr
ConnStr="DBQ="+server.mappath(". ......
HTML code:
<HTML>
<HEAD>
<TITLE>Information Display</TITLE>
</HEAD>
<BODY>
<%
Dim conn
set conn=server.createobject ("adodb.connection")
conn.open "driver={microsoft access driver
(*.mdb)};dbq="& server.mappath ("guestboo ......
Ô´´úÂë
C# code:
<asp:Repeater runat="server" ID="rptShowLink">
<ItemTemplate>
<div>
<%# DataBinder.Eval(Container.DataItem, "TIT")%>
......
ÏÖÔÚ×öµÄÒ»¸ö¹«Ë¾ÏîÄ¿ÒªÇóÒªÓÐÁ½¸ö°æ±¾ Ò»¸öÊÇÓÃAccessµÄÊý¾Ý¿â ÁíÒ»¸öÓÃsql server µÄÊý¾Ý¿â
ÇëÎÊÓÐ×ö¹ýÏà¹Ø¹¦ÄܵĸßÊÖ°ïæָ½Ì ÈçºÎʵÏÖ£¿
ÓõÄÊÇʲô˼·£¿
²Î¿¼petshopÀïÃæµÄ¼Ü¹¹¡£¡£¡£
Á¬½ÓÈ«²¿Ê¹ÓÃOleDBConnection
SQLÓï¾äÈ«²¿Ê¹Óñê×¼T-SQL¼´¿É
ÔËÓÃÁ½ÖÖÁ¬½Ó¡£Ò»¸öÓÃAccessµÄÊý¾Ý ......
³ÌÐòʱASP+access
sql="select top 2 id,username from comp order by rnd(id) "
ÉÏÃæÓï¾äˢкó¶¼ÊÇÒ»¸öÖµ ÕâÑù»¹ÓÐËæ»úµÄÒâÒåÂð
ACCESSÓÐË¢ÐÂËæ»úÑ¡ÔñµÄSQLÓï¾äÂð
Ôõô°ìÄØ
ÓÐµÄ ÎÒ½â¾öÁË ÔŲ́ÍåÂÛ̳ÉÏÕÒµ½ÁË ¹«²¼·ÖÏíÏÂ
Select TOP 1 * fro ......