GLOBAL SITES
 首页 > 产品 > OQL.NET 对象查询语言 > VB.NET 代码示例

OQL 示例 1

' == VB.NET Code ================================================

Dim qryOrder As SelectQuery = OQL _

  .SelectWhere(NW.Order = (NW.Customer.ContactTitle = "Owner"))

 

' ==== sql output for Microsoft Sql Server ======================

SELECT [Orders].*

FROM [Orders]

WHERE

  [Orders].[CustomerID] IN

    (

      SELECT [Customers].[CustomerID]

      FROM [Customers]

      WHERE

        [Customers].[ContactTitle] = 'Owner'

    )

 

' ==== sql output for Oracle ====================================

SELECT "Orders".*

FROM "Orders"

WHERE

  "Orders"."CustomerID" IN

    (

      SELECT "Customers"."CustomerID"

      FROM "Customers"

      WHERE

        "Customers"."ContactTitle" = 'Owner'

    )

OQL 示例 2

' == VB.NET Code ===================================================

Dim sel As SelectQuery = OQL _

.Select(NW.Order.OrderID,NW.Order.OrderDate,NW.Order.RequiredDate) _

.Add(NW.OrderDetail) _

.From(NW.Order, NW.Order.OrderDetail) _

.Where(NW.Order.CustomerID = 5 And NW.Order.ShipVia = 1 _

    And NW.Order.OrderID = NW.OrderDetail.OrderID) _

.OrderBy(NW.Order.OrderID)

 

' ==== sql output for Microsoft Sql Server =========================

SELECT

  [Orders].[OrderID] , [Orders].[OrderDate] , [Orders].[RequiredDate]

  , [Order Details].*

FROM

  [Orders] , [Order Details]

WHERE

  [Orders].[EmployeeID] = 5 AND

  [Orders].[ShipVia] = 1 AND

  [Orders].[OrderID] = [Order Details].[OrderID]

ORDER BY [Orders].[OrderID]

 

' ==== sql output for Oracle ======================================

SELECT

  "Orders"."OrderID" , "Orders"."OrderDate" , "Orders"."RequiredDate"

  , "Order Details".*

FROM

  "Orders" , "Order Details"

WHERE

  "Orders"."EmployeeID" = 5 AND

  "Orders"."ShipVia" = 1 AND

  "Orders"."OrderID" = "Order Details"."OrderID"

ORDER BY "Orders"."OrderID"

概述
特点
下载
购买
系统需求
视频演示
C# 代码示例
VB.NET 代码示例
在线文档
Word to HTML help Word to Web help CHM to Web help CHM to Word CHM to HTML/MHTML .NET assembly Obfuscator