2012年11月19日 星期一

文章加入FB按讚功能


在編輯時切換至HTML將此語法貼到文章的前面或後面

<iframe src="http://www.facebook.com/plugins/like.php?href=<此處填入文章的網址,包刮刮號>&layout=standard&show-faces=true&width=450&height=60&action=like&colorscheme=light" scrolling="no" frameborder="0" allowTransparency="true" style="border:none;overflow:hidden;width:450px;height:60px"></iframe>

2012年11月14日 星期三

影片自動播放


<div align="center">
<embed height="360" src="http://www.youtube.com/embed/zDJfLjUTapA?&amp;videoUrl=http%3A%2F%2Fvp.video.google.com%2Fvideodownload%3Fversion%3D0%26secureurl%3DpgAAACDFX7eWW_XUImJH3blqXSZY3BosL4uHk6acskywJc7MUPkU722J4S6dUMELuHucyeaRNPasN-zB6XUF3Mms0WQtxtV2d9zYio3vU4N3rNgMPhckBMbwORQIpjnZfE9DjztBW2kflFdYp4ebbsp53KStjQqUyYjVQ4eGouWA4fmo6b7LEd4jmz1AX0CyF0Ujq4FDn0Pfhz_VfjtZ5IEdCpXSWUKsFZTwN6f4ZBfqoaWb%26sigh%3DZackp6M39QxBv5em0Tcg7h0wrzA%26begin%3D0%26len%3D951866%26docid%3D-868097237758813769&amp;messagesUrl=http%3A%2F%2Fvideo.google.tw%2FFlashUiStrings.xlb%3Fframe%3Dflashstrings%26hl%3Dzh-TW&amp;thumbnailUrl=http%3A%2F%2Fvideo.google.com%2FThumbnailServer2%3Fapp%3Dvss%26contentid%3D3ca34f40e44e0522%26offsetms%3D370000%26itag%3Dw320%26lang%3Dzh%26sigh%3DYkk2VS5dfFGqKiWByE7b5vFSLNs&amp;autoplay=1" width="480"></embed></div>

文章法表之語法
將語法複製,修改紅色的網址路徑即可

以下為新增欄位的自動播放語法
<p align="center"><embed src="http://video.google.com/googleplayer.swf?&videoUrl=http%3A%2F%2Fvp.video.google.com%2Fvideodownload%3Fversion%3D0%26secureurl%3DpgAAACDFX7eWW_XUImJH3blqXSZY3BosL4uHk6acskywJc7MUPkU722J4S6dUMELuHucyeaRNPasN-zB6XUF3Mms0WQtxtV2d9zYio3vU4N3rNgMPhckBMbwORQIpjnZfE9DjztBW2kflFdYp4ebbsp53KStjQqUyYjVQ4eGouWA4fmo6b7LEd4jmz1AX0CyF0Ujq4FDn0Pfhz_VfjtZ5IEdCpXSWUKsFZTwN6f4ZBfqoaWb%26sigh%3DZackp6M39QxBv5em0Tcg7h0wrzA%26begin%3D0%26len%3D951866%26docid%3D-868097237758813769&messagesUrl=http%3A%2F%2Fvideo.google.tw%2FFlashUiStrings.xlb%3Fframe%3Dflashstrings%26hl%3Dzh-TW&thumbnailUrl=http%3A%2F%2Fvideo.google.com%2FThumbnailServer2%3Fapp%3Dvss%26contentid%3D3ca34f40e44e0522%26offsetms%3D370000%26itag%3Dw320%26lang%3Dzh%26sigh%3DYkk2VS5dfFGqKiWByE7b5vFSLNs&autoplay=1" width="126" height="150"></embed></p>

將語法複製,修改紅色的網址路徑即可
引用自
http://tw.group.knowledge.yahoo.com/nkhs-9323005/article/view?aid=35

BLOG新增自訂欄位

先複製好要嵌入的語法


由版面設定、新增小工具,找尋HTML/java Script ,點加入
將所複製之語法貼入內容,在於標題填入欄位名稱,按儲存即可


2012年11月12日 星期一

奇摩部落格樣式教學一


.twocol #yhtw_mastfoot, .twocoldr #yhtw_mastfoot {width:90%;margin:0 auto;}
**.twocol 表示兩欄式 三欄式則為.thrcol
** #yhtw_mastfoot  表奇摩置尾區
**width:90% 表示與螢幕顯示寬度的比例,可以直接以畫素如1020px表示,但建議以百分比設定,如此針對不同螢幕解析度都可顯示一樣結果
**margin:0 表示邊界留多少
.twocol .filtered99999 , .twocoldr .filtered99999 {min-width:90%;}

.twocol .ycnt3col, .twocoldr .ycnt3col {zoom:1;width:90%;text-align:left;margin:0 auto;}
**text-align:left 文字對齊左邊
.twocoldr .yc3pri {width:82%;position:absolute;top:100px;right:0px;}
 文章欄位設定 寬度(針對整體而言絕對大小及位置)
 .twocoldr .yc3subbd {width:180px;} 左邊欄位設定

2012年11月6日 星期二

youtube 視訊下載-利用chrome 擴充功能

要下載YOUTUBE視訊,可以利用chrome瀏覽器擴充功能,新增"視頻下載"的功能,並且啟用他,打開YOUTUBE之後便可以下載視頻了。
本擴充功能幾乎所有視訊都可下載
一、由瀏覽器由上角功能表選取擴充功能

