VFP+SQL SERVER实例讲解10.doc

VFP+SQL SERVER实例讲解10日期：2007-06-21来源： 作者：字体：大 中 小 MPLOYEEID)csql=csql+INNERJOINCUSTOMERSONORDERS.CUSTOMERID=CUSTOMERS.CUSTOMERID)csql=csql+INNERJOINSHipPERSONORDERS.SHIPVIA=SHIPPERS.SHIPPERID) csql=csql+INNERJOINORDERDETAILSONORDERS.ORDERID=ORDERDETAILS.ORDERID)csql=csql+INNERJOINPRODUCTSONORDERDETAILS.PRODUCTID=PRODUCTS.PRODUCTID&传送,得到的光标名称为默认的SqlResultSQLEXEC(hconn,csql) 解释：由于语句很长，我花费了多条赋值语句才完成配置这个字符串。大家注意到了我选用双引号作为字符串分隔符，这里面是有大学问的。在SQLServer中有待空格的表名如：OrderDetails，当它用于SQL语句时，就必须要用方括号标示，所以如果在Visualfoxpro中如果用方括号分割字符串的话，就会有冲突！；单引号是SQLServer中分隔字符串、日期值的符号，在VisualFoxPro中如果使用单引号分隔字符串的话，也会造成冲突，当然在以上语句中我们没有看到单引号的身影，不过我们做一个变动，大家就会感到问题的存在了！localcsq&配置待传送的语句csql=csql+SELECTORDERS.SHIPNAME,ORDERS.SHIPADDRESS,ORDERS.SHIPCITY,ORDERS.SHIPREGION,csql=csql+ORDERS.SHIPPOSTALCODE,ORDERS.SHIPCOUNTRY,ORDERS.CUSTOMERID,csql=csql+CUSTOMERS.COMPANYNAMEASCUSTOMERNAM,csql=csql+EMPLOYEES.FIRSTNAME+EMPLOYEES.LASTNAMEASSALESPERSON,ORDERS.ORDERID,ORDERS.ORDERDATE,csql=csql+ORDERS.REQUIREDDATE,ORDERS.SHIPPEDDATE,SHIPPERS.COMPANYNAMEASSHIPPERNAME,csql=csql+ORDERDETAILS.PRODUCTID,PRODUCTS.PRODUCTNAME,ORDERDETAILS.UNITPRICE,csql=csql+ORDERDETAILS.QUANTITY,ORDERDETAILS.DISCOUNT,csql=csql+ORDERDETAILS.UNITPRICE*ORDERDETAILS.QUANTITY*(1-ORDERDETAILS.DISCOUNT)ASEXTENDEDPRICE,csql=csql+ORDERS.FREIGHTcsql=csql+FROM(EMPLOYEESINNERJOINORDERSONEMPLOYEES.EMPLOYEEID=ORDERS.EMPLOYEEID)csql=csql+INNERJOINCUSTOMERSONORDERS.CUSTOMERID=CUSTOMERS.CUSTOMERID)csql=csql+INNERJOINSHIPPERSONORDERS.SHIPVIA=SHIPPERS.SHIPPERID)csql=csql+INNERJOINORDERDETAILSONORDERS.ORDERID=ORDERDETAILS.ORDERID)csql=csql+INNERJOINPRODUCTSONORDERDETAILS.PRODUCTID=PRODUCTS.PRODUCTIDcsql=csql+WHEREORDERS.ORDERDATEBETWEEN1996-10-01AND1997-09-30csql=csql+ANDORDERS.CUSTOMERIDLIKE%C%csql=csql+ANDORDERDETAILS.QUANTITY50&传送,得到的光标名称为默认的SqlResultSQLEXEC(hconn,csql)传递变量上面一个例子充分证明了我关于字符串分隔符的经验，接着我又为大家提出了一个新课题：怎样传递变量到SQLServer中。上例中，我们为语句加入了Where字句，下面我们把其中的条件值变为变量，这样这句SQL传递才变得真正的有意义！我以为关于变量的传递有两种方法，下面逐一介绍。第一种是利用：问号+变量来传递的，这是一种常用的方法，用起来也很简单，不用担心变量的类型，ODBC会自动的转化。下面的例子中就涉及到了日期型、数值型、字符型变量，我们根本不用担心变量类型的转化，只要在前面加上问号填入语句中就行了：localcsq&要传送的变量dDate1=1996-10-01dDate2=1997-09-30cCustomerID=%C%nQty=50&配置待传送的语句csql=csql+SELECTORDERS.SHIPNAME,ORDERS.SHIPADDRESS,ORDERS.SHIPCITY,ORDERS.SHIPREGION,csql=csql+ORDERS.SHIPPOSTALCODE,ORDERS.SHIPCOUNTRY,ORDERS.CUSTOMERID,csql=csql+CUSTOMERS.COMPANYNAMEASCUSTOMERNAM,csql=csql+EMPLOYEES.FIRSTNAME+EMPLOYEES.LASTNAMEASSALESPERSON,ORDERS.ORDERID,ORDERS.ORDERDATE,csql=csql+ORDERS.REQUIREDDATE,ORDERS.SHIPPEDDATE,SHIPPERS.COMPANYNAMEASSHIPPERNAME,csql=csql+ORDERDETAILS.PRODUCTID,PRODUCTS.PRODUCTNAME,ORDERDETAILS.UNITPRICE,csql=csql+ORDERDETAILS.QUANTITY,ORDERDETAILS.DISCOUNT,csql=csql+ORDERDETAILS.UNITPRICE*ORDERDETAILS.QUANTITY*(1-ORDERDETAILS.DISCOUNT)ASEXTENDEDPRICE,csql=csql+ORDERS.FREIGHTcsql=csql+FROM(EMPLOYEESINNERJOINORDERSONEMPLOYEES.EMPLOYEEID=ORDERS.EMPLOYEEID)csql=csql+INNERJOINCUSTOMERSONORDERS.CUSTOMERID=CUSTOMERS.CUSTOMERID)csql=csql+INNERJOINSHIPPERSONORDERS.SHIPVIA=SHIPPERS.SHIPPERID)csql=csql+INNERJOINORDERDETAILSONORDERS.ORDERID=ORDERDETAILS.ORDERID)csql=csql+INNERJOINPRODUCTSONORDERDETAILS.PRODUCTID=PRODUCTS.PRODUCTIDcsql=csql+WHEREORDERS.ORDERDATEBETWEEN?dDate1AND?dDate2csql=csql+ANDORDERS.CUSTOMERIDLIKE?cCustomerIDcsql=csql+ANDORDERDETAILS.QUANTITY?nQty&传送,得到的光标名称为默认的SqlResultSQLEXEC(hconn,csql)分析：我们先来看一看书写的规范，请看：csql=csql+WHEREORDERS.ORDERDATEBETWEEN?dDate1AND?dDate2csql=csql+ANDORDERS.CUSTOMERIDLIKE?cCustomerIDcsql=csql+ANDORDERDETAILS.QUANTITY?nQty问号变量作为参数放置在SQL语句中，你也许会奇怪：问号变量怎么还要放在VisualFoxPro的双引号里面，这不是作为一个字符串了吗？我们首先要清楚VisualFoxPro的SQLEXEC()传递的只能是一个字符串，所以问号变量应当作为字符串的一部分！SQLEXEC()会将这个字符串给ODBC，ODBC分析一下这个字符串，他会发现问号变量的特殊写法，于是它传递给SQLServer的语句是（整句太长，我就选择最后一段）：WHEREORDERS.ORDERDATEBETWEENP1ANDP2ANDORDERS.CUSTOMERIDLIKEP3ANDORDERDETAILS.QUANTITYP4,NP1datetime,P2datetime,P3varchar(3),P4float,