CodeBus
www.codebus.net
Search
Sign in
Sign up
Hot Search :
Source
embeded
web
remote control
p2p
game
More...
Location :
Home
Search - zip.lib.p
Main Category
SourceCode
Documents
Books
WEB Code
Develop Tools
Other resource
Search - zip.lib.p - List
[
Other resource
]
jgap_2.5_src
DL : 0
java实现的遗传算法, 他的设计需要最小集合的支持, 并且在这个基础上实现更复杂的遗传算法! 目录结构如下: jgap_2.5_src.zip\\srcjgap_2.5_src.zip\\lib jgap_2.5_src.zip\\examples jgap_2.5_src.zip\\tests 还有相应的帮助-achieve the genetic algorithm, the design needs the support of the smallest pools, and on the basis of a more complex genetic algorithm! Directory structure is as follows : jgap_2.5_src.zip \\ srcjgap_2.5_src.zip \\ lib jgap_2.5_src.zip \\ examples jgap_2.5_src.zi p \\ corresponding tests also help
Date
: 2008-10-13
Size
: 655.45kb
User
:
star
[
SQL Server
]
读写SQL中的image字段.zip
DL : 0
Private Declare Function DeleteFile Lib "kernel32" Alias "DeleteFileA" (ByVal lpFileName As String) As Long '************************************************************* Public Function ImportPhoto(sPicFile As String, sEmpID As String) As String Dim rcsPic As ADODB.Recordset Dim sMax As String Dim sInsertPic As String Dim rcsTemp As New Recordset Dim sTempSQL As String If Trim(sPicFile) = "" Then Exit Function On Error GoTo ErrorImportPhoto Set rcsPic = New ADODB.Recordset rcsPic.CursorType = adOpenKeyset rcsPic.LockType = adLockOptimistic ' rcsPic.Open "T_PPICTURE ", AstDbCnt, , , adCmdTable 'astdbcnt 替换为你连接方式 Set mstream = New ADODB.Stream mstream.Type = adTypeBinary mstream.Open mstream.LoadFromFile sPicFile rcsPic.AddNew rcsPic.Fields("PERS").Value = sEmpID rcsPic.Fields("PIC").Value = mstream.Read rcsPic.Update mstream.Close Set mstream = Nothing rcsPic.Close Set rcsPic = Nothing Exit Function ErrorImportPhoto: ImportPhoto = "FALSE" End Function '注意要将 AstDbCnt 替换为你的oracle 连接 Public Function DisplayPhoto(oPicture As PictureBox, sPicID As String) Dim rcsDisplay As ADODB.Recordset Set rcsDisplay = New ADODB.Recordset Dim mstream As ADODB.Stream Dim mc0 As String rcsDisplay.Open "Select * from T_PPICTURE where PERS = '" & sPicID & "'", AstDbCnt, adOpenKeyset, adLockOptimistic If rcsDisplay.EOF Then oPicture.Picture = LoadPicture() Exit Function End If If IsNull(rcsDisplay.Fields("PIC").Value) Then oPicture.Picture = LoadPicture() Exit Function End If Set mstream = New ADODB.Stream mstream.Type = adTypeBinary mstream.Open mstream.Write rcsDisplay.Fields("PIC").Value strclose = App.Path & "\AstPhoto_temp" DeleteFile (strclose) mstream.SaveToFile strclose mstream.Close Set mstream = Nothing rcsDisplay.Close Set rcsDisplay = Nothing oPicture.Picture = LoadPicture(strclose) End Function Private Sub Command1_Click() Set cn = New ADODB.Connection cn.Open "Provider=SQLOLEDB;data Source=IWP2;Initial Catalog=T213;User Id=sa;Password=sql123" Set rs = New ADODB.Recordset rs.Open "Select * from QB_T213PMPD where DT=2006080818", cn, adOpenKeyset, adLockOptimistic Set mstream = New ADODB.Stream mstream.Type = adTypeBinary mstream.Open mstream.Write rs.Fields("MPI").Value mstream.SaveToFile "P:\T213_data\ShowMPI\T213_3.mpi", adSaveCreateOverWrite rs.Close cn.Close End Sub Private Sub Command2_Click() Set cn = New ADODB.Connection cn.Open "Provider=SQLOLEDB;data Source=;Initial Catalog=pubs;User Id=;Password=" Set rs = New ADODB.Recordset rs.Open "Select * from pub_info", cn, adOpenKeyset, adLockOptimistic Set mstream = New ADODB.Stream mstream.Type = adTypeBinary mstream.Open mstream.LoadFromFile "" rs.Fields("logo").Value = mstream.Read rs.Update rs.Close cn.Close End Sub
Date
: 2009-04-21
Size
: 3.05kb
User
:
wuzhiyong_130@163.com
[
Internet-Network
]
zip.lib
DL : 0
我的一个网友写的PHP下面的zip类 最适合PHP做网上办公系统和提供网站管理程序。-I wrote a netizen PHP zip following categories best suited to do online PHP office systems and site management procedures.
Date
: 2025-07-12
Size
: 3kb
User
:
董好然
[
AI-NN-PR
]
jgap_2.5_src
DL : 0
java实现的遗传算法, 他的设计需要最小集合的支持, 并且在这个基础上实现更复杂的遗传算法! 目录结构如下: jgap_2.5_src.zip\srcjgap_2.5_src.zip\lib jgap_2.5_src.zip\examples jgap_2.5_src.zip\tests 还有相应的帮助-achieve the genetic algorithm, the design needs the support of the smallest pools, and on the basis of a more complex genetic algorithm! Directory structure is as follows : jgap_2.5_src.zip \ srcjgap_2.5_src.zip \ lib jgap_2.5_src.zip \ examples jgap_2.5_src.zi p \ corresponding tests also help
Date
: 2025-07-12
Size
: 655kb
User
:
star
[
WEB Code
]
unzip_php
DL : 0
UnzipPHP is a tools for zip file on server.
Date
: 2025-07-12
Size
: 29kb
User
:
dainv
CodeBus
is one of the largest source code repositories on the Internet!
Contact us :
1999-2046
CodeBus
All Rights Reserved.