ÓÃVC´¦ÀíACCESSÖеÄλͼÊý¾Ý
----±È½Ï¸´ÔÓµÄÊý¾Ý¿âÖÐÒ»°ã»áÓÐλͼÊý¾Ý£¨±ÈÈçÏàƬ£©¡£ËäÈ»ÕâÀà“OLE¶ÔÏó”µÄ²åÈ롢ɾ³ýÒÔ¼°Ìæ»»²Ù×÷ÔÚACCESSÀïÈÝÒ×ʵÏÖ£¬ÔÚVCÖÐÈ´ÏԵø´ÔÓ¶øÇÒÆÄ·ÑÖÜÕÛ¡£ÒÔÏ°Ñ×÷ÕßÓÃVC´¦ÀíACCESSÊý¾Ý¿âÖеÄλͼÊý¾ÝµÄÌå»á¼òµ¥ÐðÊöһϣ¬ÒÔÇë½ÌÓÚ´ó¼Ò¡£
----ÔÚCdaoRecordsetÅÉÉúÀàµÄ¶ÔÏóÖУ¬VC×Ô¶¯ÎªACCESSµÄ“OLE¶ÔÏó”ÓòÉú³ÉÒ»¸öCLongBinary¶ÔÏ󡣸ÃÀàËäÈ»½Ï¼òµ¥£¬ÔÚ³ÌÐòÀïÈ´ÐèҪʹÓÃÈ«¾Öº¯ÊýGlobalAlloc()ºÍGlobalFree()´¦ÀíÓëËüµÄÄÚ´æ¾ä±úm_hDataÓйزÙ×÷£¬·ÃÎÊÊý¾ÝÇ°ºóÒªµ÷ÓÃGlobalLock()ºÍGlobalUnlock()£¬¶øÇÒ»¹Òª¸øËüµÄm_dwDataLength¸³Öµ£¬Ê¹ÓÃÆðÀ´Ïà¶Ô¸´ÔÓ£¬ËùÒÔÒ»°ãÍƼöʹÓÃCByteArrayÀà¡£ÕâÖ»ÐèÒªÔÚCdaoRecordsetÅÉÉúÀà¶ÔÏóµÄÊý¾Ý˵Ã÷ÀïÐÞ¸Äһϣ¬²¢°ÑDoFieldExchange()ÀïµÄDFX_LongBinary()¸Ä³ÉDFX_Binary()¼´¿É¡£
----×÷Õ߶¨ÒåÁËÒ»¸öÒÔCObjectΪ»ùÀàµÄCDibÀࣨCDaoRecordViewµÄÅÉÉúÀàÀﶨÒåÁËCDib¶ÔÏó³ÉÔ±m_DIB£©£¬ÆäÖаüÀ¨Ò»Ï³ÉÔ±ºÍ·½·¨£º
CByteArray m_bufDIB;
BOOL Create(CByteArray& ba);
BOOL Create(CFile& bmpFile);
BOOL Paint(HDC hDC);
----m_bufDIBÊǴ洢λͼÊý¾ÝµÄ»º³åÇø¡£Îª¼ò±ãÆð¼û£¬Ëü²»°üº¬°ü×°ÐÅÏ¢ºÍBITMAPFILEHEADER½á¹¹¡£ÕâÑù¶ÔÊý¾Ý¿â¸üкó£¬ÔÓеēOLE¶ÔÏó”ÀàÐͽ«±ä³É“³¤¶þ½øÖÆÊý¾Ý”£¬²»ÄÜÔÚACCESSÀï²é¿´ÁË¡£
----µÚÒ»¸öCreate()ÖØÔØ·½·¨µÄ²ÎÊýbaÊǼǼ¼¯µÄλͼÊý¾Ý£¨±ÈÈçm_image£©£¬Ê¹ÓÃCByteArray::Copy()°ÑÊý¾Ý¸´ÖƸøm_bufDIB;µÚ¶þ¸öCreate()·½·¨µÄ²ÎÊýbmpFileÊÇÒÑ´ò¿ªµÄλͼÎļþ£¬Ê¹ÓÃCFile::ReadHuge()°ÑÎļþÀïµÄÊý¾Ý¶ÁÈëm_bufDIB£¨·ÅÆúÇ°ÃæµÄBITMAPFILEHEADER½á¹¹£©£º
DWORDdwBufSize;
dwBufSize=bmpFile.GetLength();//»ñµÃÎļþ³¤¶È
bmpFile.Seek((long)sizeof(BITMAPFILEHEADER),
CFile::begin);//·ÅÆúÎļþÍ·
dwBufSize-=sizeof(BITMAPFILEHEADER);
m_bufDIB.SetSize(dwBufSize);//ÉèÖûº³åÇø´óС
file.ReadHuge((LPSTR)(m_bufDIB.GetData()),dwBufSize);
……
----Paint()·½·¨µ÷ÓÃÁËSetDIBitsToDevice()º¯Êý£¨¸ù¾ÝÇé¿öÒ²¿ÉÒÔʹÓÃStretchDIBits()£©£¬²ÎÊýhDCÊÇCDaoRecordviewµÄ×ÊÔ´ÖеÄÒ»¸ö¾²Ì¬¿ØÖƵÄÉ豸¾ä±ú£¬×÷ΪSetDIBitsToDevice()µÄµÚÒ»¸ö²ÎÊý¡£Èç¹û²»ÊÇ16»ò24λµÄλͼ£¬»¹ÐèÒª½¨Á¢ºÍÉèÖõ÷É«°å¡£Paint()·½·¨³ýÁËÔÚCDaoRecordViewÅÉÉúÀàµÄOnMove()Àïµ÷ÓÃÍ⣬Ҳ±»OnPaint()µ÷ÓÃ(×îºÃ²»ÔÚOnDraw()Àïµ÷ÓÃ)£º
void CDeri
Ïà¹ØÎĵµ£º
<%
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 ......
Ò»¡¢SQL SERVER ºÍACCESSµÄÊý¾Ýµ¼Èëµ¼³ö
³£¹æµÄÊý¾Ýµ¼Èëµ¼³ö£º
ʹÓÃDTSÏòµ¼Ç¨ÒÆÄãµÄAccessÊý¾Ýµ½SQL Server£¬Äã¿ÉÒÔʹÓÃÕâЩ²½Öè:
¡¡¡¡¡ð1ÔÚSQL SERVERÆóÒµ¹ÜÀíÆ÷ÖеÄTools£¨¹¤¾ß£©²Ëµ¥ÉÏ£¬Ñ¡ÔñData Transformation
¡¡¡¡¡ð2Services£¨Êý¾Ýת»»·þÎñ£©£¬È»ºóÑ¡Ôñ czdImport Data£¨µ¼ÈëÊý¾Ý£©¡£
¡¡¡¡¡ ......
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$])
--²éѯԶ³ÌÊý¾Ý ......
DELPHIÖвÙ×÷ACCESSÊý¾Ý¿â(½¨Á¢.mdbÎļþ,ѹËõÊý¾Ý¿â)
ÒÔÏ´úÂëÔÚWIN2K,D6,MDAC2.6ϲâÊÔͨ¹ý,
±àÒëºÃµÄ³ÌÐòÔÚWIN98µÚ¶þ°æÎÞACCESS»·¾³ÏÂÔËÐгɹ¦.
//ÉùÃ÷Á¬½Ó×Ö·û´®
Const
SConnectionString
= 'Provider=M ......
asp.netµÄ´íÎó--Failed to access IIS metabase ÊÕ²Ø
Server Error in '/sdxx' Application.
--------------------------------------------------------------------------------
Failed to access IIS metabase.
Description: An unhandled exception occurred during the execution of the current web ......