Set DSN for embedded SQL. Default is dbDSN.

Product Version

Property Value

Mydb.dbProp="Connect string"

QuickProp Keyword Abbreviation

Example

In this example, copy the NWIND.mdb to NWIND1.mdb and assign to the embedded grid.

<script language="VB" runat="server">
Sub Page_Load(Src As Object, E As EventArgs)
Dim pop As String = "<A HREF='/tornado/demo/T_Grid_4.aspx?Details=^0^' Target='Details' 
     onClick=""window.open('','Details', 'width=500, height=500, left=400, top=400, 
     directories=no, menubar=no, toolbar=no, status=no, resizable=yes')"">^0^</A>"
Dim E63 As New Tornado.z
  With E63
    .dbQP = "U=60|S=15|M=G|D=Nwind.mdb|GDF=CustomerID,CompanyName,ContactName"
    .dbEmbeddedDSN = "NWIND1"
    .dbEmbeddedGridMagicCell = "(;![]^|~/+{})OrderID!!" & pop
    .dbGridMagicCell = "(;![]^|~/+{})field=CompanyName|
         macro=^1^<br>^4^<br>^5^, ^7^<p>^2^<br>^4^<br>^9^!field=ContactName|
         Macro=SQL:SELECT OrderID,OrderDate,RequiredDate,ShippedDate 
         from orders where customerID= '^0^'"
    .dbNameMap = "field=CustomerID|alias=ID,field=CompanyName|
         alias=Customer,field=ContactName|alias=Orders"
    .dbEmbeddedGridNameMap = "field=OrderID|alias=ID,field=OrderDate|
         alias=Ordered,field=RequiredDate|alias=Required,field=ShippedDate|alias=Shipped"
    .dbSQL = "SELECT CustomerID,CompanyName,ContactName,ContactTitle,
         Address,City,Region,PostalCode, Country,Phone,Fax FROM Customers"
    .dbTextHolder = "Title=Embedded Grid
    .ASPdbNET()
  End With
End Sub
</script>

See Also

z Class | Tornado Namespace

---