用法: Public Const AppName As String = "程序名" Public Const CopyExe As String = "FastCopy" Public Sub ExeRefresh() 'Dim LocalAppNamePath As String Dim LocalAppNameDate As String Dim LocalCopyNameDate As String Dim NetAppNameDat e As String On Error Resu
VB编程经验总结,范畴:VB 文件名SourceDB.ini文件 Private Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String
a CMS based on django 1.0,supported by Django Dream Team,created by huyoo353 on 2008-NOV-10. -------------------------------------------------------------------------------- ddtcms ver0.1一些说明: 取消了registration的整合,因为它在google code不弄了,我用了userprofile,功能更
对日常债务进行数据库操作 .586 .model flat,stdcall option casemap:none include pay.inc include p_Func.asm include p_const.asm include p_struct.asm include p_data.asm include macro.mac .data hInstance HINSTANCE ? CommandLine LPSTR ? hParent dword ? hCursor dword