IE 10 如何操作相容性檢視

參考來源:Internet Explorer 10如何操作相容性檢視
--
您好，若要在IE 10使用相容性檢視網頁，您可以在該網頁按下【F12】執行開發者工具，
在開發者工具的視窗中，點選工具列的【瀏覽器模式】，
並選擇【Internet Explorer 10相容性檢視】，即可使用相容性檢視的方法瀏覽網頁。
假如以【Internet Explorer 10相容性檢視】的方式仍無法正常檢視網頁，
可以試著使用較低的IE版本相容性，來達到最佳的瀏覽效果，如IE 9、IE 8...等。

SourceGrid 免費元件

官網:SourceGrid - Home

相關連結:.NET下的表格顯示元件 - SourceGrid
SourceGrid.Grid使用
  

C# 鍵盤掛鉤（keyboard hook）範例

參考來源:C# 鍵盤掛鉤（keyboard hook）範例

C# 全域鍵盤掛鉤（Global Keyboard Hook）範例

參考來源:C# 全域鍵盤掛鉤（Global Keyboard Hook）範例

ReactOS 系統

官網:ReactOS Project
參考:ReactOS 完全兼容Microsoft Windows® XP 的操作系統

ReactOS v0.3.3 中文版 
ReactOS的中文本地化

windows-like系統ReactOS
 

阿簡生物筆記

阿簡生物筆記

園藝文摘

園藝文摘
園藝文摘-專家級庭園栽培 達人花草介紹推薦 、種植植物教學 | iGarden花寶愛花園

ms-sql table 結構描述損毀

第一次遇到2個關卡!
第一個是 sql sysdb 掛掉
另一個是 sysdb 處理好了 , 卻連使用者 db table 也掛掉...
真是沒輒,什麼方法都試過  , 一直要我 dbcc checkcatalog 那有用咧..
最後還是重新一個新的 db 收場

Free Web FTP

ourwebftp 官網
 --
非商用是免費的唷,真不賴!!

水族-繁殖文章

水族-繁殖文章

如何計算魚缸水量

長(cm)x寬(cm)x高(cm)x0.0008=魚缸水容量(公升)

水族孔雀魚相關文章很多篇(4x~5x)

水族孔雀魚相關文章

Unity 官網

Unity - Game engine, tools and mulitplatform

Unity3D教學 - 使用免費工具來開發2D遊戲

Unity3D教學 - 使用免費工具來開發2D遊戲

Unity3D 教學．CG數位學習網

Unity3D 教學．CG數位學習網

Unity 台灣論壇

Unity 台灣論壇

EPS和本益比

參考引用
--
1.EPS為每股稅後盈餘 (Earing Per Shares),也就是每股的獲利能力,一家公司的稅後淨利除以流通在外的股數即得

2.本益比(P/E ratio),為EPS除以股價,例如EPS5元,股價50元,本益比即為5/50=10倍

3.EPS越高股價相對越高,是正面的,P/E比越高表示成長動力較足,但越高表示股價越被高估;本益比越低表示較被市場低估,價值較高,但可能較不俱成長動力,因此股價才會偏低

mssql WHILE (msdn 文件,參考看看)

WHILE (Transact-SQL)

IP and Port Scanner Tool

IP and Port Scanner Tool
簡單實用喔,可掃ip和 port

ms-sql must change on (帳號密碼被鎖定清除方式)

參考來源:Clear the "must change password" checkbox for new SQL users.

指令:
 ALTER LOGIN userid WITH PASSWORD = 'xxxx' UNLOCK
 ALTER LOGIN userid WITH CHECK_EXPIRATION = OFF
 ALTER LOGIN userid WITH CHECK_POLICY = OFF

不可不知的除權息關鍵問答

今周刊／存股傳奇　不可不知的除權息關鍵問答

使用Visual Studio 2010也能開發Android應用程式

參考一:偶也會寫Android應用程式？！
使用Visual Studio 2010也能開發Android應用程式？！

滴流桶 DIY

孔雀魚仔魚針尾

財訊雜誌

財訊雜誌

綠水輕鬆培養

