I need to Retrieve the values from a XML file i have seen many example but none of them is like the XML I have. My XML look like this <component> <section> <code code="31011" codeSystemName="Codifica Interna Laboratorio" displayName="Etanolo (urine)"> <!--TRASCODIFICA ANALISI NON DISPONIBILE--> </code> <text> <paragraph> </paragraph> <table> <thead> <tr> <th>Esame</th> <th>Esito</th> <th>Abnormal Flag</th> <th>Unita di misura</th> <th>Range di riferimento</th> <th>Metodo</th> </tr> </thead> <tbody> <tr> <td>Etanolo (urine)</td> <td>&lt; 0,01 g/l</td> <td></td> <td></td> <td>fino a 0,35</td> <td /> </tr> </tbody> </table> <footnote></footnote> <paragraph> </paragraph> <!--Inizio Microbiologia sezione humane readable--> <!--Fine Microbiologia sezione humane readable--> </text> <entry typeCode="DRIV"> <!-- INIZIO MONO RISULTATO …

Member Avatar
Member Avatar
+0 forum 1

i'm trying to make price lable printer and i was able to print a single page for a single id, but my problem is when i'm trying to print more that one id i was not able to make it work, i'm still learning but i was hoping that someone can give me idea how to make it work Imports MySql.Data.MySqlClient Public Module thisModule 'Info for the Price Lable Public NameV As String Public IdV As String Public DiscV As String Public ArDiscV As String Public PriceV As String Public SalesPriceV As String End Module Public Class Form1 Dim connection …

Member Avatar
Member Avatar
+1 forum 1

Im Stuck With Something, Iv Been Searching, And Searching And I Canot Find Any Information On How To Make SQL Database Show The Samething For Everyone, When Updated Of Coarse... I Can Make The DataTable And Put It On A Form But I Cannot Make It To Where I Add Something And It Update For People That Have Different computers... Please Help!!!!

Member Avatar
Member Avatar
+1 forum 3

I create a project encrypt and decrypt data in vb.net how to use this code as a function please help it is work only on a textbox i want to send a string value then return encrypt value and when i send encrypt value then send me decrypt value. [Click Here](https://www.daniweb.com/programming/software-development/threads/375789/encrypt-decrypt-vb-net) **What I have tried:** `Private arLetterChars() As Char = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz1234567890 "` `Private arEncryptedChars() As Char = "******************************************************"` **' encrypt.** Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click, Button4.Click With TextBox1 For Each myTextBoxChar As Char In .Text '// loop thru TextBox, one char. at a …

Member Avatar
Member Avatar
+0 forum 1

Hi! We are a 4 member group for our thesis and we already have submitted 5 topic proposals yet nothing was accepted...and here are the topics: enrollment system, gadgets on track, employment resource system, subdivision technical entry pass Now, I need a help for new ideas that can be developed through visual studio and it can be a web-based or window-based projects. Hope you can help me Thanks in advance!

Member Avatar
Member Avatar
+0 forum 36

Hi guys, i'm having a difficulty to set the path in vb.net.i put the code in the module and every time i run the code it throws error "Could not find file 'C:\Users\Abdueie\Desktop\BMS\Bridge Asset Management\Bridge Asset Management\bin\Debug\Adigrat.accdb'." here's the code Public conn As OleDbConnection = New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0; Data Source= .\\Adigrat.accdb;Persist Security Info=False")

Member Avatar
Member Avatar
+1 forum 8

Hi all I have a script to update the value from datagridview to database I do use a button insert ToolStripButton but not working hope people to help thank ! Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load conn = New SqlConnection("") conn.Open() Dim query As [String] = "SELECT * FROM dtaEmployees" da = New SqlDataAdapter(query, conn) Dim cb As New SqlCommandBuilder(da) dt = New DataTable() da.Fill(dt) C1FlexGrid1.DataSource = dt conn.Close() End Sub Private Sub ToolStrip1_ItemClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolStripItemClickedEventArgs) Handles ToolStrip1.ItemClicked Select Case e.ClickedItem.Name Case "ToolStripButton1" '---> button insert da.Update(dt) End Select …

Member Avatar
Member Avatar
+0 forum 7

