I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click ' Dim myView As New Data.DataView(IP_ADR_OVERSIGTDataSet.Tables("0")) IP_ADR_OVERSIGTDataSet.Tables("udstyr").DefaultView.RowFilter = "IP = '10.65.47.170'"
ved ikke om det hjælper hvis jeg lige sender lidt af koden med
Imports System.Data.DataView Imports System.Data.DataViewRowState Imports System.Data Public Class Printer
Private Sub Printer_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load, MyBase.Load, MyBase.Load 'TODO: This line of code loads data into the 'IP_ADR_OVERSIGTDataSet.udstyr' table. You can move, or remove it, as needed. Me.UdstyrTableAdapter.Fill(Me.IP_ADR_OVERSIGTDataSet.udstyr) Try Me.UdstyrTableAdapter.Printer(Me.IP_ADR_OVERSIGTDataSet.udstyr) Catch ex As System.Exception System.Windows.Forms.MessageBox.Show(ex.Message) End Try Me.ReportViewer1.RefreshReport() End Sub
Private Sub DataGridView1_CellContentClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellContentClick Me.UdstyrTableAdapter.Update(Me.IP_ADR_OVERSIGTDataSet.udstyr) End Sub
Private Sub SøgToolStripButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Try Me.UdstyrTableAdapter.Søg(Me.IP_ADR_OVERSIGTDataSet.udstyr) Catch ex As System.Exception System.Windows.Forms.MessageBox.Show(ex.Message) End Try
End Sub
Protected Overrides Sub Finalize() MyBase.Finalize() End Sub
Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.