[VB] WebBrowser 瀏覽器

轉貼  VB6之迴光返照- WebBrowser

WebBrowser在一般書上比較少介紹,一般就是要做擷取網頁原始碼或自動輸入文字
自動按按鈕填表格之類的功能,goggle搜尋vb webbrowser也能找到許多範例。
 

 
先設定使用元件shodocvw.dll
從控制項拉出WebBrowser1
然後程式碼如下,開啟程式就會直接載入到yahoo首頁了,載入完就會顯示出
網頁的原始碼在即時運算視窗了
Private Sub Form_Load()
WebBrowser1.Navigate "http://tw.yahoo.com"
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
Debug.Print WebBrowser1.Document.body.innerHTML
End Sub

Excel巨集

VBA巨集使用方法 重點Cells(y,x)

'九九乘法表 
Sub test()
For i = 1 To 9
    Cells(i + 1, 1) = i
    Cells(1, i + 1) = i
Next i

    For i = 1 To 9
        For j = 1 To 9
            Cells(i + 1, j + 1) = i * j
        Next j
    Next i
End Sub

更深入的VBA巨集使用
http://blog.xuite.net/crdotlin/excel/9092240-%E7%94%A8Range%EF%BC%9F%E7%94%A8Cells%EF%BC%9F 

不同表的處理
http://www.cc.ntu.edu.tw/chinese/epaper/0019/20111220_1910.html 

人生的機會成本

這是一篇回頭文…怎麼說呢…古人的經驗… 唯有讀書高?…