showing Error "Failure sending mail." please help me i used port 587 because maximum example 587 used this port how i can know the my mail port or it is right error in this line SMTP.Send(Mail) massage is:- Just "Failure sending mail." ------------------ Imports System.Net.Mail Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim Mail As New MailMessage Mail.Subject = "test email" Mail.To.Add("abcd@gmail.com") Mail.From = New MailAddress("abcd@gmail.com") Mail.Body = "test mail test mail 123456789 hi" Dim SMTP As New SmtpClient("smtp.gmail.com") SMTP.EnableSsl = True SMTP.Credentials = New System.Net.NetworkCredential("abcd@gmail.com", "***********************") SMTP.Port = 587 SMTP.Send(Mail) End …

Member Avatar
Member Avatar
+0 forum 1

I have a Database named "Store" and tables are orders and firm. The firm table fields are firmname, firmcode. The fields orderno, orderdate orderqty, qtyrcvd and balqty are stroed in another table. When selecting three ComboBox values (fetched from another(invoice) table) ie firm name, orderno and orderdate respectively when clicking a button check that it matches with the current value (current row values) in the order table. If so fetch the result. 1.add the records in another table result will be present qtyrcvd is qtyrcvd balqty is orderqty-qtyrcvd Please help me writing the code. I am new in VB.NET. Imports …

Member Avatar
Member Avatar
+0 forum 1

Hello! Good Day to All, I am working on Visual Studio 2015. I have two workstation computer systems, in both same operating system and Visual Studio is installed. When i Build the main project it succeeded, and no any problem and my project runs normally on both systems. Then i made a Setup And Deployment project to the solution using the Category... Other Projects => Visual Studio Installer => Setup Project The Setup project made successfully and i am able to install my application from this setup project any other computer system. But problem is that when i needed to …

Member Avatar
Member Avatar
+0 forum 1

Hi, I Have below table I want all rows with all coloumn from below table where ActCode is 1162828 and sum of DocAmount for DocNo. i.e where the docNo is repeated i want only one row with sum of amount of all repeated rows. ** "Select *, Sum (DocAmount) from TblPurLedTranData whre TblPurLedtranData.ActCode='" & 1162828 & "' Groupby DocNo " ** PosDate DocDate DocNo DocAmount DueDate Status Period DocType FinYear Chan ActCode 10/10/2018 12/10/2018 369896     36980      11/11/2018 INV      5         PUST       2018       PUST       1243684    10/10/2018 12/12/2018 665        36000      11/01/2019 INV …

Member Avatar
Member Avatar
+0 forum 1

How to change the color of a cell(back or fore color) of listview item according to item value with if condition. I do it but it is not work and show no error Please help me...... For k = 0 To ListView1.Items.Count - 1 If ListView1.Items(k).SubItems(6).Text > 100 Then ListView1.Items(k).SubItems(6).ForeColor = System.Drawing.Color.Red MsgBox("hi test code yes") Else MsgBox("hi test code no") End If Next k

Member Avatar
Member Avatar
+0 forum 1

I was so amazed at how easy it was to embed google maps into a vb app I decided to post a quick example to help anyone get started. This is a simple example. Google's api has all kinds of things to help customize your map. You can find out anything you need to know from here: [url]http://code.google.com/apis/maps/documentation/javascript/reference.html[/url] You will need to: Create a new windows forms app. Add a class named GoogleControl and paste the GoogleControl code into it. Add a new html doc to the project and name it GoogleMap.htm and set its Build action to CopyIfNewer Copy …

Member Avatar
Member Avatar
+4 forum 46

Hello How do I rectify this error, please: 'Argument not specified...'? I have 4 columns in a MS Access database: username, strEmail, hashed, and salted. In my form field (on the Webpage), I have Name (username) and Email (strEmail) which are text fields and correspond to username.Text and strEmail.Text in the attached screenshot. But how would I correct the "@hashed" and "@salted" errors in the attached screenshot? ![ArgumentNotSpecified.jpg](/attachments/small/4/8105e72eed7c287d662033b63f228dca.jpg "align-left") Thanks!

Member Avatar
Member Avatar
+0 forum 4

I want to color cell of the listview, how to write code ? You see my image file. http://www.mediafire.com/view/uoq3qw4o9c90jwd/chamcong5.jpg/file

Member Avatar
Member Avatar
+0 forum 5

vb.net 2010 Windows Pro 7 ## Create a Video Library with an Embedded Windows Media Player ## I have close to 400 video clips in my home movie library. In order to quickly locate any given video I have added certain words into the file names. Even so, locating specific files is clumsy from the Explorer window and playing a clip requires starting an external application and flipping back and forth between Explorer and the media player. That's why I decided to embed the media player directly in the application. Given a choice, I would have preferred to embed [vlc …

