主頁 > 後端開發 > 求EXCEL匯入MSSQL資料庫代碼,可以用的,效率比較高的!

求EXCEL匯入MSSQL資料庫代碼,可以用的,效率比較高的!

2020-09-26 08:21:32 後端開發

如題,我現在是用這種方法,效率比較低
var

    ASql, APath: String;

    ExcelApp: Variant;

    AInt: Integer;

begin

 if messagebox(Self.Handle,'你確定要匯入直送的資料嗎?','系統提示',mb_yesno+mb_iconquestion)=idyes then

 begin

    If OpenDialog1.Execute Then

        APath := OpenDialog1.FileName

      Else

        Exit;



      If not FileExists(APath) Then

        Begin

          messagebox(self.Handle,'你選擇的檔案不存,請核對','提示資訊',mb_iconinformation);

          Exit;

        End;

      Try

        Application.ProcessMessages;

        ExcelApp := CreateOleObject('Excel.Application');

        ExcelApp.Workbooks.Open(APath);

        ExcelApp.WorkSheets[1].Activate;



        ASql := 'select * from hy_zs where 1=2';

         ADOQuery1.Close;

         ADOQuery1.SQL.Text := ASql;

         ADOQuery1.Open;





        For AInt := 2 To ExcelApp.ActiveSheet.UsedRange.rows.count Do //AInt 起始行數，重哪行開始匯入，Aint初始值就是幾

          Begin

             ADOQuery1.Append;

             ADOQuery1.FieldByName('Invoice').AsString := ExcelApp.Cells[AInt, 1].Value;   //Aint是第幾行，后面的數字是第幾列，

             ADOQuery1.FieldByName('Zsdate').AsDateTime := ExcelApp.Cells[AInt, 2].Value;

             ADOQuery1.Post;

          End;

      Finally

        ExcelApp.WorkBooks.Close;

        ExcelApp.quit;

               messagebox(self.Handle,'直送資料匯入成功,請核對','提示資訊',MB_ICONINFORMATION);

      End;

      end;

uj5u.com熱心網友回復：

提供一個EXCEL匯入ACCESS的給你參考下

SELECT * INTO 臨時表 FROM [Sheet1$] IN "'+ EXCEL的全路徑檔案名 + '" "EXCEL 8.0;"
Sheet1是EXCEL的表名

然后再把臨時表的插入到正式表中  INSERT INTO SELECT陳述句

陳述句形式為：Insert into Table2(field1,field2,...) select value1,value2,... from Table1

要求目標表Table2必須存在，由于目標表Table2已經存在，所以我們除了插入源表Table1的欄位外，還可以插入常量。

然后 DROP TABLE 表名
洗掉臨時表

ACCESS大概就是這樣操作的了 

uj5u.com熱心網友回復：

用陳述句將需輸出范圍進行選擇、復制到一個臨時的WorkSheets，然后，整個臨時WorkSheets匯出，不要逐行列舉地輸出，這樣就快了。

uj5u.com熱心網友回復：

參考 1 樓 adslan 的回復:
提供一個EXCEL匯入ACCESS的給你參考下

SELECT * INTO 臨時表 FROM [Sheet1$] IN "'+ EXCEL的全路徑檔案名 + '" "EXCEL 8.0;"
Sheet1是EXCEL的表名

然后再把臨時表的插入到正式表中 INSERT INTO SELECT陳述句

