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»Ò»ÑùµÄ¡£¡£ÌرðÖ÷Ò⣡£¡£¡£©
Ïà¹ØÎĵµ£º
´ò¿ªaccess,ÔÚÐèÒªµ¼³öµÄ±íÉÏÓÒ¼ü-->µ¼³ö-->ODBCÊý¾Ý¿â-->µ¯³öÒ»¸ö´°¿Ú£¬Ö±½Óµã»÷È·¶¨-->Ñ¡Ôñ“»úÆ÷Êý¾ÝÔ´”£¨Ã»ÓеϰÐèÒªÅäÖÃÒ»¸öеÄÊý¾ÝÔ´£¬ºÜ¼òµ¥£¬²Ù×÷Ò»ÏÂÊÔÊÔ£©£¬µã»÷È·¶¨-->Ìáʾ“³É¹¦µ¼Èë”ÐÅÏ¢
ÉÔµÈÆ¬¿Ì£¬Ë¢ÐÂÒ»ÏÂÊý¾Ý¿â£¨ÓеÄÐèÒªÖØÐµÇ¼һÏ£¬»òÕßÖØÐÂÑ¡ÔñÒ»ÏÂmyobject£ ......
ÔÚaccessÖУ¬updateÓï¾ä²»ÄÜÓÐ×Ó²éѯµÄ£¬Èç²»ÔÊÐíÈçÏÂÓï¾ä³öÏÖ£º
UPDATE tblA SET lngID=
(SELECT lngID from tblB WHERE strName='nihao')
ÕâÑù¾ÍÐèÒªÁíÏë°ì·¨½â¾öÎÊÌâ¡£
½â¾ö·½°¸£º
A¡£
¿ÉÒÔÓÃupdateÁíÍâµÄÓï·¨½â¾ö£º
UPDATE Tab1 a,(Select ID,Name from Tab2) b
SET a.Name = ......
<%
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 ......