Member Avatar
Member Avatar
+1 forum 8

Hi, For a school assenment I was tasked to make a small database solution for a medical clinic. I am wanting to select an access database table after gaining the ID for the table. I will be needing to read and write to this table as well if it makes a difference. I have been using this code to search for the patient. Any and all help would be fantasic! provider = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source =" 'Change the following to your access database location dataFile = "C:\Users\BAKER113\Documents\EHRDatabase.accdb" 'Set the file path for the connString = provider & dataFile myConnection.ConnectionString = connString …

Member Avatar
Member Avatar
+0 forum 1

Suppose there are two forms: frmMain and frmPopup, frmPopup is always on frmMain, when select frmMain inputting data then frmPopup always on frmMain, frmPopup is always on frmMain, how is it to write code ? you see attach file http://www.mediafire.com/view/bq32fcb3ept329r/PopUpInput.jpg/file

Member Avatar
Member Avatar
+0 forum 1

i need to format my textbox result into two decimal places after i divide two textbox here is my code. If String.IsNullOrEmpty(txtMonthly.Text) OrElse String.IsNullOrEmpty(txtdr.Text) Then Exit Sub If Not IsNumeric(txtMonthly.Text) OrElse Not IsNumeric(txtdr.Text) Then Exit Sub txtDaily.Text = CDbl(txtMonthly.Text) / CDbl(txtdr.Text) Thanks in Advance

Member Avatar
Member Avatar
+0 forum 2

dbconn.Open() s = "Select Max(cheque_no) + 1 As NewValue From tblEntry" Dim cmd As SqlCommand = New SqlCommand(s, dbconn) Dim dr As SqlDataReader = cmd.ExecuteReader() If dr.HasRows Then dr.Read() If IsDBNull(dr("NewValue")) Then empId = 1 Else empId = CInt(dr("NewValue")) + 1 End If Else empId = 1 End If dr.Close() Me.TextBox1.Text = empId

Member Avatar
Member Avatar
+0 forum 2

Below is my code for adding parameters in my vb .net code for prepared statements of npgsql. Dim xConn As NpgsqlConnection = ConnectDB() Dim xCmd As NpgsqlCommand = xConn.CreateCommand() xCmd.CommandText = "UPDATE " & xTable & " SET previous_tot_adj = @prev_adj ,tot_adj = @tot_adj WHERE version = " & _version & " AND monthly_mq_id = @Index" For Each Index In _Results.Keys If Not IsNothing(_Results.Item(Index)) Then xCmd.Parameters.AddWithValue("prev_adj", NpgsqlTypes.NpgsqlDbType.Double, _Results.Item(Index)) xCmd.Parameters.AddWithValue("tot_adj", NpgsqlTypes.NpgsqlDbType.Double, _Results.Item(Index)) xCmd.Parameters.AddWithValue("Index", NpgsqlTypes.NpgsqlDbType.Bigint, Index) End If Next xCmd.Prepare() xCmd.ExecuteNonQuery() After executing this code i get this kind of error . > A first chance exception of type 'Npgsql.NpgsqlException' occurred in …

Member Avatar
Member Avatar
+0 forum 2

Hello, I´m not a professional in vb.net, but i try to make a tool for my colleague and me. I got a XMLTreeView on my form and i load a XML-File in it. Now, I want to set each node in the XMLTreeView another icon, but it must set by the XML-File. This is my XML-File : <?xml version="1.0" encoding="utf-8" ?> <Nodes> <Node Text="Programme" Icon="BlaBlub.ico"> <Node Text="Test" Icon="C:\MyProgramm\Icons\icon2.ico"> <Programm Path="C:\Program Files (x86)\Microsoft Visual" & _ "Studio\2017\Enterprise\Common7\IDE\devenv.exe">Visual Studio</Programm> <Programm Path="C:\Program Files (x86)\Microsoft" & _ "Office\root\Office16\EXCEL.EXE">Excel</Programm> </Node> <Node Text="andere" Icon="C:\MyProgramm\Icons\23.ico"> <Programm Path="C:\Program Files (x86)\Microsoft Visual" & _ "Studio\VB98\VB6.EXE">VB.NET</Programm> </Node> <Node Text="Test1" Icon="Huhu.ico"> …

Member Avatar
Member Avatar
+0 forum 55

