aspÍøÕ¾´ÓACCESSתSQLSERVER
Ç°¼¸ÌìΪÖÆ×÷Ò»¸öÍøÕ¾£¬ÐèÒª´ÓACCESSתÖÁSQLSERVER£¬´ÓÍøÕ¾Éϲ鿴Á˺ܶàµÄ×ÊÁÏ£¬µ«¾õµÃûÓÐÒ»¸öÄܹ»È«Ã渲¸ÇÒªµãµÄ£¬ËùÒÔÎÒ×ܽáһϣ¬Ë³±ã
¸ø³öһЩ¾Ñé¡£
Ê×ÏÈÈç¹ûÒ»¿ªÊ¼¾ÍÐèÒªÖÆ×÷SQLSERVERµÄÍøÕ¾£¬ÄÇô×îºÃ½«ÄãµÄ°®»ú×°ÉÏWINDOWS2000»òÕß2003ÕâÑùµÄSERVER°æ£¬ÕâÑùµÄ°æ±¾ÊÇÖ§³Ö
SQLSERVERÕýʽ°æµÄ°²×°µÄ£¬¶øXPÖ»ÄÜÖ§³Ö¸öÈË°æ»òÕß¿ª·¢°æ£¬ÎÒûÓÐ×°¹ý£¬µ«¶ÔÓÚµ÷ÊÔÍøÕ¾¶øÑÔ×îºÃ»¹ÊÇÔÚÕýʽ°æϹ¤×÷£¬×ª»¯µÄÕû¸ö¹ý³Ì²»ËãÌ«¸´
ÔÓ£¬µ«ÖÁÉÙ¿ÉÒÔÊ¡ÏÂһЩ¾«Á¦¡£Îҵİ®»úÊÇXP£¬ËùÒÔÖ»ºÃÏÈÓÃACCESSµ÷ÊÔ¡£
ºÃÁË£¬µ±ÄãÕÒµ½Ò»Ì¨×°ÓÐSQLSERVERµÄ»úÆ÷ʱ£¬Äã±ã¿ÉÒÔ¿ªÊ¼×ª»»²¢µ÷ÊÔÁË¡£
1¡£ÏÈÀûÓÃת»¯Èí¼þ£ºCooSel2.0 CreateSQL
V1.05£¬ÎÒÓõÄÕâ¸ö£¬·Ç³£ºÃÓ᣾ßÌå²Ù×÷µÄ»°£¬ÎÒÓõÄÊÇÉú³ÉÉýǨSQL½Å±¾£¬±£´æΪ
*.sqlÎļþºó£¬ÔÚSQL2000µÄ²éѯ·ÖÎöÆ÷Àïµ÷ÈëÖ´ÐС£¶øSQLSERVERµÄ¾ßÌå²Ù×÷Ôڴ˲»±ã׸Êö¡£ÕâÑù£¬ÄãµÄÊý¾Ý¿â¾Íת»¯³ÉÁËMSSQLÊý¾Ý¿â
2¡£¶Ôasp¶øÑÔ£¬Ê×ÏÈÊÇÊý¾Ý¿âÁ¬½ÓÎļþµÄÐ޸ģºÕâµã¿ÉÒԲο¼¶¯ÍøÂÛ̳µÄconn.asp
Dim ConnStr
'sqlÊý¾Ý¿âÁ¬½Ó²ÎÊý£ºÊý¾Ý¿âÃû¡¢Óû§ÃÜÂë¡¢Óû§Ãû¡¢Á¬½ÓÃû£¨±¾µØÓÃlocal£¬ÍâµØÓÃIP£©
Dim
SqlDatabaseName,SqlPassword,SqlUsername,SqlLocalName
SqlDatabaseName =
"dvbbs7" 'Êý¾Ý¿âÃû³Æ
SqlPassword = "" 'Êý¾Ý¿âÃÜÂë
SqlUsername =
"dvbbs" 'Êý¾Ý¿âÓû§Ãû
SqlLocalName = "(local)"
ConnStr =
"Provider = Sqloledb; User ID = " & SqlUsername & "; Password = "
& SqlPassword & "; Initial Catalog = " & SqlDatabaseName
& "; Data Source = " & SqlLocalName & ";"
On Error Resume
Next
Set conn = Server.CreateObject("ADODB.Connection")
conn.open
ConnStr
¼´Ö»ÐèÒªÐÞ¸ÄÊý¾Ý¿âÃû³Æ¡¢Óû§ÃûºÍÃÜÂë¼´¿É¸²¸ÇÔÀ´µÄACCESSÁ¬½Ó·½·¨²¢Ê¹Óá£Èç¹ûÄãµÄÍøվͬʱ°üº¬Á˶¯ÍøÂÛ̳£¬Ôò¿É¸ù¾Ý1¡£µÄ²Ù×÷½«¶¯ÍøµÄÊý
¾Ý¿âҲת»»³ÉSQLSERVER£¬ÖµµÃ³ÆµÀµÄÊÇ£º¶¯Íø¿¼ÂÇÁËACCESSºÍSQLSERVERÁ½ÖÖÊý¾Ý¿âµÄʹÓã¬Òò´ËÔÚÐÞ¸ÄASPÔ´´úÂëµÄʱºò²»ÐèÒª¶Ô¶¯
ÍøµÄÔ´´
Ïà¹ØÎĵµ£º
1.Á¬½ÓAccessµÄÁ¬½Ó×Ö·û´®
string strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + @FileName;
2.Á¬½ÓExcel
string strExcel = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= " + @FileName + ";Extended Properties=Excel 8.0;"; ......
×î½üдվÄÚËÑË÷£¬ËùÒÔÑо¿ÁËÒ»ÏÂËã·¨£¬¸ÃËã·¨µÄÔÀíÈçͼÏÔʾ¡£
ÒÔÏÂÊÇÒ»¸öÓÃaspдµÄ¼òµ¥µÄ·Ö´Ê³ÌÐòÖ÷ÒªµÄ´úÂ룬´Ê¿âÎÒÒѾÓÃaccess½¨Á¢ºÃÁË¡£
Èç¹ûҪעÖØЧÂÊ£¬MarLenµÄÑ¡È¡ºÜÊÇÖØÒª£¬·ñÔòЧÂÊ»áÊ®·ÖµÍÏ£¬ÕâÀïMarLenÎÒÑ¡È¡µÄÊÇ5¡£
dim faword : faword = ""
do while (len(fword) > 0)
tword = left(fwor ......
´úÂ룺
<%@ LANGUAGE=VBScript CodePage=65001%>
<%
private function decodeBase64(base64)
dim DM, EL
Set DM = CreateObject("Microsoft.XMLDOM")
Set EL = DM.createElement("tmp")
EL.DataType = "bin.base64"
& ......
Å×ÆúMS Access°É£¬ÇëʹÓÃSQLite
1¡¢SQLite¼ò½é
SQLiteµÚÒ»¸öAlpha°æ±¾µ®ÉúÓÚ2000Äê5ÔÂ. ÖÁ½ñÒѾÓÐ4¸öÄêÍ·ÁË. ¶øÔÚ½ñÄêµÄ5ÔÂSQLiteÒ²ÓÀ´ÁËÒ»¸öеÄÀï³Ì: SQLite 3. SQLite¹Ù·½ÍøÕ¾: http://www.sqlite.org/
2¡¢SQLiteÀàÐÍ
SQLiteµÄÊý¾ÝÀàÐÍ
Ê×ÏÈÄã»á½Ó´¥µ½Ò»¸öÈÃÄ㾪ÑȵÄÃû´Ê: Typelessness(ÎÞÀàÐÍ). ¶Ô! SQLiteÊÇÎÞ ......