Excel VBA 將按鈕增加在[增益集]內

先增一個auto_open副程式，將要增加的按鈕寫入內容 開啟時自動載入



Sub auto_open()
    Dim objCommandBar As Variant
   
    '檢查是否已產生自訂按鍵
    For Each objCommandBar In CommandBars
       If objCommandBar.Name = "mytool" Then
           Exit Sub
       End If
    Next
   
    Set mybar = CommandBars.Add(Name:="mytool", Position:=msoBarTop, Temporary:=True)
    With mybar
         .Controls.Add Type:=msoControlButton, ID:=2950, Before:=1        
         .Controls(1).Style = msoButtonCaption
         .Controls(1).Caption = " 顯示名稱" '按鈕上要顯示的名稱
         .Controls(1).OnAction = "要呼叫的副程式或函式"  '直接填入要呼叫的巨集副程式或函式
         .Visible = True
    End With
End Sub

[問題解決]Access 2003 安裝後無法正常執行

參考文章
 如何解除安裝或移除 Microsoft Office 2003 套件
http://support.microsoft.com/kb/2639197/zh-tw#Method4

嘗試處理過程
１．使用正常的移除安裝程式仍無法解決問題
２．使用微軟fix工具也無法解決問題

處理成功心得
使用參考網頁，移除相關機碼及檔案，重新開機後，
再重新安裝即可以正常執行Access軟體

VB.net 使用Gmail寄送時Credentials =nothing的問題解決

因為需求上會針對多個條件來採用不同的郵件伺服器寄信
使用vb.net以gmail伺服器寄送郵件時，常會遇到無法寄送的狀況....

查看錯誤訊息 Credentials =nothing
肯定是程式碼執行的順序有點問題。當初還以為是傳入函數的參數有問題，才導致這個問題
問題解決了，與大家分享一下

黃色區塊的程式碼，順序有差喔，若Credential在之前，可能會導致nothing的錯誤
反正，就照抄即可。


        Dim mail As New MailMessage()
        Dim cred As New System.Net.NetworkCredential(帳號, 密碼) '帳號(不需含@gmail.com)
        mail.[To].Add("xxxxxxxxxx@yahoo.com.tw")
        mail.Subject =信件主旨
        mail.From = New System.Net.Mail.MailAddress(寄件人郵件, 稱謂)
        mail.IsBodyHtml = True 'HTML內文
        mail.Body = 信件內容

        Dim smtp As New SmtpClient("smtp.gmail.com")
        smtp.UseDefaultCredentials = False

        smtp.EnableSsl = True

        smtp.Credentials = cred

        smtp.Port = 587

        '送出Mail
        smtp.Send(mail)

ASP.NET Win2003 R2 Access資料庫錯誤 null 使用不正確

本地端設計時，執行過程中都沒有發生錯誤，但將程式傳送到Win2003 Server R2時，
程式會出現null 使用不正確的錯誤訊息。

經過追查，原來是Access資料庫有點毀損
將Win2003的資料庫回傳本地端後，執行修復功能
Bingo... 完工，睡覺

ASP.NET Loginview下的AccessDatasource抓不到DropDownlist的過濾條件問題

假設有一個需求，是提供使用者可以針對某些條件，瀏覽資料
例如：針對台北市，來列出該區的人口

如果完全用控制項來做，通常我們會準備一個DropDownlist，搭配一個AccessDatasource1，取得縣市資料。
再利用一個Gridview控件，搭配另一個AccessDatasource2來呈現
但 AccessDatasource2在設定時，以 Where指定控件時，有時候會發現抓不到過濾條件的來源控制DropDownlist。

如果有這個問題，請 檢查是否有使用Loginview

如果有，AccessDatasource2必須與DropDownlist在同一個區塊內才抓得到下，

例如：　LoggedInTemplate　

Win2003 R2 新增[網站 asp.net+access]服務心得隨筆

安裝系統完畢後
記得先安裝 IIS後才進行 .net frame work2.0、3.5等元件的更新
(順序很重要，以免屆時iis抓不到，會比較麻煩處理，需重新註冊，但經驗上有時會毀損....解決上有些麻煩)

將已經Coding好的網站內容先存到某個目錄下，例如: mysite
在IIS管理員下新增一個網站，指定目錄mysite、設定，細節參考其他網站說明
將 .net 2.0啟用(順自己專案的內容)

如果資料庫是Access，記得目錄mysite，要將Asp.net、IUSER、Network Service等加入權限(寫入)，以免Insert into 、Delete、Update等指令 出現問題

大概是這樣....

VS2010 如何在WinForm下使用urlEncode方法

請先在VS2010 選單 專案/加入參考，將System.web加入

屆時輸入相關關鍵字時，建議提示，就會出現urlEncode
例如：
System.Web.HttpUtility.urlEncode

如未加入參考，則不會出現此方法。