- 博客(19)
- 收藏
- 关注
RSS订阅原创 確認字串是否為有效的電子郵件格式
確認字串是否為有效的電子郵件格式return Regex.IsMatch(email, @"^(?("")("".+?(?<!\\)""@)|(([0-9a-z]((\.(?!\.))|[-!#\$%&'\*\+/=\?\^`\{\}\|~\w])*)(?<=[0-9a-z])@))" + @"(?(\[)(\[(\d{1,3}\.){3}\d{1,3}\])|(([0-9...
2019-08-19 11:00:22
2134
转载 word文档如何批量修改图片大小
參考：http://www.360doc.com/content/10/0921/22/2619988_55466952.shtmlSub FormatPics() Dim iSha As InlineShape For Each iSha In ActiveDocument.InlineShapes If iSha.Type = wdInlin
2016-05-26 14:41:44
3714
转载 How to Login Automatically into Website Using Excel VBA
1.出處2. CodeSub Auto_Open() ‘打開EXCEL時'Application.Visible = False'MsgBox Workbooks.CountCall cga If Workbooks.Count Application.Quit End IfApplication.DisplayAlerts = False W
2016-01-18 17:17:55
580
转载 excel：照片縮圖
建置條件：從？欄有圖片檔名資料，再選擇照片所在目錄對應出每一欄位的實際路徑， 並自動加入圖片在？欄，後再清除圖片檔名，但不知為何第一次加入的照片很糊，需Run二次才OK。Private Sub CommandButton1_Click() Dim stMedd As String stMedd = "請選擇照片來源目錄：" '選擇
2015-12-24 16:13:23
461
转载 使用郵件合拼並分存文件資料
前提：先製作完成Word和資料來源的關聯Sub ProduceDoc()'Dim stMedd As String'Dim obMapp As Variant'stMedd = "請選擇分割後申請表目錄：" '選擇目錄'Set obMapp = CreateObject("Shell.Application").BrowseForFolder(0, stMedd, &H1)
2015-12-18 13:59:47
885
转载 more than 255 characters in filepath
C# file with more than 255 characters in filepath
2015-11-02 15:40:26
445
转载 下載北風資料庫(NORTHWIND)
微軟提供的Northwindhttp://www.microsoft.com/en-us/download/details.aspx?id=23654按下了 "Download"將SQL2000SampleDB.msi複製到你的電腦上再Double Click這個檔案接這就是 Next(下一步) , 一直到 Finish最後, 會在你的電腦上
2015-09-17 10:02:54
1230
转载 圖片輪播增加播放影音檔功能
圖片輪播增加播放影音檔功能利用Freemake Video Converter轉檔FLV、SWF後，自動生成HTMLcode當範例，並使用fancybox的功能加寫影音資料去呈現，須有特定的大小和fancybox做對應。1.Freemake Video Converter:https://mega.co.nz/temporary/mega/M85iUa7I2.fancybox:http
2015-05-14 14:46:16
634
转载 jquery submit 前的檢查
var allowSubmit = false; // By default deny the submit $("#btn_SAVE").on('click', function (e, options) { options = options || {}; if ($("#OrderMtn").valid()) {
2015-04-24 17:16:46
913
转载 Excel 有資料，但匯入到資料庫後卻是 NULL；設定登錄機碼 TypeGuessRows、連線字串 IMEX
Excel 有資料，但匯入到資料庫後卻是 NULL；設定登錄機碼 TypeGuessRows、連線字串 IMEX
2015-02-24 17:24:11
1313
转载 [Excel格式] 設定Excel cell的格式
利用網頁轉出資料到 Excel 上常會遇到想要以文字格式顯示的數字，像是手機號碼、帳號之類的資料，被 Excel 自動轉換成數字格式，於是前面的 0 被省略掉了、帳號變成科學記號了...等等的麻煩，有個方便的方式不會去加入奇奇怪怪的東西到欄位裡面，讓 Excel 不會去判斷成數字，很簡單，只要在 td 裡面加入 style 設定就行了。 mso-number-format:"0" N
2015-01-29 10:42:14
671
转载 robots.txt
使用robots.txt教學、防止目錄內資料被登錄拒絕全部的搜尋引擎登錄資料。User-agent: *Disallow: /
2015-01-29 09:56:34
422
转载 Trigger
http://www.codeproject.com/Articles/25600/Triggers-SQL-Servercreate trigger my_triggeron my_tableafter insert, updateasbegindeclare @dt datetime = getdate();update aset expire_date = CO
2015-01-28 14:43:31
568
转载 分割【節】Word
Sub SplitSectionsAsDocuments()'' 分文件'' Dim oSrcDoc As Document, oNewDoc As Document Dim strSrcName As String, strNewName As String Dim oRange As Range Dim nIndex As Integer
2015-01-09 09:49:34
436
转载 刪除Word全部文字方塊
Sub DeleteAllDocInfoShapes()Dim oShp As Word.ShapeDim i As LongvResponse = MsgBox("Delete All DocInfoShapes ? ", vbYesNoCancel, "刪除文字方塊")For i = ActiveDocument.Shapes.Count To 1 Step -1Set o
2014-09-11 11:42:16
4094
转载 Excel SendMail
MsgSubject EmailToEmailCCEmailBCC AttachmentImportancePublic Enum ImportanceLevel High Medium LowEnd EnumFunction SendMessage(Msg As String, Subject As Strin
2011-11-25 13:49:49
418
转载 Word 操作
1. Microsoft.Office.Interop.Word 各個屬性的定義及翻譯 2.使用C#將word文檔轉換為可供傳真的tif文件
2011-10-26 10:46:22
214
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人