vb Á¬½ÓAccess×Ö·û´®¡¢vbÁ¬½ÓDb2µÄ×Ö·û´®
DB2ConnectionString
b2str = "Provider=MSDASQL.1;Password=a$sk6G7;Persist Security Info=True;User ID=DBA;Data Source=ConDB2SFXXK"
AccessConnectonString
accessstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\DMSJK.mdb;Jet OLEDB:database password="
Ïà¹ØÎĵµ£º
°ÑÏÂÃæµÄ´úÂë Õ³Ìùµ½Îı¾
ON ERROR RESUME NEXT
Dim VOL_PROD_KEY
if Wscript.arguments.count<1 then
VOL_PROD_KEY=InputBox("Powered By www.cnbeta.com"&vbCr&vbCr&" ±¾³ÌÐò½«×Ô¶¯Ìæ»»Ä㵱ǰ Windows µÄÐòÁкÅ,ͨ¹ý΢ÈíÑéÖ¤ÍêÈ«Õý°æ¡£"&vbCr&vbCr&"ÐòÁкÅ(OEM°æÎÞЧ,ĬÈϰ汾Ϊ XP VLK)£ ......
²¿·ÖÂÛ̳ÐÂÊÖÃÇû¾¯Ìè×Ô¼ºÂÛ̳Êý¾Ý¿â´æÔÚµÄΣÏÕ£¬ËùÒÔ»¹ÊÇ ¾ö¶¨ÒÔDvbbs7.0ΪÀý£¬½éÉÜÒ»ÏÂÈçºÎ±£»¤ºÃÄãµÄAccessÊý¾Ý¿â ¡£Ïл°ÐÝ˵£¬ÇëÍùÏ¿´£º
1¡¢¸øÄãµÄAccessÊý¾Ý¿â¼ÓÉÏÃÜÂë±£»¤£¨ÆäʵAccessÊý¾Ý¿â µÄÃÜÂë±£»¤·Ç³£´àÈõ£¬ÕâÀֻÊǸøËû¶à¼ÓÉÏÒ»°ÑËø¶øÒÑ£©¡£
a.´ò¿ªMicroSoft AccessÈí¼þ£¬ÊÇÓöÀÕ¼·½Ê½´ò¿ªÄãµÄDVÂÛ Ì³Êý¾ ......
Ê×ÏÈ´ò¿ªSQL Server Management Studio£¬½¨Á¢Ò»¸öÊý¾Ý¿â£¬½¨Á¢ºÃÊý¾Ý¿âºóÑ¡ÔñÄãµÄÊý¾Ý¿âÃû£¬ÓÒ¼ü--ÈÎÎñ--µ¼ÈëÊý¾Ý¿â
´ò¿ªSQLµ¼ÈëºÍµ¼³öÏòµ¼--ÏÂÒ»²½--Êý¾ÝÔ´Ñ¡Ôñ£¨Microsoft Access£©--Ñ¡ÔñÄãµÄACCESSÊý¾Ý¿âÈ»ºóÏÂÒ»²½
¡¡
¹Ø¼üµÄÒ»²½ÔÚ“Ñ¡ÔñÔ´±íºÍÔ´ÊÓͼ”ÕâÀѡÔñ±í--±à¼Ó³Éä--Ñ¡ ......
public static class AccessHelper
{
//Êý¾Ý¿âÁ¬½Ó×Ö·û´®
//WebForm
//public static readonly string conn_str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + HttpContext.Current.Request.PhysicalApplicationPath + System.Configuration.ConfigurationManager ......