二、取得更多擴充功能

三、左上角搜尋列輸入youtube下載,然後選視頻下載,點加到CHROME

四、選新增


五、完成後,右上角會有訊息顯示,該功能也會變綠色(已啟用之功能)
六、到要下載的視訊畫面下面會出現下載選項,點入

七、開啟新的瀏覽頁面,選擇要下載的格式及畫質,點選即可!若要轉成其他格式或MP3,點選兌換

八、此功能需安裝JAVA,若未安裝或是被阻擋,上方會出現警告訊息,點選更新外掛程式或允許使用

 九、下載安裝JAVA




十、執行程式
 十一、選擇解析度及格式,按descarger(西班牙文,下載的意思),然後選擇位置,即可完成下載並轉成你要的格式!


2012年3月25日 星期日

ExecuteReader 必須有開啟與可用的連接。連接目前的狀態已關閉

conn 太早執行 conn.close(),所以後續要在執行reader 的動作就無法連線,通常出現在迴圈上或一開始就沒有open

2012年3月21日 星期三

並未將物件參考設定為物件的執行個體

發覺select 出來的第一個欄位都會出現此問題,不知為何?



別人都沒事,只有他搞怪??

竟然連欄位都找不到?
我知到了,因為在datatable 加入column(0)知指令,改變了select出來所設定的原來的名稱(若無先加入TABLE欄位,SQL出來會由0行開始
耶!完成
 sql_str = "select  新製令編號 'Column1',作業名稱 'Column2',sum(報工量) 'Column4',sum(使用時間)/60 'Column5'  from workorders where 日期 = '" & DateTimePicker1.Value.Date & "'" & _
            " group by 作業名稱 order by 新製令編號"

        da = New MySqlDataAdapter(sql_str, MDIParent1.conn)
        cb = New MySqlCommandBuilder(da)

        data.Columns.Add("Column3") 先加進去就先排
        da.Fill(data)  SQL出來的在排
後面再加
        data.Columns.Add("Column8")
        data.Columns.Add("Column9")
        data.Columns.Add("Column10")
        data.Columns.Add("Column11")

        DataGridView1.DataSource = data

        DataGridView1.Columns("Column3").HeaderText = " 品名"

        DataGridView1.Columns("Column8").HeaderText = " 單件工時"
        DataGridView1.Columns("Column9").HeaderText = " 標準工時"
        DataGridView1.Columns("Column10").HeaderText = " 效率%"
        DataGridView1.Columns("Column11").HeaderText = " 低於80%之異常處理"
        DataGridView1.Columns("Column2").HeaderText = " 工程名稱"
        DataGridView1.Columns("Column4").HeaderText = " 本日完工數量"
        DataGridView1.Columns("Column1").HeaderText = " 製令"
        DataGridView1.Columns("Column5").HeaderText = " 總工時"

無法在資料繫結 DataGridView 控制項上設定 ColumnCount 屬性

 DataGridView1.ColumnCount = 5
        sql_str = "select 新製令編號 'Column1',作業名稱 'Column2',sum(報工量) 'Column4',sum(使用時間)/60 'Column5'  from workorders where 日期 = '" & DateTimePicker1.Value.Date & "'" & _
            " group by 作業名稱 order by 新製令編號"
        Dim data As DataTable
        data = Nothing
        DataGridView1.DataSource = data
        data = New DataTable
        da = New MySqlDataAdapter(sql_str, MDIParent1.conn)
        cb = New MySqlCommandBuilder(da)
     
        da.Fill(data)
        DataGridView1.DataSource = data

        DataGridView1.Columns(0).Name = "Column3"
        DataGridView1.Columns(1).Name = "Column8"
        DataGridView1.Columns(2).Name = "Column9"
        DataGridView1.Columns(3).Name = "Column10"
        DataGridView1.Columns(4).Name = "Column11"
        DataGridView1.Columns("Column3").HeaderText = " 品名"
      .....
.......
.......
        DataGridView1.Columns("Column9").HeaderText = " 標準工時"
        DataGridView1.Columns("Column10").HeaderText = " 效率%"
        DataGridView1.Columns("Column11").HeaderText = " 低於80%之異常處理"
當取消'DataGridView1.ColumnCount = 5 時出現此錯誤:

索引超出範圍。必須為非負數且小於集合的大小。
參數名稱: index

  DataGridView1.Columns(0).Name = "Column3"
        DataGridView1.Columns(1).Name = "Column8"
        DataGridView1.Columns(2).Name = "Column9"
        DataGridView1.Columns(3).Name = "Column10"
        DataGridView1.Columns(4).Name = "Column11"
        DataGridView1.Columns("Column3").HeaderText = " 品名"

結果應該是這樣就OK了
 Dim data As DataTable
        data = Nothing
        DataGridView1.DataSource = data
        data = New DataTable '
        DataGridView1.ColumnCount = 5   注意此程式位置
        sql_str = "select 新製令編號 'Column1',作業名稱 'Column2',sum(報工量) 'Column4',sum(使用時間)/60 'Column5'  from workorders where 日期 = '" & DateTimePicker1.Value.Date & "'" & _
            " group by 作業名稱 order by 新製令編號"