🚀 go-pugleaf

>$B$3$s$K$A$O!"Kh7n$N$h$&$K;HMQ8@8l$,JQ$o$k#k#i#n(B-chan$B$G$9!#(B
>
>$B:#7n$O!"#V#B#4!%#0$G#C!?#S%"%W%j%1!<%7%g%s$r3+H/$7$F$$$^$9!#(B
>
>$B#V#B$+$i(BOracle7$B$r%"%?%C%A$7$?(Bmdb$B$K!"(Bgif$B%U%!%$%k$r3JG<$7$?$$(B
>$B$N$G$9$,!"$I$&$d$l$P$$$$$N$+$o$+$j$^$;$s!#(B
>$B6qBNE*$K$$$&$H!"(BAccess$B$r3+$$$F(Bgif$B%U%!%$%k$r%U%#!<%k%I$KA^F~(B
>$B$7$?>l9g$O!"$=$N%U%#!<%k%I$r%@%V%k%/%j%C%/$9$k$H(Bgif$B%U%!%$%k$N(B
>$BFbMF$,I=<($5$l$^$9$,!"$=$l$HF1$8$3$H$r#V#B$G$d$j$?$$$N$G$9!#(B
>
>$B:#$O!"%U%!%$%k$r%P%$%J%j!<$GFI$_9~$s$G(BAppendchunk$B$9$k(B
>$BJ}K!$G;n$7$F$$$^$9$,!"$I$&$b(BAccess$B$+$i3+$$$F$_$k$H$&$^$/(B
>$B$$$-$^$;$s!#(B
>
>$B$4B8$8$h$j$NJ}$h$m$7$/$*4j$$$7$^$9!#(B
>

$B7'@n$H?=$7$^$9!#(B
MDB$B$K(BVB$B$+$iE=$jIU$1$kJ}K!$G$9$,!"0J2<$N<j=g$G2DG=$G$9!#(B
$B$7$+$7!";d$N4D6-$G$9$H#B#M#P$7$+E=$jIU$1$i$l$J$+$C$?$N$G(B
$B$=$NNc$r5-=R$7$^$9!#$^!"4pK\$O0l=o$@$H;W$$$^$9$+$i1~MQ$7$F$/$@$5$$!#(B

$B!c!c%U%)!<%`$N=`Hw!d!d(B
$B2hA|$rF~$l$k(BMDB$B$N%U%#!<%k%I$r%*%V%8%'%/%H7?$G:n@.$7$^$9!#(B
Form$B>e$K(BData$B%3%s%H%m!<%k$H(BOle$B%3%s%H%m!<%k$rG[CV$7$^$9!#(B
Ole$B%3%s%H%m!<%k$N%*%V%8%'%/%HA^F~$O%-%c%s%;%k$7$F$/$@$5$$!#(B
Data$B%3%s%H%m!<%k$N(BDatabaseName$B$K(BMDB$B%U%!%$%k$NL>A0$r;XDj$7$^$9!#(B
Data$B%3%s%H%m!<%k$N(BRecordSource$B$K>e$G:n@.$7$?%F!<%V%kL>$r;XDj$7$^$9!#(B
Ole$B%3%s%H%m!<%k$N(BDataSource$B$K(BData$B%3%s%H%m!<%k$r;XDj$7$^$9!#(B
Ole$B%3%s%H%m!<%k$N(BDataFields$B$K2hA|$rF~$l$k%U%#!<%k%I$r;XDj$7$^$9!#(B

$B!c!c%3!<%I!d!d(B Data$B%3%s%H%m!<%k$r(BData1,Ole$B%3%s%H%m!<%k$r(BOle1$B$G=q$-$^$9!#(B
Data1.Recordset.AddNew
OLE1.CreateEmbed "FileName", "ClassName"
OLE1.Update                   <-$B$$$i$J$$$+$bCN$l$J$$!#(B
Data1.Recordset.Update

$B$H$$$C$?46$8$G$9!#(B"FileName"$B$K$O<B:]$KF~$l$k2hA|$N%U%!%$%kL>!"(B"ClassName"
$B$O!"(BOle$B%3%s%H%m!<%k$X$N%*%V%8%'%/%H$NA^F~$G!"0lEY%"%W%j%1!<%7%g%s$r;XDj(B
$B$9$l$P(BOle$B%3%s%H%m!<%k$N(BClass$B%W%m%Q%F%#$KI=<($5$l$^$9$N$G!"$=$l$rN.MQ$9$k(B
$B;v$r$*4+$a$7$^$9!#(B

$B$H$^$"!"#N#T$N%Z%$%s%H$G$NNc$G$9$1$l$I$b!"<B:]$+$J$jCY$$$G$9!#(B
Pro 200$B$G$b!"2hA|$NI=<($K#1!A#2J,$+$+$j$^$9!#$H$F$b<BMQ$K$O!%!%!%$H$$$C$?(B
$B46$8$N5!G=$G$9!#%U%!%$%kL>$r;}$?$;$F!"3+$+$;$?$[$&$,$$$$$N$G$O!)(B

$B$"$H!"#V#B$G2hA|$r07$&$N$G$7$?$i!"J82=%*%j%(%s%H$N#L#e#a#d#t#o#o#l!J$@(B
$B$H;W$C$?!K$,!"?'!9;H$($k>e$K#m#d#b$KJ]B8$G$-$?$H5-21$7$F$^$9!#(B

$B0lEY!";n$7$F$_$F$/$@$5$$!#(B

****************************************
*  $B3t<02q<R(B  $B%R%e!<%^%M%C%H(B            **
*  $B%7%9%F%`3+H/It(B  $B7'@n(B  $B>!(B            * *
*  E-Mail:hmn1@ny.airnet.ne.jp         * *
*  TEL:0466-28-4508  FAX:0466-28-5545  * *
**************************************** *
 *                                      **
  ****************************************