其他

近日去客戶那處理問題，發現客戶開啟了多個相同的程式，實際上只需要開啟一個就可以了。想到在程式中限制一下讓客戶只能開啟一個程式的執行個體。google了一下，找到了網上的類似代碼。原理很簡單，噹噹前進程運行後，取得當前進程的名稱看有沒有與當前進程相同名稱的進程，如果有說明已經運行了該程式執行個體。代碼如下(來源網路)：一、寫成一個函數遍曆所有進程名稱private bool AppAlreadyRunning()        {            System.Diagnostics.Pro

本文是朋友收集的經典電影配樂，也都是我很喜歡的音樂所以轉過來跟大家分享。我自己收集了一些經典電影原聲配樂，平時偶爾聽來感覺很好，一些電影裡的經典片段和自己的一些前塵往事全都混雜在一起交相上映在腦海電影院裡，當你迷上雙眼，放鬆神經，輕輕撥動著心弦，感覺就像……“是誰在敲打我窗……”       沒必要說哪首是“最”喜歡的，太多的經典不能去排座次，就從我常聽的開始推薦吧，《海上鋼琴師》中的幾段經典配樂，當麥克斯因第一次暈船而遇到1900的時候，兩人坐在鋼琴上猶如坐著迴旋木馬般自在滑行在大廳上，190

做mobile開發編譯輸出提示：請考慮使用 app.config 將程式集“System.Data, Culture=neutral, PublicKeyToken=969db8053d3322ac, Retargetable=Yes”從版本“2.0.0.0”[]重新對應到版本“3.5.0.0” 只需在項目中加入 App.Config 檔案，檔案內容如下即可： 代碼 Code highlighting produced by Actipro CodeHighlighter

ALTER  procedure GetTableColumns @TableName varchar(100)asbegin-----------------開始SELECT   d.name N'表名', a.colorder N'欄位序號', a.name N'欄位名', (case when COLUMNPROPERTY( a.id,a.name,'IsIdentity')=1 then '√'else '' end) N'標識', (case when (SELECT count(*)

早就聽說EntLib不錯，可惜一直沒機會學，這下終於有點時間了，不學精通只求入門。下面是瞭解EntLib的資料：來源sfbirp的企業庫學習筆記:      一、什麼是企業庫？       企業庫包含一系列應用程式模組和核心架構。這些高複用的組件旨在協助開發人員解決一些共同的企業開發問題。

Raize Components控制項與TXPManifest同時使用，在程式啟動並執行時候會出現在滑鼠移入移出Raize Components控制項字型大小有時候會變化的問題在delphi2010中式啟用 Enable runtime themes的時候出現這個問題開始以為是TRzPageControl 與 TXPManifest 存在衝突，導致TRzPageControl控制項的標籤的字型大小會在滑鼠移入或移出的時候改變後來自己測試得到解決辦法：在一開始放入TRzPageControl

今天去面試面試官出了如下題目：1、證明所有奇數的平方減1都為8的倍數//我當時的思路反了，後來經面試官提示思路如下所有奇數都可以表示為 2m+1 (m為一個整數)那麼如上題目可以表示為如下式子(2m+1)2-1  //繼續拆分4m2+4m+1-14m2+4m4(m2+m)到這裡只需證明括弧內是一個偶數即可1---如果m為奇數那麼m2和m則均為奇數兩個奇數之和一定是偶數2---如果m為偶數那麼m2和m則均為偶數兩個偶數之和也是偶數偶數可以用2n(n為整數)來表示，則上述可寫為4*2n=8n由此可以

這幾天寫程式要用到字串的真實長度，可是MSsql 的len函數只能擷取字的長度，無法擷取真實的長度也就是在網頁裡面所佔的字元因為英文“a”與中文 "的"所佔的長度不同於是google下找到函數datalength可以獲得字元的真實長度如：Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/-->select len('aaa')          --結果為 

山藥粥 成分：山藥、乳酪、白糖。 其製法可分為兩種。一種是將鮮山藥洗淨，搗泥，待大米粥熟時加入拌勻，而後調入乳酪、白糖食用；另一方法是，將山藥晒乾研粉，每次取30克，加冷水調勻，置爐上，文火煮熟，不斷攪拌，兩三沸後取下，調入乳酪、白糖即可食用。 山藥性味甘平，可補虛贏，長肌肉、潤皮毛，為治消瘦、美容之妙品。乳酪可養肺潤膚、養陰生津。兩者合用，可健運脾胃，資助化源，故於虛瘦病人，效果甚佳。

前兩天使用oledb串連excel的辦法為單位某部門從一個excel的多個sheet中作連選抽出需要的資料，程式非常簡單，結果很快就出來，原來手工需要很長時間才能選出的結果現在幾乎一點擊就有了結果。使用人員非常滿意，由於是多人使用，開始只是將結果顯示在一個頁面上。後來他們要求將結果寫入該xls檔案的另一個sheet中，我隨便寫了個語句以為可以立馬搞掂，沒想到居然出現了“操作必須使用一個可更新的查詢”。因為讀取結果正常，我開始以為是excel檔案所處的檔案夾沒有寫入權限所致。增加了相應許可權後，結

  [IE編程] 如何設定IE8的WebBrowser控制項(MSHTML) 的渲染模式 收藏 IE8 在渲染引擎做了很大的改動，新增加一個標準模式 (Standard Mode)。 不少軟體都內嵌了IE的WebBrowser控制項（也就是MSHTML.dll）來顯示網頁， 當使用者機器升級到IE8， WebBrowser控制項也會隨之升級到IE8的渲染引擎。 為了保證這些使用WebBrowser控制項的應用軟體能夠工作起來和原來一樣，IE8的WebBrowser控制項在預設情況下使用了IE7

VBS指令碼修改註冊表大名鼎鼎的WSH聽說過嗎？ 它就是Windows Script Host的縮寫形式，WSH是Windows平台的指令碼指令，它的功能十分強大，並且它還是利用文法結構簡單、易學易用且功能強大的JScript和

Code highlighting produced by Actipro CodeHighlighter

1,要實現的功能就是在瀏覽器加一個右鍵捷徑提交所選的網頁或圖片內容！執行個體應用在部落格程式裡，就是在你已登陸的情況下，瀏覽網頁時看到比較好的新聞或圖片！你就可以選中內容--》點右鍵出現“加入我的網摘”，這時就會彈出一個IE視窗，自動將網頁標題加入表單的對應標題內容，及選中內容加入相應內容項，還有引用網址等！2,現在 我們來看一下這個功能如何?的！   首先我們用文字編輯器寫入：Windows Registry Editor Version

System.Net.Mail.SmtpClient smtpClient = new SmtpClient();            smtpClient.Host = "smtp伺服器網域名稱或IP地址";            smtpClient.Credentials = new System.Net.NetworkCredential("信箱使用者名", "密碼");            MailMessage message = new MailMessage();      

最近正在做公司的一個OA系統，前幾天加班趕工，2天出一個頁面，後頭一看代碼CS代碼竟然有1000行之多驚訝之餘，發現同事的一個頁面CS檔案更令人吃驚，C#代碼居然有近3000行代碼    其實回頭想想造成代碼檔案如此巨大原因也很簡單，因為頁面整合的功能太多了，幾乎不可能放到一起的功能也放到了一起導致頁面需要寫的代碼急劇增加，也跟專案經理提過，這樣的設計不合理，無奈權輕言微，無人聽。只好繼續寫著我的每頁千行的代碼 。  

平時沒太關注，現在來看一下，以前一直沒有刻意去想到底 頁面、主版頁面、使用者控制項、主版頁面控制項 到底哪個先Init哪個先Load現在就寫程式測試了一下 結果如下：Control2 Init!   主版頁面上的控制項 初始化Control Init!     Page頁上的控制項 初始化Master Init!      主版頁面 初始化Page Init!         Page頁面 初始化Page Load!       Page頁面 載入Master Load!  

最近用delphi做開發，用到了DbGrid控制項，想在控制項上點擊滑鼠右鍵快顯功能表關聯DbGrid的 Popupmenu 倒是可以實現，但是這樣的效果是不管你在哪裡單擊滑鼠右鍵只要在DBGrid裡面就會快顯功能表，我想只在資料區彈出，網上查了N多了資料，沒有找到滿意的偶然間發現，當在DbGrid上單擊滑鼠右鍵的時候，當滑鼠在資料區的時候不會觸發 MouseDown事件這樣我就想用 MouseUp和MouseDown 區分滑鼠是不是在資料區 ，然後快顯功能表首先定義一個全域變數：var

                            <input name="selectall" type="checkbox" value="checkbox" id="selectall"                                onclick="javascript:sall(this.checked);" />全選</td><script type="text/ecmascript">                func

 on error resume next dim WSHshellA set WSHshellA = wscript.createobject("wscript.shell") WSHshellA.run "cmd.exe /c shutdown -r -t 600 -c ""說你是我老婆，不說十分鐘關你機，不信你等十分鐘看，嘿嘿！···"" ",0 ,true   dim a do while(a <> "我是你老婆") a = inputbox ("說你是我老婆,就不關機，快撒