notifications.designer.vb

来自「wrox出版社的另一套经典的VB2005数据库编程学习书籍,收集了书中源码,郑重」· VB 代码 · 共 384 行 · 第 1/2 页

        'chkEnableNotifications
        '
        Me.chkEnableNotifications.AutoSize = True
        Me.chkEnableNotifications.Location = New System.Drawing.Point(133, 180)
        Me.chkEnableNotifications.Name = "chkEnableNotifications"
        Me.chkEnableNotifications.Size = New System.Drawing.Size(232, 17)
        Me.chkEnableNotifications.TabIndex = 8
        Me.chkEnableNotifications.Text = "&Enable Query Notifications (SqlDependency)"
        Me.ttNotifications.SetToolTip(Me.chkEnableNotifications, "Mark to enable SqlDependency notifications and create default subscription")
        '
        'gbQuery
        '
        Me.gbQuery.Controls.Add(Me.txtHelp)
        Me.gbQuery.Controls.Add(Me.optInvalid)
        Me.gbQuery.Controls.Add(Me.optReorder)
        Me.gbQuery.Controls.Add(Me.optAllProds)
        Me.gbQuery.Enabled = False
        Me.gbQuery.Location = New System.Drawing.Point(133, 204)
        Me.gbQuery.Name = "gbQuery"
        Me.gbQuery.Size = New System.Drawing.Size(391, 95)
        Me.gbQuery.TabIndex = 12
        Me.gbQuery.TabStop = False
        Me.gbQuery.Text = "Select Notification Query"
        '
        'txtHelp
        '
        Me.txtHelp.AutoSize = False
        Me.txtHelp.Location = New System.Drawing.Point(141, 11)
        Me.txtHelp.Multiline = True
        Me.txtHelp.Name = "txtHelp"
        Me.txtHelp.ReadOnly = True
        Me.txtHelp.Size = New System.Drawing.Size(244, 79)
        Me.txtHelp.TabIndex = 3
        '
        'optInvalid
        '
        Me.optInvalid.AutoSize = True
        Me.optInvalid.Location = New System.Drawing.Point(7, 68)
        Me.optInvalid.Name = "optInvalid"
        Me.optInvalid.Size = New System.Drawing.Size(107, 17)
        Me.optInvalid.TabIndex = 2
        Me.optInvalid.Text = "&Invalid Query Test"
        '
        'optReorder
        '
        Me.optReorder.AutoSize = True
        Me.optReorder.Location = New System.Drawing.Point(7, 44)
        Me.optReorder.Name = "optReorder"
        Me.optReorder.Size = New System.Drawing.Size(105, 17)
        Me.optReorder.TabIndex = 1
        Me.optReorder.Text = "&Reorder Required"
        '
        'optAllProds
        '
        Me.optAllProds.AutoSize = True
        Me.optAllProds.Checked = True
        Me.optAllProds.Location = New System.Drawing.Point(7, 20)
        Me.optAllProds.Name = "optAllProds"
        Me.optAllProds.Size = New System.Drawing.Size(120, 17)
        Me.optAllProds.TabIndex = 0
        Me.optAllProds.Text = "&All Products Updates"
        '
        'btnRefresh
        '
        Me.btnRefresh.Location = New System.Drawing.Point(13, 207)
        Me.btnRefresh.Name = "btnRefresh"
        Me.btnRefresh.Size = New System.Drawing.Size(99, 23)
        Me.btnRefresh.TabIndex = 16
        Me.btnRefresh.Text = "Refresh &Data"
        Me.ttNotifications.SetToolTip(Me.btnRefresh, "Refresh the data, detect low inventory, and optionally send Database Mail message" & _
                " to suppliers")
        '
        'btnSubscriptions
        '
        Me.btnSubscriptions.Location = New System.Drawing.Point(13, 237)
        Me.btnSubscriptions.Name = "btnSubscriptions"
        Me.btnSubscriptions.Size = New System.Drawing.Size(99, 23)
        Me.btnSubscriptions.TabIndex = 20
        Me.btnSubscriptions.Text = "&QN Subscriptions"
        Me.ttNotifications.SetToolTip(Me.btnSubscriptions, "Open a message box with a list of current query notification subscriptions (enabl" & _
                "es deletion)")
        '
        'btnCreateQueues
        '
        Me.btnCreateQueues.Location = New System.Drawing.Point(372, 177)
        Me.btnCreateQueues.Name = "btnCreateQueues"
        Me.btnCreateQueues.Size = New System.Drawing.Size(152, 23)
        Me.btnCreateQueues.TabIndex = 21
        Me.btnCreateQueues.Text = "&Add SqlNotification Objects"
        Me.ttNotifications.SetToolTip(Me.btnCreateQueues, "Add or drop SqlNotificationRequest objects (SERVICE, QUEUE, and ROUTE)")
        '
        'btnPollNotifications
        '
        Me.btnPollNotifications.Location = New System.Drawing.Point(13, 267)
        Me.btnPollNotifications.Name = "btnPollNotifications"
        Me.btnPollNotifications.Size = New System.Drawing.Size(99, 23)
        Me.btnPollNotifications.TabIndex = 25
        Me.btnPollNotifications.Text = "&Poll Notifications"
        Me.ttNotifications.SetToolTip(Me.btnPollNotifications, "Poll the SqlNotificationRequest queue and display message body")
        '
        'ProductsTableAdapter
        '
        Me.ProductsTableAdapter.ClearBeforeFill = True
        '
        'SuppliersTableAdapter
        '
        Me.SuppliersTableAdapter.ClearBeforeFill = True
        '
        'chkSendMessages
        '
        Me.chkSendMessages.AutoSize = True
        Me.chkSendMessages.Location = New System.Drawing.Point(133, 306)
        Me.chkSendMessages.Name = "chkSendMessages"
        Me.chkSendMessages.Size = New System.Drawing.Size(139, 17)
        Me.chkSendMessages.TabIndex = 29
        Me.chkSendMessages.Text = "Send Reorder Messages"
        Me.ttNotifications.SetToolTip(Me.chkSendMessages, "Mark to send automated reorder messages by e-mail")
        '
        'chkSendDbMail
        '
        Me.chkSendDbMail.AutoSize = True
        Me.chkSendDbMail.Enabled = False
        Me.chkSendDbMail.Location = New System.Drawing.Point(274, 306)
        Me.chkSendDbMail.Name = "chkSendDbMail"
        Me.chkSendDbMail.Size = New System.Drawing.Size(233, 17)
        Me.chkSendDbMail.TabIndex = 30
        Me.chkSendDbMail.Text = "Send by Database Mail (Clear for SmtpClient)"
        Me.ttNotifications.SetToolTip(Me.chkSendDbMail, "Mark to use DbMail; clear to send messages with SmtpClient (requires configuratio" & _
                "n)")
        '
        'frmNotifications
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.ClientSize = New System.Drawing.Size(538, 329)
        Me.Controls.Add(Me.chkSendDbMail)
        Me.Controls.Add(Me.chkSendMessages)
        Me.Controls.Add(Me.btnPollNotifications)
        Me.Controls.Add(Me.btnCreateQueues)
        Me.Controls.Add(Me.btnSubscriptions)
        Me.Controls.Add(Me.btnRefresh)
        Me.Controls.Add(Me.gbQuery)
        Me.Controls.Add(Me.chkEnableNotifications)
        Me.Controls.Add(Me.btnSaveChanges)
        Me.Controls.Add(Me.ProductsDataGridView)
        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
        Me.MaximizeBox = False
        Me.MinimizeBox = False
        Me.Name = "frmNotifications"
        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
        Me.Text = "Query Notifications - Northwind Products Lookup Table"
        CType(Me.ProductsBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.NorthwindDataSet, System.ComponentModel.ISupportInitialize).EndInit()
        CType(Me.ProductsDataGridView, System.ComponentModel.ISupportInitialize).EndInit()
        Me.gbQuery.ResumeLayout(False)
        Me.gbQuery.PerformLayout()
        Me.ResumeLayout(False)
        Me.PerformLayout()

    End Sub
    Friend WithEvents ProductsBindingSource As System.Windows.Forms.BindingSource
	Friend WithEvents ProductsDataGridView As System.Windows.Forms.DataGridView
	Friend WithEvents NorthwindDataSet As QueryNotifications.NorthwindDataSet
	Friend WithEvents ProductsTableAdapter As QueryNotifications.ProductsTableAdapter
	Friend WithEvents btnSaveChanges As System.Windows.Forms.Button
	Friend WithEvents chkEnableNotifications As System.Windows.Forms.CheckBox
	Friend WithEvents gbQuery As System.Windows.Forms.GroupBox
	Friend WithEvents optReorder As System.Windows.Forms.RadioButton
	Friend WithEvents optAllProds As System.Windows.Forms.RadioButton
	Friend WithEvents optInvalid As System.Windows.Forms.RadioButton
	Friend WithEvents txtHelp As System.Windows.Forms.TextBox
	Friend WithEvents btnRefresh As System.Windows.Forms.Button
	Friend WithEvents DataGridViewTextBoxColumn1 As System.Windows.Forms.DataGridViewTextBoxColumn
	Friend WithEvents DataGridViewTextBoxColumn2 As System.Windows.Forms.DataGridViewTextBoxColumn
	Friend WithEvents DataGridViewTextBoxColumn3 As System.Windows.Forms.DataGridViewTextBoxColumn
	Friend WithEvents DataGridViewTextBoxColumn4 As System.Windows.Forms.DataGridViewTextBoxColumn
	Friend WithEvents DataGridViewTextBoxColumn5 As System.Windows.Forms.DataGridViewTextBoxColumn
	Friend WithEvents DataGridViewTextBoxColumn6 As System.Windows.Forms.DataGridViewTextBoxColumn
	Friend WithEvents DataGridViewTextBoxColumn7 As System.Windows.Forms.DataGridViewTextBoxColumn
	Friend WithEvents DataGridViewTextBoxColumn8 As System.Windows.Forms.DataGridViewTextBoxColumn
	Friend WithEvents DataGridViewTextBoxColumn9 As System.Windows.Forms.DataGridViewTextBoxColumn
	Friend WithEvents DataGridViewCheckBoxColumn1 As System.Windows.Forms.DataGridViewCheckBoxColumn
	Friend WithEvents btnSubscriptions As System.Windows.Forms.Button
	Friend WithEvents btnCreateQueues As System.Windows.Forms.Button
	Friend WithEvents btnPollNotifications As System.Windows.Forms.Button
	Friend WithEvents SuppliersTableAdapter As QueryNotifications.SuppliersTableAdapter
	Friend WithEvents ttNotifications As System.Windows.Forms.ToolTip
	Friend WithEvents chkSendMessages As System.Windows.Forms.CheckBox
    Friend WithEvents chkSendDbMail As System.Windows.Forms.CheckBox

End Class