OPENDATASOURCE ´ò¿ªexcel¡¢access¡¢qsl
OPENDATASOURCE ´ò¿ªexcel¡¢access¡¢qsl
use test
insert into OPENDATASOURCE('SQLOLEDB', 'Data Source=192.168.2.200;User ID=sa;Password=110').test.dbo.adf--´ò¿ªÔ¶³ÌÊý¾Ý¿â
select * from OpenRowSet('Microsoft.Jet.OLEDB.4.0', 'Excel 8.0;HDR=Yes;IMEX=1;Database=c:\2003.xls', [kg$])
--²éѯԶ³ÌÊý¾Ý¿â
select * from OPENDATASOURCE('SQLOLEDB', 'Data Source=·þÎñÆ÷µØÖ·;User ID=Óû§Ãû;Password=ÃÜÂë').test.dbo.adf;
--´ò¿ªsqlÔ¶³ÌÊý¾Ý
select * from OpenRowSet('Microsoft.Jet.OLEDB.4.0', 'Excel 8.0;HDR=Yes;IMEX=1;Database=c:\2003.xls', [±í¸ñÃû³Æ$])
select * from Opendatasource('Microsoft.Jet.OLEDB.4.0', 'Excel 8.0;HDR=Yes;IMEX=1;Database=c:\2003.xls')...[±í¸ñÃû³Æ$]
--¿ª´òexcel
select * from
opendatasource('Microsoft.jet.oledb.4.0','data source=Êý¾Ý¿âËùÔÚλÖÃ.mdb;user id=admin;password=;')...[±í¸ñÃû³Æ]
--´ò¿ªaccess
£¨×¢£ºÓÃoffice2007µÄͬѧ °Ñprivider¸ÄΪ'Microsoft.ACE.OLEDB.12.0'£¬2007Óë2003µÄÌṩÆ÷ÊDz»Ò»ÑùµÄ¡£¡£ÌرðÖ÷Ò⣡£¡£¡£©
Ïà¹ØÎĵµ£º
½â¾ö°ì·¨£º
´Ó Windows µÄ“¿ªÊ¼”²Ëµ¥£¬Ö¸Ïò“³ÌÐò”¡¢ “Visual Studio .NET 2003”¡¢“Visual Studio .NET ¹¤¾ß”£¬È»ºóÑ¡Ôñ“Visual Studio .NET ÃüÁî Ìáʾ”¡£ÔÚ´°¿Ú´ò¿ªºó£¬¼üÈë aspnet_regiis /i¼´¿É¡£
²»¿ÉÐеķ½°¸£º
1¡¢ÖØÆôµçÄÔ¡£
2¡¢É¾³ý»º´æ¡£
3¡¢ÖØÐ ......
1¡¢Datediff£º
1.1Ëã³öÈÕÆÚ²î£º
1.access: datediff('d',fixdate,getdate())
2.sqlserver: datediff(day,fixdate,getdate())
ACCESSʵÀý£º select * from table where data=datediff('d',fixdate,getdate())
sqlserverʵÀý£º select * from ......
¡øÈÕÆÚ
CDate ½«×Ö·û´®×ª»¯³ÉΪÈÕÆÚ select CDate("2005/4/5")
Date ·µ»Øµ±Ç°ÈÕÆÚ
DateAdd ½«Ö¸¶¨ÈÕÆÚ¼ÓÉÏij¸öÈÕÆÚselect dateAdd("d",30,Date())½«µ±Ç°ÈÕÆÚ¼ÓÉÏ30Ìì,ÆäÖÐd¿ÉÒÔ»»Îªyyyy»òHµÈ
DateDiff ÅжÏÁ½¸öÈÕÆÚÖ®¼äµÄ¼ä¸ô select DateDiff("d","2006-5-1","2006-6-1")·µ»Ø31,ÆäÖÐd¿ÉÒÔ»»Îªyyyy,m,HµÈ
DatePart ·µ» ......
»¨ÁËÁ½¸öÍíÉϰïÅóÓѽ«Ò»¸öasp¿ª·¢µÄÍøÕ¾´ÓACCESSÊý¾Ý¿âתÏòSQL SERVER 2000. ÍøÉϲéÁËЩ×ÊÁÏ£¬¼ÓÉÏ×Ô¼ºµÄ¾Àú£¬×ܽ᣺
1¡¢Ê×ÏÈ¿´asp µÄ³ÌÐòÖÐÊÇ·ñÓÐ on error resume next; Èç¹ûÓÐ,ÏÈ×¢Ê͵ô¡£·ñÔòºÜ¶à´íÎóÎÞ·¨±©Â¶³öÀ´
2¡¢´´½¨SQL SERVER Êý¾Ý±í¡£ ʹÓÃSQL SERVER 2000×Ô´øµÄÊý¾Ýµ¼ÈëÏòµ¼£¬½«ACCESSÊý¾Ý¿âÖеıí½á¹¹£¬ÒÔ¼ ......
<%
function FSOFileDel(filename)
Dim objFSO,objCountFile,FiletempData
On Error Resume Next
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objCountFile =objFSO.DeleteFile(Server.MapPath(filename),true)
objCountFile.Close
Set objCountFile=Nothing
Set objFSO = Nothing
En ......