select * into ybtp200412 from (select rs.no,((31*8-yb200412.j101xs-yb200412.j114xs-yb200412.j102xs-yb200412.j108xs-yb200412.j110xs-yb200412.j111xs-yb200412.j112xs-yb200412.j115xs-yb200412.j116xs-yb200412.j117xs-yb200412.j118xs-yb200412.kgxs-yb200412.zcdztsj/60-rs200412.qqts*8)/(31*8)*100) as cql from rs,rs200412,yb200412 WHERE (RS.NO=RS200412.NO AND RS200412.NO=YB200412.NO AND RS.NO=YB200412.NO))

解决方案 »

  1.   

    连接代码如下:
    ############################################
    Dim db As New ADODB.Connection
    Dim rs As New ADODB.Recordset
    Dim rssql As String
    Const connstring = "Provider=SQLOLEDB.1;Password=1;Persist Security Info=True;User ID=sa;Initial Catalog=stxt;Data Source=127.0.0.1"
    Set db = New ADODB.Connection
    db.ConnectionString = connstring
    db.Open  Set rs = New ADODB.Recordset
      rs.ActiveConnection = db
      rs.CursorLocation = adUseClient
      
      rssql = "select * into ybtp200412 from (select rs.no,((31*8-yb200412.j101xs-yb200412.j114xs-yb200412.j102xs-yb200412.j108xs-yb200412.j110xs-yb200412.j111xs-yb200412.j112xs-yb200412.j115xs-yb200412.j116xs-yb200412.j117xs-yb200412.j118xs-yb200412.kgxs-yb200412.zcdztsj/60-rs200412.qqts*8)/(31*8)*100) as cql from rs,rs200412,yb200412 WHERE (RS.NO=RS200412.NO AND RS200412.NO=YB200412.NO AND RS.NO=YB200412.NO))"
      rs.Open rssql
    ######################
      

  2.   

    '这样试试:
    select * into ybtp200412 from (select rs.no,((31*8-yb200412.j101xs-yb200412.j114xs-yb200412.j102xs-yb200412.j108xs-yb200412.j110xs-yb200412.j111xs-yb200412.j112xs-yb200412.j115xs-yb200412.j116xs-yb200412.j117xs-yb200412.j118xs-yb200412.kgxs-yb200412.zcdztsj/60-rs200412.qqts*8)/(31*8)*100) as cql from rs,rs200412,yb200412 WHERE (RS.NO=RS200412.NO AND RS200412.NO=YB200412.NO AND RS.NO=YB200412.NO)) as tmp
      

  3.   

    select * into ybtp200412 from(select * from rs)  为什么这样的语句 在 sql中 可以 在vb中不行呢?
      

  4.   

    select * into ybtp200412 from(select * from rs) as tmp
      

  5.   

    select * into ybtp200412 from (select * from rs) as tmp
      

  6.   

    ---------------------------
    cql
    ---------------------------
    select * into ybtp200501 from ((select rs.no,((31*8-yb200501.j101xs -yb200501.j114xs-yb200501.j102xs-yb200501.j108xs-yb200501.j110xs-yb200501.j111xs-yb200501.j112xs-yb200501.j115xs-yb200501.j116xs-yb200501.j117xs-yb200501.j118xs-yb200501.kgxs-yb200501.zcdztsj/60-rs200501.qqts*8)/(31*8)*100) as cql from rs,rs200501,yb200501 WHERE (RS.NO=RS200501.NO AND RS200501.NO=YB200501.NO AND RS.NO=YB200501.NO)) as tmp)
    ---------------------------
    确定   
    ---------------------------
    这样还是 出错