missice's Blog

備份組包含目前現有的XXX資料庫以外的資料庫備份

http://www.dotblogs.com.tw/inblackbox/archive/2013/06/09/105397.aspx

如果資料表中有Identity欄位，則設Identity_Insert為On再新增資料的預存程序

遠端工作階段中斷，因為本機電腦的用戶端存取授權無法升級或更新。請連絡伺服器系統管理員。

一般Terminal Client Service License只提供三個月期限，

程式名稱：台股即時看盤工具
程式介面：
 

方法一：透過 webbrowser 物件

document.all.WebBrowser.ExecWB(1,1) //打開
document.all.WebBrowser.ExecWB(2,1) //關閉全部
document.all.WebBrowser.ExecWB(4,1) //另存為
document.all.WebBrowser.ExecWB(6,1) //列印
document.all.WebBrowser.ExecWB(6,6) //直接列印
document.all.WebBrowser.ExecWB(7,1) //預覽列印
document.all.WebBrowser.ExecWB(8,1) //頁面設置
document.all.WebBrowser.ExecWB(10,1) //屬性
document.all.WebBrowser.ExecWB(17,1) //全選
document.all.WebBrowser.ExecWB(22,1) //刷新
document.all.WebBrowser.ExecWB(45,1) //關閉

方法二：直接用 javascript

程式名稱：統一發票中獎號碼查詢程式

程式介面：
      

程式名稱：網頁關鍵字警示程式

程式介面：
    

http://www.pinvoke.net/index.aspx

好站一個，範例超多讓人一看就懂，一學就會。

程式名稱：FBGameBrowser 1.0

製作動機：小弟是FB遊戲愛好者, 尤其目前很迷卡牌遊戲 >.<

假設有兩個 Form (Form1、Form2)，兩個 Form 上面各拉一個 Button (Button1)，然後我要讓 Form2的Button1.Text顯示Form1的string變數s的值，跨表單傳值範例如下：

Form1 code：

範例 code 如下：

OpenFileDialog openFileDialog = new OpenFileDialog();
openFileDialog.Multiselect = true;
openFileDialog.Filter = "mp3文件|*.mp3|wav文件|*.wav|wma文件|*.wma|wmv文件|*.wmv|所有格式|*.*";
if (openFileDialog.ShowDialog() == DialogResult.OK)
{
        axWindowsMediaPlayer1.currentPlaylist = axWindowsMediaPlayer1.newPlaylist("播放列表", "");
        foreach (string fn in openFileDialog.FileNames)
        {
                axWindowsMediaPlayer1.currentPlaylist.appendItem(axWindowsMediaPlayer1.newMedia(fn));
        }
}
axWindowsMediaPlayer1.Ctlcontrols.play();

1. 拉一個 Form，上面分別拉一個 Button(button1) 跟 ListView(listView1)。

2. 把 listView1 的 View 屬性設成 Detail。

偶而會用到這個東西，每次遇到都要上網找一番，
乾脆記起來，以後就不用找了。^_^

update t1
set t1.LoginPwd=t2.LoginPwd
from EL_GRECO.dbo.People t1, KM_GRECO.dbo.People t2
where t1.PeopleID=t2.PeopleID

這是我寫的一支小程式，目的是用來把卡鐘產出的考勤資料Excel檔，
轉換成特定格式的純文字檔，後續再把資料餵給資料庫。

程式碼如下：

遇到一個怪情況，有個 page 使用 owc10 的元件，
我在 Windows Server 2003 可以正常執行，但在 Windows 7 就是試不出來，如圖：

1. 畫面上拉三個 TextBox，一個 Button。
2. 程式碼如下：

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
  Dim a, b, c, gcd As Integer
  a = Integer.Parse(TextBox1.Text)
  b = Integer.Parse(TextBox2.Text)
  c = Integer.Parse(TextBox3.Text)
  gcd = GetGCD(a, GetGCD(b, c))
  Response.Write("最大公因數=" & gcd)
End Sub

Private Function GetGCD(ByVal x, ByVal y)
  Dim q As Integer
  Do
    q = x Mod y
    If q <> 0 Then
      x = y
      y = q
    End If
  Loop Until q = 0
  Return y
End Function

EXEC xp_cmdshell 'dir c:\'

出現錯誤訊息如下：

訊息 15281，層級 16，狀態 1，程序 xp_cmdshell，行 1

今天在轉移公司的 KM 主機，把原本放在 Windows Server 2003 的站台，
整個搬到新主機上，新主機環境：Windows Server 2003 R2 + SQL Server 2008 R2，
因為 KM 站台是使用 ASP.NET 1.1，需要再安裝 ASP.NET 1.1 的環境，

放在模組裡，真他奶奶的好用呀！

Function chnumstr(num)
        numc = "零,壹,貳,參,肆,伍,陸,柒,捌,玖"
        unic = ",拾,佰,仟"
        unic1 = "元整,萬,億,兆"
        numcs = Split(numc, ",")
        unics = Split(unic, ",")
        unics1 = Split(unic1, ",")
        i = CStr(num)
        c0 = 0
        Do
            aa = 0
            j = Right(i, 4)
            c1 = 0
            s = ""
            Do
                k = j Mod 10
                If k > 0 Then
                    aa = 1
                    s = numcs(k) & unics(c1) & s
                ElseIf k = 0 Then
                    If aa = 1 Then
                        s = "零" & s
                    End If
                End If
                j = j \ 10
                c1 = c1 + 1
            Loop Until j = 0
            If (s <> "") Then
                chnumstr = s & unics1(c0) & chnumstr
            End If
            If Len(i) > 4 Then
              i = Left(i, Len(i) - 4)
            Else
              i = ""
            End If
            c0 = c0 + 1
        Loop Until i = ""
End Function

0. 前言
   Indexing Service 是 Windows Server 提供的索引服務, 在 Windows Server 2003 中, 可以很容易設定給 Web 站台使用 Indexing, 但是在 Windows Server 2008 中, 依照同樣的設定方法, 卻發現無法套用到 Web 站台上, 在網路上搜尋很久終於找到了解決方法.

公司有個應用系統要轉換到主機, 該系統當初是用 vs2003 開發,
因此必須用 asp.net 1.1 的環境來跑,
當時廠商安裝這一套系統到 windows server 2003 64bit + asp.net 1.1 的時候,