綠水6000cc 的不小心被水蚤偷渡了
等於一整大桶綠水全毀了
只好重新培養
底下3大杯和大桶的,全是利用綠水種+肥料來培養
在這1-2週都是下雨的天氣,一樣綠

mssql 版本不同還原問題

資料庫在執行 10.50.1600 版的伺服器上備份.
該版本和此伺服器不相容,此伺服器目前執行 10.00.1600 版.

--
看來是:
高版-->to-->低版 --------xxx 不行
低版-->to-->高版 --------oo 可行

--
硬是要搞回低版..就累了
唯一途徑:橋接高版 , 低版重建db後 , 由高版匯入低版 db

在 SQL Server 取得目前用戶端的 IP 位址

參考引用
--
 SELECT CONNECTIONPROPERTY('net_transport') 實體傳輸通訊協定,
CONNECTIONPROPERTY('protocol_type') 裝載的通訊協定類型,
CONNECTIONPROPERTY('auth_scheme') 驗證模式,
CONNECTIONPROPERTY('local_net_address') '目標伺服器的 IP 位址',
CONNECTIONPROPERTY('local_tcp_port') '目標伺服器 TCP 埠',
CONNECTIONPROPERTY('client_net_address') '用戶端的 IP 位址'

除息除權時參考價

引用來源
--
除息參考價

為使除息前(含現金股利)與除息後所買到的價格一致，公司在發放現金股利時，將股票的價格，按照現金股利，予以同等金額的下降，此為除息參考價。

除息日申報參考價 = 前一交易日收盤價 －現金股利金額

例如:A公司決定於8月7日除息，發放現金股利3元。8月6日收盤價為50元，那麼在8月7日的開盤參考價將為(50－3)元，為47元。

除權參考價的計算

當公司發放股票股利時，流通在外的股數增多，但發放股票前後，公司整體價值不變，但股數增多了，所以在除權後，每股價值就會下降，成為除權參考價。

除權參考價=前一交易日該股票收盤價／(1+ 配股率)

