日期:2014-05-19  浏览次数:20531 次

关于ACCESS数据库临时表的问题~
If   rct.EOF   Then
                                  strsql   =   "create   table   cs_temp( "   &   _
                                  "   cname   varchar(50), "   &   _
                                  "   cbir   datetime, "   &   _
                                  "   cwork   varchar(50), "   &   _
                                  "   cdan   varchar(50), "   &   _
                                  "   cdtime   datetime, "   &   _
                                  "   cctel   int, "   &   _
                                  "   cliwu   varchar(50)) "
                                   
                                    runsql   (strsql)
                                    strsql   =   "insert   into   cs_temp   "   _
                                    &   "   select   a.cname,a.cbir,a.cwork,a.cdan,b.cdtime,b.cctel,b.cliwu     from   cs_info   a   right   join   cs_ding   b   on   b.ctel=a.ctel   where   a.cname= ' "   &   Trim(Text1.Text)   &   " '   and   b.cdtime= ' "   &   DTPicker1.Value   &   " ' "
                                    runsql   (strsql)
 
                            Else
                                    strsql   =   "delete   from   cs_temp "
                                    runsql   (strsql)
                                    MsgBox   2
                                    strsql   =   "insert   into   cs_