今天的進展很順利

作者:wbc 日期:2007-05-09

字體大小: 小中大

今天ryan幫我開了sql port，回家立即測試，經過一翻嘗試，終于再次成功了，陸續的失敗，已經讓我的信心不大，不過始終是搞定了，真是happy。

Str = "Provider = Sqloledb; User ID = xxx; Password =xxx; Initial Catalog = intranet; Data Source =SQLEXPRESS;"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open Str
SET RS=Conn.execute("select * from testing")
do until rs.eof
response.Write rs("info")&"<br />"
rs.movenext
loop
set rs=nothing
conn.close

然后再找錄音控件，想搞個語音留言，找來找去，其實vb6已經有一個 microsoft multimedia control可以做到此功能，如果做成activeX控件，放在網頁，應該還要什么簽證的，挺煩，得想其他辦法。
microsoft multimedia control錄音輸出wav文件，size相對比較大，于是想繼續找，看看有無辦法轉成mp3編碼，找來找去，還是個徒勞，想起昨天玩的那個ffmpeg，不是說大部分格式都行嗎？mp3能難到他？于是拿來試試看。呵呵，非常順利及容易地，就輸出了mp3文件，再測試wav轉flv，也行，真是太好用了。
想起個ffmpeg這么好用，次次寫代碼也不方便，干脆自己設定一個軟件，用shell來調用他。這樣更加靈活。

請稍等，圖片正在下載中...

以下是Shell 函數的具體用法

引用內容

執行一個可執行文件，返回一個 Variant (Double)，如果成功的話，代表這個程序的任務 ID，若不成功，則會返回 0。

語法

Shell(pathname[,windowstyle])

Shell 函數的語法含有下面這些命名參數：

部分描述
pathname 必要參數。Variant (String)，要執行的程序名，以及任何必需的參數或命令行變量，可能還包括目錄或文件夾，以及驅動器。
Windowstyle 可選參數。Variant (Integer)，表示在程序運行時窗口的樣式。如果 windowstyle 省略，則程序是以具有焦點的最小化窗口來執行的。

windowstyle 命名參數有以下這些值：

常量值描述
vbHide 0 窗口被隱藏，且焦點會移到隱式窗口。
VbNormalFocus 1 窗口具有焦點，且會還原到它原來的大小和位置。
VbMinimizedFocus 2 窗口會以一個具有焦點的圖標來顯示。
VbMaximizedFocus 3 窗口是一個具有焦點的最大化窗口。
VbNormalNoFocus 4 窗口會被還原到最近使用的大小和位置，而當前活動的窗口仍然保持活動。
VbMinimizedNoFocus 6 窗口會以一個圖標來顯示。而當前活動的的窗口仍然保持活動。

說明

如果 Shell 函數成功地執行了所要執行的文件，則它會返回程序的任務 ID。任務 ID 是一個唯一的數值，用來指明正在運行的程序。如果 Shell 函數不能打開命名的程序，則會產生錯誤。

注意缺省情況下，Shell 函數是以異步方式來執行其它程序的。也就是說，用 Shell 啟動的程序可能還沒有完成執行過程，就已經執行到 Shell 函數之後的語句。

Shell 函數示例
本示例使用 Shell 函數來完成一個用戶指定的應用程序。

' 將第二個參數值設成 1，可讓該程序以正常大小的窗口完成，並且擁有焦點。
Dim RetVal
RetVal = Shell("C:WINDOWSCALC.EXE", 1) ' 完成Calculator。