摘要: 先临时记录下,以后再整理将文件转换成二进制写入数据库:Dim adodb1, adorec As Object Set adodb1 = OpenDatabase(App.Path & "\data.mdb") Set adorec = adodb1.OpenRecordset("select * from model") Dim stmpic As ADODB.Stream Dim strpictemp As String Set stmpic = New ADODB.Stream ... 阅读全文
posted @ 2013-02-11 18:02 八风 阅读(655) 评论(0) 推荐(0) 编辑
摘要: 记录一下:http://msdn.microsoft.com/zh-cn/magazine/cc163526.aspx 阅读全文
posted @ 2012-11-23 16:16 八风 阅读(164) 评论(0) 推荐(0) 编辑
摘要: 洗好澡还算清醒,再把很久以前给我爸写的工资条制作方法整理下。首先还是看下案例表Sheet1的结构: ABCDEF1姓名业绩底薪工龄工龄工资应发薪水2苏玟洁4500001000011500115003罗丹伶5000001500054000190004颜世璇8000001500043000180005苏俊明10000002000032500225006王思涵2500000250002200027000希望实现的效果: ABCDEF1姓名业绩底薪工龄工龄工资应发薪水2苏玟洁4500001000011500115003姓名业绩底薪工龄工龄工资应发薪水4罗丹伶5000001500054000190005 阅读全文
posted @ 2012-09-17 00:06 八风 阅读(1388) 评论(0) 推荐(0) 编辑
摘要: 为了整理所有的教学大纲,需要判断对应课程的大纲文件是否存在。于是写了以下的自定义函数。在此备案以供以后使用或教学。 案例Excel表结构如下: ABCD1课程代号课程名称路径是否存在2b01210135《数据库原理》本科教学大纲(计算机B10)《数据库原理》本科教学大纲(计算机B10).pdf03b01221023《C++程序设计》本科教学大纲(计算机B11)《C++程序设计》本科教学大纲(计算机B11).pdf1D2单元格使用自定义函数:=TestFileExistence(C2)自定义函数如下所示:1 Function TestFileExistence(testfile)2 If ... 阅读全文
posted @ 2012-09-16 22:18 八风 阅读(1564) 评论(0) 推荐(0) 编辑
摘要: 在调试天气预报的例子时同样也碰到了这个错误:08-11 13:11:00.583: W/dalvikvm(360): VFY: unable to find class referenced in signature (Lorg/ksoap2/serialization/SoapObject;)08-11 13:11:00.583: I/dalvikvm(360): Could not find method org.ksoap2.serialization.SoapObject.getProperty, referenced from method daniel.weather.MainAc 阅读全文
posted @ 2012-08-11 22:39 八风 阅读(3263) 评论(0) 推荐(0) 编辑