筆電變無線基地台

1.以「系統管理員」身份執行-命令提示字元

cd \windows\system32

netsh wlan set hostednetwork mode=allow ssid=********  key=********

netsh wlan start hostednetwork (啟動主控網路)


netsh wlan stop hostednetwork (停止時用)


2.會產生一個新的連線，例：無線網路連線6


3.將「區域連線」分享給「無線網路連線6」

PowerPoint列印簡報為講義模式的頁碼設定

http://itstaffnetwork.blogspot.tw/2012/05/powerpoint-1-1ppt-2-3-4pdfpdf-5vba-1.html







Dim i As Long
Dim lStart As Long
Dim lStop As Long
Dim
lHandoutKind As Long
Dim lSlide As Long
Dim lSlideEnd As Long
Dim
ppHandoutKind As PpPrintOutputType
Dim vbConfirm As
VbMsgBoxResult
'
lSlide = InputBox("從哪一張簡報開始列印？", "開始簡報",
"1")
'
lStart = InputBox("講義起始頁碼編號: ", "講義起始頁碼", "1")
'
lHandoutKind
= InputBox("每頁幾張簡報?" & vbNewLine & "2, 3, 4, 6, 9？", "講義列印類型",
"6")
'
Select Case lHandoutKind
Case 1, 2
ppHandoutKind =
ppPrintOutputTwoSlideHandouts
lHandoutKind = 2
Case 3
ppHandoutKind =
ppPrintOutputThreeSlideHandouts
lHandoutKind = 3
Case 4
ppHandoutKind =
ppPrintOutputFourSlideHandouts
lHandoutKind = 4
Case 5, 6
ppHandoutKind
= ppPrintOutputSixSlideHandouts
lHandoutKind = 6
Case
Else
ppHandoutKind = ppPrintOutputNineSlideHandouts
lHandoutKind =
9
End Select
'
vbConfirm = MsgBox("您已選擇講義列印，每頁投影片張數為" &
lHandoutKind & "張，起始列印頁碼為" & lStart & vbNewLine & "，開始列印頁數為"
& lSlide & ".", vbOKCancel)
'
If vbConfirm = vbOK
Then
'
lStop = Round((ActivePresentation.Slides.Count - (lSlide - 1)) /
lHandoutKind)
If Round((ActivePresentation.Slides.Count - (lSlide - 1)) Mod
lHandoutKind) <= (lHandoutKind / 2) Then
lStop = lStop + 1
End
If
'
For i = 1 To
lStop
'
ActivePresentation.NotesMaster.HeadersFooters.SlideNumber.Visible
=
msoFalse
ActivePresentation.HandoutMaster.Shapes(4).TextFrame.TextRange.Text
= lStart
lStart = lStart + 1
'
With
ActivePresentation.PrintOptions

'
.RangeType =
ppPrintSlideRange
With .Ranges
'
.ClearAll
'
lSlideEnd = lSlide +
lHandoutKind - 1
'
If lSlide > ActivePresentation.Slides.Count
Then
lSlide = ActivePresentation.Slides.Count
End If
If lSlideEnd >
ActivePresentation.Slides.Count Then
lSlideEnd =
ActivePresentation.Slides.Count
End If
.Add Start:=lSlide,
End:=lSlideEnd
lSlide = lSlide + lHandoutKind
End With
'
' Set
number of copies to 1.
'
.NumberOfCopies = 1
'
.OutputType =
ppHandoutKind
'
.HandoutOrder = ppPrintHandoutVerticalFirst


'
列印顏色設定為純粹黑白

.PrintColorType = ppPrintPureBlackAndWhite
'.PrintColorType = ppPrintBlackAndWhite
'.PrintColorType = ppPrintColor



'
配合紙張調整大小
.FitToPage = msoTrue

' 投影片加框
.FrameSlides =
msoTrue


End With
'
'
立即列印出來

ActivePresentation.PrintOut

'
預覽列印；設定預覽列印無法看出講義模式設定頁碼的功能
' ActiveWindow.ViewType =
ppViewPrintPreview