例如：B公司決定於7月15日除權五百股(即配股率為50%。7月14日的收盤價為150元。那麼在7月15日除權當天的參考價將為(150／1 +0.5)=100元

既除權又除息的參考價計算

現在很多公司在發放股利時，會採取配股加配息的方式。其參考價的計算方法為：

除權又除息參考價=(前一交易日該股票收盤價－現金股利金額)／(1+ 配股率）

精元的參考價要依96/08/2的收盤價計算

(前一交易日該股票收盤價－現金股利金額)／(1 +配股率）

如假設前一天的收盤價為44元44-1/1+ 0.1=39

參考2計算法
 
step2、除權除息參考價計算公式
a、除息參考價＝除息前一天收盤價－配息金額 如果除息前一天收盤價是100元，現金股息2元，那 除息參考價＝100（元）－2元＝98（元）
b、除權參考價＝除權前一天收盤價÷（1＋配股率） 如果除權前一天收盤價是100元，股票股利是2.5元，那 除權參考價=100（元）÷（1＋0.25）＝80（元）
如果同一時間除息/權  (100-2)÷（1＋0.25）=78.4

野生黃尾公魚 孔雀魚

[批次改檔名] MYRENAME 0.3 繁體中文免安裝版

「MyRename」也是一套相當簡單、好用的批次修改檔名的工具，看介面就可以很容易上手，支援Unicode、可預覽、在Windows7的平台上可正常運作，以下是來自官方的介紹，供各位參考：

這是一個用MFC寫的大量檔案重新命名的小程式，可能有些朋友會發現這個軟體很像CKRename，那是因為在我寫出這個軟體之前我覺得最好用的同類型軟體就是CKRename，可惜的是這軟體的作者後來都沒有更新了，所以這軟體有多一些我覺得需要的功能，所以這軟體一定比CKRename來得強大，要不然我也不用花時間寫這個程式了。

以下是我為了補足CKRename所開發的功能：

支援Unicode。
檔名排序方式(支援 5.txt < 10.txt)。
可以依照檔名或是附檔名遞增/遞減排序。
正規表示式/常規表示式/Regular Expression。
可重新命名 資料夾/隱藏檔/系統檔(可手動開啟或關閉)。
以下是其他上述沒提到的軟體簡介：

使用者介面包含 正體中文/簡體中文/英文 三種語言。
Windows XP visual style (也就是支援Windows XP 風格的介面)。
可記錄10次的重新命名動作，亦即可以還原10次的重新命名。
其他一般大量重新命名軟體有的功能。

下載點
 

大馬孔雀魚論壇

大馬孔雀魚論壇

孔雀魚基因品系研究

☆孔雀魚基因品系研究☆

孔雀魚基因解說

孔雀魚基因解說

vbnet postmessage 組合鍵

Public Class Form1
    Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Integer, ByVal hWnd2 As Integer, ByVal lpsz1 As String, ByVal lpsz2 As String) As Integer
    Private Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Integer
    Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As IntPtr, ByVal wMsg As IntPtr, ByVal wParam As IntPtr, ByVal lParam As IntPtr) As IntPtr
    Private Declare Ansi Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hwnd As Integer, ByVal wMsg As Integer, ByVal wParam As Integer, ByVal lParam As String) As Integer
    Declare Function MapVirtualKey Lib "user32" Alias "MapVirtualKeyA" (ByVal wCode As Long, ByVal wMapType As Long) As Long

    'Public Const WM_CHAR = &H46
    Public Const WM_KEYDOWN = &H100
    Public Const WM_KEYUP = &H101
    Public Const WM_UP = &H101
    Public Const WM_CHAR = &H102
    Public Const VK_A = &H41
    Const VK_NUMLOCK = &H90 '      Num Lock

    Const KEYEVENTF_KEYDOWN = &H0 ' KeyDown

    Const KEYEVENTF_KEYUP = &H2 ' KeyUp
    Const VK_F1 = &H70

    Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
        Select Case e.KeyCode
         
            Case e.Alt And Keys.A
                TextBox1.Text = e.KeyValue
                MessageBox.Show("1")
            Case Keys.A
                TextBox1.Text = e.KeyValue
                MessageBox.Show("2")
        End Select
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub


    Function MakeKeyLparam(ByVal VirtualKey As Long, ByVal flag As Long) As Long
        Dim s As String
        Dim Firstbyte As String    'lparam参数的24-31位
        If flag = WM_KEYDOWN Then '如果是按下键
            Firstbyte = "00"
        Else
            Firstbyte = "C0"       '如果是释放键
        End If
        Dim Scancode As Long
        '获得键的扫描码
        Scancode = MapVirtualKey(VirtualKey, 0)
        Dim Secondbyte As String   'lparam参数的16-23位，即虚拟键扫描码
        Secondbyte = Strings.Right("00" & Hex(Scancode), 2)
        s = Firstbyte & Secondbyte & "0001"  '0001为lparam参数的0-15位，即发送次数和其它扩展信息
        MakeKeyLparam = Val("&H" & s)
    End Function


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        'Dim hwnd As Integer = FindWindow("notepad", vbNullString)
        'Dim x As Integer = FindWindowEx(hwnd, 0, "Edit", vbNullString)
        'PostMessage(Me.Handle, WM_KEYDOWN, VK_A, 0)  '按下A键


        ' PostMessage(hwnd, WM_KEYDOWN, VK_A, MakeKeyLparam(VK_A, WM_KEYDOWN))  '按下A键
        ' PostMessage(hwnd, WM_CHAR, Asc("A"), MakeKeyLparam(VK_A, WM_KEYDOWN))  '输入字符A
        ' PostMessage(hwnd, WM_UP, VK_A, MakeKeyLparam(VK_A, WM_UP))       '释放A键

        PostMessage(Me.Handle, WM_KEYDOWN, VK_A, 0)  '按下A键

    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        PostMessage(Me.Handle, WM_KEYDOWN, Keys.Alt + Keys.A, 0)  '按下Alt+A键
     
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Form2.Show()

    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        PostMessage(Form2.Handle, WM_KEYDOWN, Keys.Alt + Keys.A, 0)  '按下Alt+A键
    End Sub
End Class

vb6 WINIO

請參考來源:WINIO 的問題

MeGUI中文版

MeGUI中文版