實現透過CDO.Message寄發Gmail信件
作者:admin 日期:2009-10-19
如何將全形英文字、數值轉半形
作者:admin 日期:2008-07-11
最近有網友詢問如何將全形英文字、數值轉成半形(作為使用者資料輸入之驗證)
提供以下函數供需要的網友直接使用
程序代碼
這是我的作法,如果格友有更具效率的寫法,歡迎分享喔~
那如果是要將半形轉全形呢?聰明的您~應該不難反解了吧....
提供以下函數供需要的網友直接使用
程序代碼Function ChgToHalfStr(strInput)
strFullshape="ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz1234567890-_~+, ?!@#$%^&*()."
strHalfshape="ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz1234567890-_~+, ?!@#$%︿&*()‧"
For Subi=1 To len(strFullshape)
strInput=Replace(strInput,Mid(strHalfshape,Subi,1),Mid(strFullshape,Subi,1))
Next
ChgToHalfStr=strInput
End Function
strFullshape="ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz1234567890-_~+, ?!@#$%^&*()."
strHalfshape="ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz1234567890-_~+, ?!@#$%︿&*()‧"
For Subi=1 To len(strFullshape)
strInput=Replace(strInput,Mid(strHalfshape,Subi,1),Mid(strFullshape,Subi,1))
Next
ChgToHalfStr=strInput
End Function
這是我的作法,如果格友有更具效率的寫法,歡迎分享喔~
那如果是要將半形轉全形呢?聰明的您~應該不難反解了吧....
ASP儲存遠端圖片至網站
作者:admin 日期:2008-02-02
<%
'先下載遠端圖片
url="http://www.im286.com/images/im286/logo.gif" '遠端圖片位址
savepath="D:\photo\" '保存路徑
'為檔重命名
'先下載遠端圖片
url="http://www.im286.com/images/im286/logo.gif" '遠端圖片位址
savepath="D:\photo\" '保存路徑
'為檔重命名








