xiciliu的专栏

其实将图片保存在数据库中不外乎两种方式。1，图片文件保存在硬盘上，数据库中负责记录路径（不管是绝对路径还是相对路径）。2，图片直接以二进制的形式保存在数据库中。 两者各有优势1，存储的文件显而易见，而且实现方便。当然掉包也方便。麻烦的地方就是管理，比如路径以及关联内容的识别管理。程序移植不变。 2，管理方便。全sql管理。图片文件及其相关的内容可以方便检索和识别。

Class CompExProp Private mComponent Private mShapeSize Private Sub Class_Initialize() mShapeSize=0 End Sub '---------------begin set-------- Public Property Let Component(ByVal objVar) mCo

' 批量替换文件名称' author : avill' upate  :2006.2.28'Dim NewLineNewLine = vbcrlfTabStop = ""function isFolderExists(fso,folderPath)  if folderPath = empty then exit function  If not

经常，写的程序需要保存/打开/编辑某个xls文件，而xls文件被任何程序打开时，其他程序将无法对他进行编辑、删除操作。这是需要检测xls文件是否被打开，然后提醒程序来进行后续处理。这里只是vbs程序的一个例子。'参数sFile, xls文件绝对路径,如 F:\Excel.xlsPublic Function IsFileOpen(sFile)Dim isOpenisOpen=

Function RegExpTest(patrn, strng) Dim regEx, Match, Matches Set regEx = New RegExp regEx.Pattern = patrn regEx.IgnoreCase = True regEx.Global = True

'vbs直接在控制台显示出遍历后的文件及文件夹，当然您可以修改让其输入到文件或更改显示方式。 Function FilesTree(sPath) '遍历一个文件夹下的所有文件夹文件夹 Set oFso = CreateObject("Scripting.FileSystemObject") Set oFolder = oFso.GetFolder(sPath)