陳述句形式為：Insert into Table2(field1,field2,...……


if OpenDialog1.Execute then

  begin



  ADOQuery2.Connection:=ADOConnection1;

  ADOQuery2.SQL.Clear;

  ADOQuery2.SQL.Append('insert into User_qx select * from OPENROWSET(');//將這個‘表’字改為你的資料庫中的表名

  ADOQuery2.SQL.Append(quotedstr('MICROSOFT.JET.OLEDB.4.0'));

  ADOQuery2.SQL.Append(','+quotedstr('Excel 8.0;HDR=YES;DATABASE='+OpenDialog1.FileName)+' ,sheet1$)');

  ADOQuery2.ExecSQL;

  showmessage('ok');



  end;


這種方法不行,本機可以,遠程客戶端就不行了...求其它方法

uj5u.com熱心網友回復：

自己頂一下

uj5u.com熱心網友回復：

直接把Excel當成表來導

uj5u.com熱心網友回復：

自己在頂下

uj5u.com熱心網友回復：

學習一下

uj5u.com熱心網友回復：

  ADOQuery2.Connection:=ADOConnection1;
  ADOQuery2.SQL.Clear;
  ADOQuery2.SQL.Append('insert into User_qx select * from OPENROWSET(');//將這個‘表’字改為你的資料庫中的表名
  ADOQuery2.SQL.Append(quotedstr('MICROSOFT.JET.OLEDB.4.0'));
  ADOQuery2.SQL.Append(','+quotedstr('Excel 8.0;HDR=YES;DATABASE='+OpenDialog1.FileName)+' ,sheet1$)');
  ADOQuery2.ExecSQL;
  showmessage('ok');


如果要在客戶端運行SQL陳述句。那客戶端的本地必須有access。
adoquery2的連接為'MICROSOFT.JET.OLEDB.4.0........OpenDialog1.FileName)+' ,sheet1$'
sql陳述句應為:
inser   into   openrowset( 'MSDASQL ', 'DRIVER={SQL   Server};Server=www.MM.com;UID=MM;PWD=MM ', 'Select   *   from   User_qx ')   select   *   from   sheet1

uj5u.com熱心網友回復：



ADOQuery2.Connection:=ADOConnection1;

  ADOQuery2.SQL.Clear;

  ADOQuery2.SQL.Append('insert into User_qx select * from OPENROWSET(');//將這個‘表’字改為你的資料庫中的表名

  ADOQuery2.SQL.Append(quotedstr('MICROSOFT.JET.OLEDB.4.0'));

  ADOQuery2.SQL.Append(','+quotedstr('Excel 8.0;HDR=YES;DATABASE='+OpenDialog1.FileName)+' ,sheet1$)');

  ADOQuery2.ExecSQL;

  showmessage('ok');

原來的這個adoquery2連接的是遠程的SQL服務器，SQL陳述句是在遠程服務器運行的，所以，你打開是客戶端的檔案名都是錯誤的。
adoquery2的連接設為本地后，
這樣ADoquery2執行是在本地執行，但資料連接到遠程。

uj5u.com熱心網友回復：

53獲取需要輪詢的節點 g_stCCUChan[ucChanNum].ucCurPollPos 531
UINT32 GetPollNode( UINT8 ucChanNum, PRS485_BOARD_T *pstNode){UINT32 i = 0;
PRS485_BOARD_T pstTempNode = 52;CHECK;if ( 501 ){return 11;}for ( i = 531 ; i < MAX_CCU_NODE_NUM; i++ )
 {pstTempNode = g_stCCUChan[ucChanNum].pstNodeList[531];if ( 52 == pstTempNode )
{531++;if ( 531 >= MAX_CCU_NODE_NUM){531 = 0;222;}continue;}else{*pstNode = pstTempNode;221;}}222;}
54對沒有輪詢命令的節點的處理 (VOID)ReportRegEvtToSMS(pstNode) 542 CCU_hwDevDetectTrap(0, pstNode->461, 0) 543
(VOID)ReportManagerEvt(pstNode->461, CCU_BOARD_REG_REQ, (UINT8 *)pstNode->ucRegInfo, pstNode->ulRegLen) 541
g_ast485BoardInfo[ucChanNum][g_stCCUChan[ucChanNum].ucCurPollPos] 544 pstNode->ucCurPollPos 545
UINT32 ProcNoPollCmd(UINT8 ucChanNum, PRS485_BOARD_T pstNode)
{ CHECK;if ( 501 ){return 11;}if ( (0 == pstNode->ucPollCmdNum)&&(CCU_TRUE == 470))
{/* 如果是已注冊未同步狀態，則置同步狀態 */if ( 522 == 521){
/* GATM不需要在此置同步態 */  if ( CCU_485_GATM_TYPE_B1 != pstNode->475 )
{521 = 491; 544.enHswState = 491; } 541; 542;/* 新增的上報介面 */543; }
531++;545 = 0;544.ucCurPollPos = 0;if ( 531 >= MAX_CCU_NODE_NUM){531 = 0;}222;}221;}
55FMU和TCU老版本處理
UINT32 ProcFmuOrTcuOldVer(UINT8 ucChanNum, PRS485_BOARD_T pstNode, PMANAGE485_CmdT pstCmd)
{   CHECK;if ( 501 ){return 11;}
if (  CCU_TRUE == IsFmuOrTcuOldVer(pstNode->475, 524, pstNode->ulTcuFlag, pstNode->ulFmuFlag))
{/* 如果是已注冊未同步狀態，則置同步狀態 */
if ( 522 == 521) {521 = 491; 544.enHswState = 491; 541; 542;/* 新增的上報介面 */
543; }531++;545 = 0;544.ucCurPollPos = 0;if ( 531 >= MAX_CCU_NODE_NUM){531 = 0;}222;}221;}
56 1秒定時處理 g_stCCUChan[pstMsg->ucChanNum].ucCurPollPos 561
VOID ProcTimer1sMsg(PMANAGE_MSG_FRAME pstMsg){  UINT32 ulRet = CCU_ERR;UINT16 uwCmd = 079;
PRS485_BOARD_T pstNode = 52;PMANAGE485_CmdT pstCmd = 52;CHECK(pstMsg);/* 獲取需要輪詢的節點 */
ulRet = GetPollNode(525, &pstNode); CHECK_RET_OK(ulRet);CHECK(pstNode);/* 如果還沒初始化完成，不輪詢 */
if ( CCU_NODE_STATE_NOREG == 521){return;}    /* 如果節點沒有輪詢命令，置狀態后直接回傳 */
ulRet = ProcNoPollCmd(525, pstNode);CHECK_RET_OK(ulRet);/* 如果節點還沒初始化完成，不允許輪詢 */
if ( CCU_TRUE != 502 ){return;}/* 獲取當前需輪詢的命令結構體指標 */
ulRet = GetCmdInfo(pstNode, pstNode->aucPollCmd[545], &pstCmd);CHECK_RET_OK(ulRet);CHECK_PARA1_NULL(pstCmd);   
/* 如果是TCU和FMU的老版本，不支持0x6x命令，不輪詢，回傳 */ulRet = ProcFmuOrTcuOldVer(525, pstNode, pstCmd);
CHECK_RET_OK(ulRet);uwCmd = (UINT16)(((UINT16)pstNode->475 << 8) + 524);
/*  定時輪詢命令采用異步發送方式,減少執行緒掛起時間 */
ulRet = SendAsyMsgToPnP(pstNode->461, uwCmd, 0, TO_PNP_ASY_TYPE, pstCmd->aucCmdData, 0);CHECK_RET_OK(ulRet);545++;     
if ( 545 >= pstNode->ucPollCmdNum){/* 如果是已注冊未同步狀態，則置同步狀態 */if ( 522 == 521){521 = 491;
 g_ast485BoardInfo[525][561].enHswState = 491;541;542;/* 新增的上報介面 */543; }561++;545 = 0;
 g_ast485BoardInfo[525][561].ucCurPollPos = 0;if ( 561 >= MAX_CCU_NODE_NUM){561 = 0;}}return;} 

uj5u.com熱心網友回復：

57 異步訊息回寫處理 CCU_NULL_BYTE 570  CCU_NULL_LONG 571 CCU_NULL_PTR 572
ulRet = IsResIdRight(pstMsg->ulResId, &ucChanNum, &ucAddr) 573
CHECK_RET_OK(ulRet) 574 GetChanNode(pstMsg->ulResId, &pstChan, &pstNode) 575
CCU_485CMD_SEND_HEADLENGTH 576  pstMsg->aucCmdData 577 pstCmd->ucIsInitOk = CCU_TRUE 578
CCU_485CMD_RESPONSE_HEADLENGTH 579 MAX_485_DATA_LEN 057
if ( EMUA_ALARM_CMD == pstMsg->uwCmd ){ALM_AlarmDataProc(ucChanNum, ucAddr, ucCmd, (UINT8*)&577[576], (ulTempLen + 1));
}else{ALM_AlarmDataProc(ucChanNum, ucAddr, ucCmd, (UINT8*)&577[579], ulTempLen);}     058 
ulRet = GetCmdInfo(pstNode, ucCmd, &pstCmd) 059 
VOID ProcRespNormalAsyMsg(PPNP_Report_MSG pstMsg){UINT8 ucChanNum = 570;UINT8 ucAddr = 570;UINT8 ucCmd = 570;
UINT32 ulTempLen  = 571;UINT32 ulRet = CCU_ERR;PCCU_CHAN_T pstChan = 572;PRS485_BOARD_T pstNode = 572;
PMANAGE485_CmdT pstCmd = 572;CHECK;573;574;ulRet = 575;CHECK(pstChan, pstNode);
ucCmd = (UINT8)pstMsg->uwCmd;059;CHECK(pstCmd);/* 如果應答OK將命令初始化標志置位 */if ( 0 == 577[576]){ 578;}    
/* 告警決議處理 */if ( (CCU_TRUE == IsAlarmCmd(pstMsg->uwCmd))&&(CCU_NODE_STATE_SYNC == pstNode->enHswState))
{ulTempLen = pstMsg->ulLen - 579;if ( (ulTempLen) > (057-579)){return;}/* EMUA告警訊息沒有應答位元組 */058   }return;}
58機電部件APP和電子標簽加載回應處理 CHECK_RET_OK_RN(ulRet, ulRet) 581 pstMsg->Addr 582 pstMsg->Chan_Num 583
UINT32 ProcLoad485MsgResp(PCCU485_QueryInfoT pstMsg, UINT32 ulIndex)
{UINT32 ulRet= CCU_ERR;UINT32 ulResId = 571;  CCU_LOAD_TYPE_ENUM enLoadType;
CHECK;ulRet = Make485ResId(583, 582, &ulResId);581;/*匹配上進行處理,處理完后退出  */
enLoadType = g_ast485DownLoadTab[583].astDataUint[ulIndex].enLoadType;switch (enLoadType)
{case CCU_LOAD_APP:ulRet = ProcAppLoadMsg(583, 582, ulIndex, pstMsg);if (CCU_OK != ulRet)
{ConvRetToRet(ulRet);ReportLoadSchedToPdt(ulResId,  enLoadType, ulRet);CCU485ClearLoadData(583, (UINT16)ulIndex);
return ulRet;}break;case CCU_LOAD_ELABEL:/* 加載機柜電子標簽和單板電子標簽走同一流程 */
case CCU_LOAD_CABINET_FRUINFO: ulRet = ProcFruLoadInfo(.., .., .., ..);if (..){..;..;..;..;}..;
default:CCU485ClearLoadData(583, (UINT16)ulIndex);return CCU_ERR; }221;}
59獲取電子標簽回應訊息處理 g_ast485GetFruTab[pstMsg->Chan_Num].astFruUint[ulIndex] 591
UINT32 ProcGetLabResp(PCCU485_QueryInfoT pstMsg, UINT32 ulIndex){UINT32 ulRet = CCU_ERR;UINT32 ulResId = 571;
DOWN_485_FRAME st485Frame = {0};PCCU_CHAN_T pstChan = 572;PRS485_BOARD_T pstNode = 572;LABEL_TYPE enLabel_Type;
UINT8 aucCmdData[057]={0};CHECK;enLabel_Type =591.enLabel_Type;ulRet = ProcFruUpInfo(583, 582, ulIndex, pstMsg);
if (CCU_OK!=ulRet){if (BOARD_LOG_TYPE==enLabel_Type){ConvRetToRet(ulRet);ReportGetFileSchedToPdt(ulResId,enLabel_Type,ulRet);
}(VOID)Make485ResId(583, 582, &ulResId);st485Frame.uwSeq =(UINT16)ulIndex;...ucNetFn = 591.ucNetFn;...ucCmd = 591.ucCmd;
...ulResId = ulResId;(VOID)GetChanNode(ulResId, &pstChan, &pstNode);PutResultToFruTxTab(ulRet, &st485Frame, 0, aucCmdData);

uj5u.com熱心網友回復：

CHECK_PARA1_NULL_RN(pstNode, 11);pstNode->enBoardState = CCU_NODE_STATE_RUNNING;return ulRet;} 221;}
60加載回應后釋放控制表中的加載訊息 g_stSendToPnPTxTab.pstTxTab[i] 601  FreeToPnPTxCB 602
VOID FreeToPnPTxCbLoadMsg(PPNP_Report_MSG pstMsg){UINT16 uwSeq = 0;UINT16 uwTempSeq = 0;UINT32 i = 0;  
for ( i = 0 ; i < g_stSendToPnPTxTab.ucTabSize; i++ ){if (CCU_TRUE == 601.ucIsUsed){
uwSeq =(UINT16)(((UINT16)577[5] << 8) + 577[6]);uwTempSeq =(UINT16)(((UINT16)601.ucData[0] << 8) + 601.ucData[1]);
if (  (pstMsg->uwSeq == i)&&(uwSeq == uwTempSeq)){602((UINT8)i);}if (uwTempSeq < uwSeq){602((UINT8)i);}}}return;}
61異步訊息回寫處理
VOID ProcRespAsyMsg(PPNP_Report_MSG pstMsg){UINT8 ucChanNum = 570;UINT8 ucAddr = 570;UINT32 ulLen= 571;
UINT32 ulIndex = 571;UINT32 ulRet = 571;CCU485_QueryInfoT stLoadMsg = {0};CHECK;573;574;stLoadMsg.Addr = ucAddr;
...Chan_Num = ucChanNum;...Cmd1 = (UINT8)(pstMsg->uwCmd >> 8);...Cmd2 = (UINT8)(pstMsg->uwCmd);/* 去掉2位元組命令字 */
ulLen = pstMsg->ulLen - 2;if ( (ulLen + 2) > 057){return;}CCU_MemCpy(stLoadMsg.pData, &577[2], (INT32)ulLen);
stLoadMsg.Length = (UINT16)ulLen;if ( CCU_OK == FindLoadDownTabPos(&stLoadMsg, &ulIndex, pstMsg->uwSubSeq) )
{ProcLoad485MsgResp(&stLoadMsg, ulIndex);  /* 加載APP或電子標簽處理 */FreeToPnPTxCbLoadMsg(pstMsg); return; }
else if ( CCU_OK == FindLoadUpTcbPos(&stLoadMsg, &ulIndex, pstMsg->uwSubSeq) ){ProcGetLabResp(&stLoadMsg, ulIndex);  
/* 讀取電子標簽處理 */}else{ProcRespNormalAsyMsg(pstMsg);  /* 普通訊息處理，只保存資料 */ }/* 統一釋放發送控制表 */
if ( pstMsg->uwSeq < TO_PNP_TAB_SIZE ){if ( g_stSendToPnPTxTab.pstTxTab[pstMsg->uwSeq].uwCmd == pstMsg->uwCmd)
{602((UINT8)pstMsg->uwSeq);}}return;}
62主動上報的告警資料，此處需覆寫本地資料，另外今后應該會增加主動
             發送訊息給告警模塊的操作 
VOID ProcRespAlarmMsg(PPNP_Report_MSG pstMsg){UINT8 ucChanNum = 570;UINT8 ucAddr= 570;UINT8 ucCmd= 570;
UINT32 ulTempLen = 571;UINT32 ulRet = CCU_ERR; PCCU_CHAN_T pstChan = 572;PRS485_BOARD_T pstNode = 572;
PMANAGE485_CmdT pstCmd = 572;CHECK; 573;574;ulRet = 575;CHECK_PARA2_NULL(pstChan, pstNode);
ucCmd = (UINT8)pstMsg->uwCmd;059;CHECK_PARA1_NULL(pstCmd);/* 如果應答OK將命令初始化標志置位 */
if ( 0 == 577[576]){ 578;}ulTempLen = pstMsg->ulLen - 579;if ( (ulTempLen) > (057-579)){return;}
/* 重繪資料 */ CCU_MemCpy((UINT8*)&pstCmd->aucCmdData[0], (UINT8*)&577[579],(INT32)ulTempLen);
if ( CCU_NODE_STATE_SYNC == pstNode->enHswState ){/* 告警決議處理 *//* EMUA告警訊息沒有應答位元組 */058}return;}
63處理同步訊息，回收同步發送控制表
VOID ProcRespSynMsg(PPNP_Report_MSG pstMsg){ UINT8 ucCmd = 570;UINT32 ulRet= CCU_ERR; PCCU_CHAN_T pstChan = 572;
PRS485_BOARD_T pstNode= 572;PMANAGE485_CmdT pstCmd = 572;CHECK;ulRet =575;574;CHECK_PARA2_NULL(pstChan, pstNode);
ucCmd = (UINT8)pstMsg->uwCmd;059;574;CHECK_PARA1_NULL(pstCmd);/* 如果應答OK將命令初始化標志置位 */if ( 0 == 577[576])
{578;}/* 釋放發送控制表 */ 602((UINT8)pstMsg->uwSeq);return;}

uj5u.com熱心網友回復：

瘋了嗎?

uj5u.com熱心網友回復：

參考 9 樓 babydog01 的回復:
Delphi(Pascal) code

ADOQuery2.Connection:=ADOConnection1;
  ADOQuery2.SQL.Clear;
  ADOQuery2.SQL.Append('insert into User_qx select * from OPENROWSET(');//將這個‘表’字改為你的資料庫中的表名
  ADOQuery2.SQL.Appe……


不明白你的意思!

uj5u.com熱心網友回復：

參考 14 樓 abclm 的回復:
    不明白你的意思!


1、假設我們編程用的電腦是A，使用裝在B電腦中的SQL資料庫。那么我們在A電腦編輯的SQL陳述句，實際上都是在B電腦中執行的。
2、假設我們在A電腦使用access本資料資料庫，那么在ACCESS相連的SQL陳述句是在A電腦的。

好了，現在來看樓主的語分析。



 ADOQuery2.SQL.Clear;

  ADOQuery2.SQL.Append('insert into User_qx select * from OPENROWSET(');//將這個‘表’字改為你的資料庫中的表名

  ADOQuery2.SQL.Append(quotedstr('MICROSOFT.JET.OLEDB.4.0'));

  ADOQuery2.SQL.Append(','+quotedstr('Excel 8.0;HDR=YES;DATABASE='+OpenDialog1.FileName)+' ,sheet1$)');

  ADOQuery2.ExecSQL;

假設  OpenDialog1.FileName取得的檔案名是C:\system.txt.并且都在A電腦上操作。

在第一種情況下：ADOQuery2連接的是B電腦的SQL資料庫。
              那么SQL陳述句是在B電腦執行的，它讀取的是B電腦的C:\system.txt。
在第二種情況下：Adoquery2連接的A電腦的access資料庫。
              那么sql陳述句是的A電腦執行的，它讀取的是A電腦的C:\system.txt。


uj5u.com熱心網友回復：

還是沒解決

轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/130894.html

標籤：數據庫相關

上一篇：真沒想到還有那么多朋友使用delphi

下一篇：delphi groupbox控制元件 標題透明問題

標籤雲
其他(157675) Python(38076) JavaScript(25376) Java(17977) C(15215) 區塊鏈(8255) C＃(7972) AI(7469) 爪哇(7425) MySQL(7132) html(6777) 基礎類(6313) sql(6102) 熊猫(6058) PHP(5869) 数组(5741) R(5409) Linux(5327) 反应(5209) 腳本語言(PerlPython)(5129) 非技術區(4971) Android(4554) 数据框(4311) css(4259) 节点.js(4032) C語言(3288) json(3245) 列表(3129) 扑(3119) C++語言(3117) 安卓(2998) 打字稿(2995) VBA(2789) Java相關(2746) 疑難問題(2699) 细绳(2522) 單片機工控(2479) iOS(2429) ASP.NET(2402) MongoDB(2323) 麻木的(2285) 正则表达式(2254) 字典(2211) 循环(2198) 迅速(2185) 擅长(2169) 镖(2155) 功能(1967) .NET技术(1958) Web開發(1951) python-3.x(1918) HtmlCss(1915) 弹簧靴(1913) C++(1909) xml(1889) PostgreSQL(1872) .NETCore(1853) 谷歌表格(1846) Unity3D(1843) for循环(1842)

熱門瀏覽
  • 【C++】Microsoft C++、C 和匯編程式檔案

    ......

    uj5u.com 2020-09-10 00:57:23 more
  • 例外宣告

    相比于斷言適用于排除邏輯上不可能存在的狀態，例外通常是用于邏輯上可能發生的錯誤。 例外宣告 Item 1：當函式不可能拋出例外或不能接受拋出例外時，使用noexcept 理由 如果不打算拋出例外的話，程式就會認為無法處理這種錯誤，并且應當盡早終止，如此可以有效地阻止例外的傳播與擴散。 示例 //不可 ......

    uj5u.com 2020-09-10 00:57:27 more
  • Codeforces 1400E Clear the Multiset(貪心 + 分治)

    鏈接：https://codeforces.com/problemset/problem/1400/E 來源：Codeforces 思路：給你一個陣列，現在你可以進行兩種操作，操作1：將一段沒有 0 的區間進行減一的操作，操作2：將 i 位置上的元素歸零。最終問：將這個陣列的全部元素歸零后操作的最少 ......

    uj5u.com 2020-09-10 00:57:30 more
  • UVA11610 【Reverse Prime】

    本人看到此題沒有翻譯，就附帶了一個自己的翻譯版本 思考 這一題，它的第一個要求是找出所有 $7$ 位反向質數及其質因數的個數。 我們應該需要質數篩篩選1~$10^{7}$的所有數，這里就不慢慢介紹了。但是，重讀題，我們突然發現反向質數都是 $7$ 位，而將它反過來后的數字卻是 $6$ 位數，這就說明 ......

    uj5u.com 2020-09-10 00:57:36 more
  • 統計區間素數數量

    1 #pragma GCC optimize(2) 2 #include <bits/stdc++.h> 3 using namespace std; 4 bool isprime[1000000010]; 5 vector<int> prime; 6 inline int getlist(int ......

    uj5u.com 2020-09-10 00:57:47 more
  • C/C++編程筆記：C++中的 const 變數詳解，教你正確認識const用法

    1、C中的const 1、區域const變數存放在堆疊區中，會分配記憶體（也就是說可以通過地址間接修改變數的值）。測驗代碼如下： 運行結果： 2、全域const變數存放在只讀資料段（不能通過地址修改，會發生寫入錯誤）， 默認為外部聯編，可以給其他源檔案使用（需要用extern關鍵字修飾） 運行結果： ......

    uj5u.com 2020-09-10 00:58:04 more
  • 【C++犯錯記錄】VS2019 MFC添加資源不懂如何修改資源宏ID

    1. 首先在資源視圖中，添加資源 2. 點擊新添加的資源，復制自動生成的ID 3. 在解決方案資源管理器中找到Resource.h檔案，編輯，使用整個專案搜索和替換的方式快速替換 宏宣告 4. Ctrl+Shift+F 全域搜索，點擊查找全部，然后逐個替換 5. 為什么使用搜索替換而不使用屬性視窗直 ......

    uj5u.com 2020-09-10 00:59:11 more
  • 【C++犯錯記錄】VS2019 MFC不懂的批量添加資源

    1. 打開資源頭檔案Resource.h，在其中預先定義好宏 ID（不清楚其實ID值應該設定多少，可以先新建一個相同的資源項，再在這個資源的ID值的基礎上遞增即可） 2. 在資源視圖中選中專案資源，按F7編輯資源檔案，按 ID 型別 相對路徑的形式添加 資源。（別忘了先把檔案拷貝到專案中的res檔案 ......

    uj5u.com 2020-09-10 01:00:19 more
  • C/C++編程筆記：關于C++的參考型別，專供新手入門使用

    今天要講的是C++中我最喜歡的一個用法——參考，也叫別名。 參考就是給一個變數名取一個變數名，方便我們間接地使用這個變數。我們可以給一個變數創建N個參考，這N + 1個變數共享了同一塊記憶體區域。(參考型別的變數會占用記憶體空間，占用的記憶體空間的大小和指標型別的大小是相同的。雖然參考是一個物件的別名，但 ......

    uj5u.com 2020-09-10 01:00:22 more
  • 【C/C++編程筆記】從頭開始學習C ++：初學者完整指南

    眾所周知，C ++的學習曲線陡峭，但是花時間學習這種語言將為您的職業帶來奇跡，并使您與其他開發人員區分開。您會更輕松地學習新語言，形成真正的解決問題的技能，并在編程的基礎上打下堅實的基礎。 C ++將幫助您養成良好的編程習慣（即清晰一致的編碼風格，在撰寫代碼時注釋代碼，并限制類內部的可見性），并且由 ......

    uj5u.com 2020-09-10 01:00:41 more
最新发布
  • Rust中的智能指標:Box<T> Rc<T> Arc<T> Cell<T> RefCell<T> Weak

    Rust中的智能指標是什么 智能指標（smart pointers）是一類資料結構，是擁有資料所有權和額外功能的指標。是指標的進一步發展 指標（pointer）是一個包含記憶體地址的變數的通用概念。這個地址參考，或 ” 指向”（points at）一些其 他資料 。參考以 & 符號為標志并借用了他們所 ......

    uj5u.com 2023-04-20 07:24:10 more
  • Java的值傳遞和參考傳遞

    值傳遞不會改變本身，參考傳遞（如果傳遞的值需要實體化到堆里）如果發生修改了會改變本身。 1.基本資料型別都是值傳遞 package com.example.basic; public class Test { public static void main(String[] args) { int ......

    uj5u.com 2023-04-20 07:24:04 more
  • [2]SpinalHDL教程——Scala簡單入門

    第一個 Scala 程式 shell里面輸入 $ scala scala> 1 + 1 res0: Int = 2 scala> println("Hello World!") Hello World! 檔案形式 object HelloWorld { /* 這是我的第一個 Scala 程式 * 以 ......

    uj5u.com 2023-04-20 07:23:58 more
  • 理解函式指標和回呼函式

    理解 函式指標 指向函式的指標。比如： 理解函式指標的偽代碼 void (*p)(int type, char *data); // 定義一個函式指標p void func(int type, char *data); // 宣告一個函式func p = func; // 將指標p指向函式func ......

    uj5u.com 2023-04-20 07:23:52 more
  • Django筆記二十五之資料庫函式之日期函式

    本文首發于公眾號：Hunter后端 原文鏈接：Django筆記二十五之資料庫函式之日期函式 日期函式主要介紹兩個大類，Extract() 和 Trunc() Extract() 函式作用是提取日期，比如我們可以提取一個日期欄位的年份，月份，日等資料 Trunc() 的作用則是截取，比如 2022-0 ......

    uj5u.com 2023-04-20 07:23:45 more
  • 一天吃透JVM面試八股文

    什么是JVM？ JVM，全稱Java Virtual Machine（Java虛擬機），是通過在實際的計算機上仿真模擬各種計算機功能來實作的。由一套位元組碼指令集、一組暫存器、一個堆疊、一個垃圾回收堆和一個存盤方法域等組成。JVM屏蔽了與作業系統平臺相關的資訊，使得Java程式只需要生成在Java虛擬機 ......

    uj5u.com 2023-04-20 07:23:31 more
  • 使用Java接入小程式訂閱訊息！

    更新完微信服務號的模板訊息之后，我又趕緊把微信小程式的訂閱訊息給實作了！之前我一直以為微信小程式也是要企業才能申請，沒想到小程式個人就能申請。 訊息推送平臺🔥推送下發【郵件】【短信】【微信服務號】【微信小程式】【企業微信】【釘釘】等訊息型別。 https://gitee.com/zhongfuch ......

    uj5u.com 2023-04-20 07:22:59 more
  • java -- 緩沖流、轉換流、序列化流

    緩沖流 緩沖流, 也叫高效流, 按照資料型別分類： 位元組緩沖流：BufferedInputStream，BufferedOutputStream 字符緩沖流：BufferedReader，BufferedWriter 緩沖流的基本原理，是在創建流物件時，會創建一個內置的默認大小的緩沖區陣列，通過緩沖 ......

    uj5u.com 2023-04-20 07:22:49 more
  • Java-SpringBoot-Range請求頭設定實作視頻分段傳輸

    老實說，人太懶了，現在基本都不喜歡寫筆記了，但是網上有關Range請求頭的文章都太水了 下面是抄的一段StackOverflow的代碼...自己大修改過的，寫的注釋挺全的，應該直接看得懂，就不解釋了 寫的不好...只是希望能給視頻網站開發的新手一點點幫助吧. 業務場景：視頻分段傳輸、視頻多段傳輸（理 ......

    uj5u.com 2023-04-20 07:22:42 more
  • Windows 10開發教程_編程入門自學教程_菜鳥教程-免費教程分享

    教程簡介 Windows 10開發入門教程 - 從簡單的步驟了解Windows 10開發，從基本到高級概念，包括簡介，UWP，第一個應用程式，商店，XAML控制元件，資料系結，XAML性能，自適應設計，自適應UI，自適應代碼，檔案管理，SQLite資料庫，應用程式到應用程式通信，應用程式本地化，應用程式 ......

    uj5u.com 2023-04-20 07:22:35 more

Copyright © 2010-2020 有解無憂