Next i
End
If
'
ActivePresentation.HandoutMaster.Shapes(4).TextFrame.TextRange.Text =
""
ActivePresentation.NotesMaster.HeadersFooters.SlideNumber.Visible =
msoTrue

powerpoint2010 分離簡報檔中的音樂

1.將簡報檔的檔名改為 ****.zip

2.解壓縮檔案

3.在解開的資料夾中：\ppt\media 可找到聲音檔

如何在word表格中插入圖片時，表格不變，圖片能自動縮小呢？

在Word表格插入大圖能自動縮成指定尺寸

選取表格，表格內容，表格，選項，自動調整內容大小(打勾取消)

　　　　　　　　　　　列(指定高度打勾設定大小)

　　　　　　　　　　　欄(慣用寬度打勾設定大小)

插入圖片時，表格即不會隨圖片大小變動！


另一招：

可以先調整好你要的表格、欄位的大小，然後選取表格，再選取[表格工具／版面配置]功能表中的[儲存格大小／自動調整]選項中的「固定欄寬」。

Google+ Hangout 測試

youtube影片內嵌

語法：例＜iframe width="420" height="315" src="http://www.youtube.com/embed/7sDQmMwTc2o" frameborder="0" allowfullscreen>

自動、重覆播放  /embed/ 改為  /v/  加上&autoplay=1&loop=1 

yahoo使用舊版內嵌程式碼

HTML語法：在網頁中插入flash

HTML語法：在網頁中插入flash


＜!--語法開始-->
＜embed
src="flash網址" quality="high" bgcolor="#000000" width="320" height="200" play="true" loop="true" menu="true">
＜/embed>
＜!--語法結束->

==================================



語法說明： 
quality=品質,輸入high(高畫質)、autolow(低畫質)、low(畫質低劣)
bgcolor=背景顏色
width=寬
height=高
play=播放，輸入true(自動播放)、false(停留在一格)
loop=重播，輸入true(自動重播)、false(播至最後停止)
menu=快顯功能表，輸入true(顯示)、false(隱藏)

win8 開始工作鈕

Start Menu 8 v1.3.0 讓 Windows 8 擁有傳統的「開始按鈕」與「開始選單」（開機時自動跳過動態磚頁面）

http://briian.com/?p=9906

winstart

http://file.minwt.com/2012/11/winstart-windows-8.html

梅問題 教學網

Bandizip是一套免費功能又強大的壓縮軟體

Bandizip是一套免費功能又強大的壓縮軟體，支援的方面相當的廣泛，功能不輸付費的WinRAR及免費的7-ZIP。最重要的是可以讓中文正常顯示。

Bandizip官方網站：http://www.bandicam.com/bandizip/

Bandizip官方下載：http://www.bandicam.com/bandizip/downloads/

操作說明

win8_開始工作列

win8 其實也有「開始工作列」

位置：C:\ProgramData\Microsoft\Windows\Start Menu\Programs

(要先啟用 「顯示隱藏檔」)

可在工具列，用新增工具列的方式，將此「開始工作列」載入

WIN8安裝完成後，市集內軟體的數量似乎有點少？

怎麼會這樣呢？不是號稱有4000多筆應用程式嗎？

其實不是應用程式很少，而是市集裡的應用程式只顯示您偏好語言的應用程式，那要怎才會變多呢？操作步驟請參考下檔。


http://goo.gl/T3yHK

在Ubuntu server中安裝Vmware tools

VMware操作環境中，點選單VM ->Install / Upgrade Vmware Tools

mount /dev/cdrom /media/cdrom

cd /media/cdrom

cp VMwareTools-.....  /tmp/

cd /tmp/

tar zxvf VMwareTools-.....

cd vmware.....

./vmware-install.pl

出現互動式問答時，使用預設答案就可以正確安裝。

ubuntu server 固定ip 指定DNS

Ubuntu 12.04 Server 不建議以手動更改『/etc/resolv.conf』 的方式指定 Name Server,
 就算是手動在『/etc/resolv.conf』 指定 Name Server , 重開機之後你所作的變更也會被覆寫掉。

