sql 橫向顯示

SELECT id_num, MAX(score_chinese) AS '國文成績', MAX(score_english) AS '英文成績', MAX(score_math) AS '數學成績'
FROM(
SELECT id_num,
CASE WHEN subject='國文' THEN score END AS score_chinese,
CASE WHEN subject='英文' THEN score END AS score_english,
CASE WHEN subject='數學' THEN scree END AS score_math
FROM score_table
) AS score_table_tmp
GROUP BY id_num

VB 如何轉存文字檔案為 UTF-8 編碼格式

Function SaveTextAsUTF8(filePath, Text)
        Const adTypeText = 2
        Const adSaveCreateOverWrite = 2

        'Create Stream object
        Dim TextStream
        Set TextStream = CreateObject("ADODB.Stream")
        With TextStream
                .Open
                .CharSet = "UTF-8"
                .Position = TextStream.Size
                .WriteText Text
                .SaveToFile filePath, adSaveCreateOverWrite
                .Close
        End With
        Set TextStream = Nothing
       
End Function

平均報酬率

怪老子理財:落實資產配置 退休沒煩惱

機型錢箱指令

機型錢箱指令
發票機Espon rpu420 openbox=Chr$(27) + "p0" + Chr$(50) + Chr$(250)
發票機WP-520 openbox=Chr(27) + "G"

我的IP位址查詢

我的IP位址查詢

設定 Outlook 使用 POP3 / IMAP 來接收 Gmail 信件

引用來源
--


要在 Outlook 設定 POP3 / IMAP 去接收 Gmail 信件, 要如何做?


Outlook 設定 POP3 / IMAP 去接收 Gmail 信件
官方說明: Outlook 2003 - Gmail說明
簡易步驟
在您的 Gmail中啟用 POP
設定 Outlook 2003 用戶端
詳細步驟
登入Gmail, 輸入帳號、密碼
選擇 畫面右上角的 "設定"
點選 "轉寄和 POP/IMAP", 選擇 "對所有郵件啟用 POP 功能 (包括已經下載的郵件)", 按 "儲存變更"
開啟 Outlook -> 帳號設定, 依下述步驟設定:
POP3 設定為 pop.gmail.com
SMTP 設定為 smtp.gmail.com
帳號要輸入完整的 Email 信箱: ex: abc@example.com
選擇 "其它設定" -> "外寄伺服器" -> 勾選 "我的外寄伺服器(SMTP)需要驗證"
選擇 "進階", 勾選 "內送伺服器及外寄伺服器的加密連線(SSL);POP3=995, SMTP=465"
這樣子 Outlook帳號設定 就完成囉~

windows7「您可能沒有權限使用網絡資源」和「windows打印機無法連接」解決方法

1.打開受訪者的guest權限

2. 開始--運行--gpedit.msc

3.windows設置---安全設置--本地策略--用戶權利指派--在右邊找到''拒絕從網絡訪問這台計算機''雙擊打開,把裡面的guest帳戶刪除

4. windows設置---安全設置--本地策略--安全選項--右邊找到''網絡訪問:本地帳戶的共享和安全模式"雙擊改成"經典:本地用戶自己的身份驗證"

5.windows設置---安全設置--本地策略--安全選項--右邊找到''帳戶:''使用空白密碼的本地用戶只允許進行控制台登陸"把它設置為"禁用"

for each split

詳細請參考來源
--
 引用:


' We want to split this input string
Dim s As String = "there is a cat"

' Split string based on spaces
Dim words As String() = s.Split(New Char() {" "c})

' Use For Each loop over words and display them
Dim word As String
For Each word In words
   Console.WriteLine(word)
Next