hey guys, I already have a database that can add a person with the RFID card number, I just want a little help of you guys if how can I code the rfid and when I tap the card, the RFID# of that person will be there together with the name, time and department of that person.? Example if tag name is 00123456 (Thats my rfid card# saved to my database) if I tap the card to the RFID reader, the FORM should show that this TAG belongs to me showing my details) Please help me, I'm doing this for …

Member Avatar
Member Avatar
+0 forum 1

I am becoming confused with visual studio v. Vb.net. I am findings hundreds of pieces of code tells me how to connect. Snippets elsewhere that tell me how to access data in the database I connected to. I am not finding snippets/examples that walk one thru connecting, adding, deleting etc. for that style of database access. I am running into this everywhere. When I try to patch a sample connection with another sample that works with the data, I get trouble really quick. Like I’m trying to put a Ford tire on a Schwin bicycle and I can’t find the …

Member Avatar
Member Avatar
+0 forum 2

we r trying to insert date from datetime picker into mssqlserver 2005 but it also enter defult time(00:00) with it in database. using we want only date... [CODE]& xyzdtp.value.date &[/CODE]

Member Avatar
Member Avatar
+0 forum 12

how can i limit a user to enter 10 digit no like telephone no in textbox without using regular expressions?????

Member Avatar
Member Avatar
+0 forum 16

Hi, I would like to know how to get IP Address of the devices connected to the hotspot of my PC using a VB program that will run on the same PC where the hotspot is running. I have no idea how to get it strated. I searched internet but I what I am seeing is that there is an external router. Thank you very much.

Member Avatar
Member Avatar
+0 forum 2

Sir. I create a project in vb.net 2010 sql server 2008r2 and crystal report 13. i use this code for showing the report. Public Sub PrintSaleRInvoice() Dim PrintSale As New DataSet objsale.saleinvid = txtSaleInvid.Text PrintSale = objsale.PrintSaleInvoice() ' Procedure name PrintSale.Tables(0).TableName = "DataTable1" Dim rpt As New SaleInv rpt.PrintOptions.PaperOrientation = CrystalDecisions.Shared.PaperOrientation.Portrait rpt.PrintOptions.PaperSource = CrystalDecisions.Shared.PaperSource.Middle rpt.SetDataSource(PrintSale) SaleRInvPrint.CrystalReportViewer1.ReportSource = rpt SaleRInvPrint.ShowDialog() End Sub and it is work fine now i want to pass some value(company name, address, contact, Licence No etc.) cr er004 from global variable which is decalerd on a "global declaration" in a module. i used for CReport dataset cr …

Member Avatar
Member Avatar
+0 forum 1

what is causing this error here "Operator '&' is not defined for string "select * from Miscellaneouse whe" and type 'DataRowView'." provider = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source =" dataFile = "C:\Users\PrintServer\Documents\Visual Studio 2010\Projects\Hr and Payroll1\HR and Payroll.accdb" ' Change it to your Access Database location connString = provider & dataFile myConnection.ConnectionString = connString myConnection.Open() Dim str As String str = "select * from Miscellaneouse where Position = '" & SlcComboBox1.SelectedValue & "' " Dim cmd As OleDbCommand = New OleDbCommand(str, myConnection) dr = cmd.ExecuteReader While dr.Read() SlcTextBox9.Text = dr("Salary").ToString End While myConnection.Close()

Member Avatar
Member Avatar
+0 forum 3

Try Dim Adapter As New OleDbDataAdapter Dim Command As New OleDbCommand Dim xFrom As String = dtpFrom.Value.ToString.Substring(0, dtpFrom.Value.ToString.IndexOf(" ")) Dim xTo As String = dtpTo.Value.ToString.Substring(0, dtpTo.Value.ToString.IndexOf(" ")) sqlQuery = MainQuery & " Select TOP 100 LOANS.LoanID," sqlQuery = sqlQuery & " Borrowers.NAME," sqlQuery = sqlQuery & " Barangay.BRGYNAME," sqlQuery = sqlQuery & " LOANS.RELEASED," sqlQuery = sqlQuery & " LOANS.DUE," sqlQuery = sqlQuery & " LOANS.AMOUNT," sqlQuery = sqlQuery & " LOANS.TERMS," sqlQuery = sqlQuery & " [AMOUNT]*[INTEREST]*[TERMS] AS TotalInterest," sqlQuery = sqlQuery & " [AMOUNT]+[TotalInterest] AS TotalCollections," sqlQuery = sqlQuery & " PAYMENTS.AMOUNTPAID, " sqlQuery = sqlQuery & " …

Member Avatar
Member Avatar
+0 forum 5

The End.