如果需要指定 Name Server , 可以在『/etc/network/interfaces』設定檔中以
『dns-nameservers』這個指令來指定。



在最後加入下列設定
auto eth0
iface eth0 inet static
address 1.2.3.4
netmask 255.255.255.0
gateway 3.4.5.6
＃設定為固定IP的界面也是一樣
dns-nameservers 8.8.8.8 168.95.192.1 168.95.1.1    
重新起動網路服務後 sudo /etc/init.d/networking restart

, 在『/etc/network/interfaces』設定檔中所指定的 Name Server , 會被寫入到『/etc/resolv.conf』中。

參考：http://www.mpsstudio.org/2012/05/ubuntu-ubuntu-1204-server-name.html

關閉word追蹤修訂功能

關閉word追蹤修訂功能
追蹤修訂的開啟與取消：是開始記錄與結束記錄，所以按下取消時，它依舊會顯示啟動記錄以來的所有修改歷程，而非隱藏那些歷程。





修改記錄不再出現的方法是：點選「校閱」＞「變更」＞「接受」＞「接受文件中的所有變更」。(word2010)

讓解析度低於1024x768的小筆電可以運行Windows 8 Metro Apps

修改regedit



位置：

HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Class\{4D36E 968-E325-11CE-BFC1-08002BE10318}\0000\Display1_DownScalingSupported

將原本的值從0改成1
設定完成之後，重開機。
開機重新進入之後就可以在螢幕解析度設定畫面中，
找到1024x768(這是win8支援的最低解析度

參考網站：http://studyhost.blogspot.tw/2012/04/1024x768windows-8-metro-apps.html

T 分數

T 分數的公式 = Z 分數 *10 +50


Z 分數：STANDARDIZE，完整格式如：STANDARDIZE (需要標準化的值, 平均數, 標準差)


平均數的公式：AVERAGE

標準差的公式：STDEV

STANDARDIZE 函數：傳回常態化的值


STDEV.P 函數 ：根據整個母體來計算標準差


STDEV.S 函數：根據樣本來估計標準差

STDEVA 函數：根據樣本來估計標準差，包含數字、文字和邏輯值


STDEVPA 函數：根據整個母體來計算標準差，包含數字、文字和邏輯值

如何解決 Yahoo 電子信箱下載附加檔案出現檔案名稱亂碼的問題

按一下 Internet Explorer 9 地址欄右邊的【相容性檢視】按鈕。

當97課綱資訊教材遇見Moodle

讓自由的風吹拂孩子的心

不管是自由軟體、免費軟體還是商業軟體，簡單易用就是好軟體。不管是iOS、Android、Windows還是....，只要您喜歡就好。向孩子吹起自由的風，慢慢觸動他的心弦。

http://free4wedo.blogspot.com/2011/12/97moodle.html

計算每一儲存格的資料行數？

excel 可用alt+Enter 來斷行，如何計算每一格中共有幾行呢？

注音輸入法中的多功能前導字元鍵

1. 你先切換到新注音輸入法。

2. 按一下多功能前導字元鍵：`［同~鍵］

Uniode內碼輸入：加按'U’及Unicode內碼

BIG5內碼輸入：加按'B’及BIG5內碼

詞語怏速輸入：加按'P’及造詞工具中所定義的捷徑字元

 全形標點符號

反查字碼 ：alt x

 

excel VBA :自動匯入各班資料

Sub 巨集2()
'
' 巨集2 巨集
'

'
 
     Dim AllFiles As String
 

     For j = 1 To 11
 
     Workbooks.Open "C:\Users\user\Desktop\定期考查得獎名單\1\1" & Format(j, "00") & ".xls"
 
     AllFiles = "1" & Format(j, "00") & ".xls"
    
    Range("A2").Select
    Windows(AllFiles).Activate
    Range("A2:D11").Select
    Selection.Copy
    Windows("total.xls").Activate
    ActiveSheet.Paste
    Range("A2").Select
    Selection.End(xlDown).Select
    ActiveCell.Offset(1, 0).Range("A1").Select
   
           
     Next


End Sub