高職畢業之時… 升學 工作 二選一 (男生多一個 當兵 但是最終還是 二選一

大學 你知道機會成本是多少嗎? … 

4年的時間
8個學期的學費
4年共48個月的失去工作的時間

撇開你是個 公立學校的天才來說
就拿最low的22k來講
半學期私立要個5w吧?

5w*8=40w 所以機會成本是40萬?… 錯大了

40w + 48 * 2w2 = 145.6w
這才是你的機會成本 145萬 這還是最low的 不含你生活開銷呢!!!

你的大學生活呢…? 曠課…打混…睡覺…社交.. 學個銜接不上社會的技術…
出來給你拿個30k好了(很多人還拿22k勒…)
你大學畢業之時 與 不升學之人 差上了多少呢?… 要多久才能追回來…

30k-22k = 8k
145.6w / 8k = 182個月 = 15年以上啊!!! 大哥!!!

你人生給你工作30年好了 你要失去大半了…
當然 這是很偏激的想法…
不讀書…去學一技之長吧…

別指望學校能給你什麼… 你不學 建議你去買樂透吧!!

行動上網吃到飽…這根本是炸錢…

各位愛用行動上網的同胞們

以下問題真的要想想了…

你家有架設分享器(AP)嗎? 你工作的地點 你的學校 … 

都有阿…都可以用AP上網 何須 3G上網…

你說搭車可以用啊 之類的… 拜託 速度訥麼慢…一個月能用超過2GB就嚇死人了…

吃到飽 沒意思啦… 使用心得~"~

感覺有點炸錢…下次真的是要多注意了

Asp.Net C# 資料庫連線字串參考


        SqlConnection Conn = new SqlConnection(
            ConfigurationManager.ConnectionStrings["DB"].ConnectionString);
        SqlCommand Cmd = new SqlCommand();
        string strSQL = "Select * From ";
        Cmd.Connection = Conn;
        Cmd.CommandText = strSQL;

        DataTable myDT = new DataTable();
        Conn.Open();
        SqlDataAdapter myDA = new SqlDataAdapter(Cmd);
        myDA.Fill(myDT);
        Cmd.Dispose();
        Conn.Close();
        Conn.Dispose();
        //*************************************************************
        using (SqlConnection oConn = new SqlConnection())
        {
            using (SqlCommand oCmd = new SqlCommand())
            {
                string strSQL1 = "Select * From ";
                Cmd.Connection = oConn;
                Cmd.CommandText = strSQL1;

                DataTable omyDT = new DataTable();
                Conn.Open();
                SqlDataAdapter omyDA = new SqlDataAdapter(oCmd);
                omyDA.Fill(omyDT);
            }
        }

[idar] 班級通訊錄 & Google Map API

[idar] 班級通訊錄 & Google Map API
如果說 能做出結合Facebook的聯外通的 Map 住家定位 這一定是一個相當特別的功能

但是說到這… 扯到了資安的問題 也是要特別注意

不過人脈關聯的網站 日久不衰 這應該是可以預期的 GPS.GIS的應用 應該可以再更上一層樓

發明+

idar 是個很特別的東西 呼嘯即逝

多做點作品吧 對未來很有幫助的

然後 記得 留下你所有的作品 (尤其重要 備份兩個以上的地方)

人生的轉淚點 掌握在自己的手上

我們要學會的事情 就是"學習"

只有不斷的學 你才會更加進步

大發明家們 加油!!!

未來進行式 (RFID.晶片.悠游.雲端.GPS.金流.身份識別)

今天看到了
電子發票 連 悠游卡
手機 連 Facebook聯絡人 帳戶等等
Icash悠游卡 優惠.集點
HappyGo  優惠.集點
數位學生證 悠游卡

忽然有了許多的靈感…

未來 會不會有個

"數位身份證" or "數位卡" 結合  (當然大小不能太大也不能太小) 
 
1.電子發票 (落實少紙化.還可自動對發票.中獎通知)

2.電子錢包-悠游卡 (小額付款.聯名卡)
3.New 悠游卡 結合 電話卡  (小額付款)
4.商店會員卡
5.手機門號
 這個尤其我認為可以做看看
 反正現在的人 沒多少人在記憶電話號碼
 
好處:
 製作插卡電話 只需要卡片可以入任何手機.新式電話亭
 (當然大小不能太大也不能太小) 原理:RFID
 
 使用網路帳號登入(帳號如同身份證) 
 雲端 聯絡人 不怕遺失 還可分類

6.身份證  原理:RFID
7.健保卡  原理:晶片卡
8.金融服務 Eatm 信用卡 提款卡  原理:晶片卡
9.新電子化消費時代 (小額付款)  原理:RFID 
 新型販賣機 可投幣可悠游卡付款 重點還可開立電子發票!!!
10.和警察機關合作(金融:暗碼報警 已防人被綁架之類的嘞索密碼 可領錢 但是同時報警的功能)
11.GPS位子回傳 (電信業者.警察機關合作 如遇綁架案件等等 可盡可能找回主人)

想到再補

感覺 如果這種產品的推出 台灣就大概正式進入科技化的時代了

多合一 小而精 如果在搭配幾組不同用處的密碼 可行性很高

我的目標不再消除產業 而是異業結合 創造出更不同的服務以及產業
還能創造出無限的商機

想想 販賣機 為什麼 只能投幣 更能 收悠游卡來小額消費
而如果每台販賣機 都結合了 電話亭的功能 不也是一個不錯的想法嗎?
 
這就是一種新產品的產生 當然 電話亭這種東西也半快被淘汰
 但是 科技就是這樣 沒有任何東西會被淘汰
 就是有人會繼續使用 而 我們不能拋棄這些人 (生意人)

而新型的電話 更是一絕
 能識別
 能使用雲端電話簿
 加上密碼保護 
 也擁有RFID小額付款的便利 
 更把多個門號統整為一
 結合GPS
 結合警察機關.電信機關 多重認證 緊急找人

又是一項大挑戰…

未來無可限量阿!!!

糟糕! 又想敗了… 科技新品…

不能逛購物網站就是這樣…你看看你看看…
這些鬼東西誰能看到不心動…Orz

蒙恬 文件王商務版 ($4,990 天阿好貴…但是好像很棒 可惡阿…)

蒙恬全新第二代超級掃譯筆 ($6,790 天價…Orz..可是就整個就是…神阿)

SAPIDO傻多 N速Gigabit 高效率多網型無線寬頻分享器 + N速 長距離USB無線網路卡 ($1,999 嗚..略貴 可是感覺還瞞不錯的)

Polar無線2.4G鍵鼠組合+加送膠囊清潔刷 ($777 感覺CP值還瞞高的…)