I have many G-Code files and I want to create a gallery like c# application that shows the previews/thumbnails of the G Code files.
In short: I want a G-Code to Image converter.

Can someone give me some direction?
Or can someone give me a source code from where can I start?

Thanks advanced

I have written a vb.net service.  I would like to silently install a program using the service.

The program is silently installable... I can do it via the command prompt.

The service, however, doesn't install and I think the issue maybe the space in which the service runs.

Thoughts?

My question is in regards to editing an xml document in vb.net and then saving the changed document. So I am looking for help from an expert who has worked with xml documents using vb.net or C#. My particular example is in VB.net

Example :
For my XML document below I have an xml document with different soccer teams, along with information related to the team.
I just want to be able to read through the document and change values in the file an re-save it.

My approach below is that I read the document into an XMLNodeList. In my example I am changing the city name using .innerText assignment. So once my XMLNodeList object has been edited, how do I save it back to an XML document format with the same structure as the original XMLDocument?


Dim cfg As New XmlDocument()
Dim myNode As XmlNode
Dim myList As XmlNodeList

cf.Load("Teams.xml")
Dim myList As XmlNodeList
myList = cfg.SelectNodes("descendant::Category/Item")

for Each nd As Xml.XmlNode in myList

If nd.InnerText = "City" Then
nd.InnerText = "AllTheSame"

End If
 
Next



<?xml version ="1.0" standalone ="yes"?>
<Settings xmlns:xsi="http://www.w3.or/2001/XMLSchema-instance">
<Category name="Soccer">
<Item name = "TeamName">ThunderBolts</Item>
<Item name = "City">Toronto</Item>
<Item name = "Captain">Farver</Item>
</Category>
<Category name="Baseball">
<Item name = "TeamName">Mavericks</Item>
<Item name = "City">Los Angeles</Item>
<Item name = "Captain">Buckley</Item>
</Category>

Conversion from string " " to type 'Integer' is not valid.'

Dim lines() As String
        Dim file As String
        file = "C:\Files\file.txt" 
        Dim sr As New StreamReader(file) 

        lines = sr.ReadLine().Split(vbTab) 

        For Each line In lines

            staffName(line) = lines(0)
            StaffNo(line) = lines(1)

        Next

Select all Open in new window

Using Constructs with arrays

Dim myFile As New System.IO.StreamReader("H:\Files\myfile.txt")
        Dim i As Integer
        While myFile.Peek() <> -1
            Dim myString As String = myFile.ReadLine()
            Dim obj As String() = myString.Split(","c)
            staffName(i) = obj(0)
            StaffNo(i) = obj(1)
            i = i + 1
        End While

' gives out of bound error, why?

Hi

I am using the following code in ASP.net (VB.net) to read the contents of a spreadsheet
into a dataset. Instead of specifically reading "Sheet1" how would I adjust the following
line to just read the first sheet?
sql = "SELECT * FROM [Sheet1$]"

    Public Function Read_Excel_Into_DataSet() As DataSet

            Dim sMinAndSecond As String = Me.Second_Minute_of_Upload.Text 'workaround to 

            Dim connetionString As String
            Dim connection As OleDbConnection
            Dim oledbAdapter As OleDbDataAdapter
            Dim ds As New DataSet
            Dim sql As String
            Dim i As Integer

            connetionString = "Provider=Microsoft.Jet.OLEDB.4.0;" &
             "Data Source=" & Server.MapPath("~/Temp/Excel_Import" & sMinAndSecond & ".xls") & ";" &
             "Extended Properties=""Excel 8.0;HDR=YES;IMEX=1"""

            sql = "SELECT * FROM [Sheet1$]"

            connection = New OleDbConnection(connetionString)
            Try
                connection.Open()
                oledbAdapter = New OleDbDataAdapter(sql, connection)
                oledbAdapter.Fill(ds)
                oledbAdapter.Dispose()
                connection.Close()


                Return ds
            Catch ex As Exception
                MsgBox("Can not open connection ! ")
            End Try



    End Function

Select all Open in new window

In vb.net, how can I create recordset from multiple datatables?  For example, if I want to use a left join between two datatables to see all records in one datatable that don't have a matching record in another datatable, how would I do that?  I know that if I create a connection object to a SQL Server or Access database then I can then use a command object based on that connection object to specify a SQL statement that includes a left join between two tables in that remote database.  Can I create a connection object to connect to a local dataset resident in the memory of the .net application?  If so, can I base a command object on that connection object and specify the names of datatables in that dataset in a SQL statement of that command object?

Hi all.

I have a VB.net chart that displays sales stages and the count for each sales stage. I want to be able to allow the end user to double click the X-axis label, which is the sales stage, and save that value in a variable. Unfortunately, I haven't been able to do so. Below is some of the code, I'm trying to show it in a messagebox for now, I've been playing with but unable to get it to work. I basically want to get the axislabel when it's double clicked.

Private Sub Chart1_MouseUp(sender As Object, e As MouseEventArgs) Handles Chart1.MouseUp
 Dim HTR As HitTestResult
       HTR = Chart1.HitTest(e.X, e.Y)
Dim h As HitTestResult = Chart1.HitTest(e.X, e.Y)
If h.ChartElementType = ChartElementType.AxisLabels Then
Dim dp As DataPoint = Chart1.Series("Stages").Points(h.PointIndex)
MsgBox(dp.AxisLabel)
End If
 End Sub

Select all Open in new window

I was able to get this to work by clicking the datapointlabel instead of the axislabel, but ultimately I would like it to work for the axislabel. See code below:

Private Sub Chart1_MouseUp(sender As Object, e As MouseEventArgs) Handles Chart1.MouseUp
Dim SelectDataPoint As DataPoint
Dim h As HitTestResult = Chart1.HitTest(e.X, e.Y)
If h.ChartElementType = ChartElementType.DataPointLabel Then
SelectDataPoint = CType(h.Object, DataPoint)
            MsgBox(SelectDataPoint.AxisLabel.ToString)
End If
 End Sub

Select all Open in new window

I migrated vb6 to vb.net using the vs2008 wizard and it works fine But some controls are not visible on form.
 I can see them on control list in properties window but can not get them to be seen on the form in design time.
what am I missing?...

What is the best option to interface SQL with Visual Studio's  .NET. I have a project that require connection to a SQL data.

If I wanted a free SQL download. where could I find it?

Hi,
What is the meaning of Annotate (Blame) in GitHub
I am using visual studio 2017.

Thanks in advance.

lowercase letter = "mon" to "npo"  ASCII

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
     Dim shift As Integer = 1
     Dim asciiValue As Integer = 0
     Dim wordConverted As String = ""
     Dim word As String

     word = "mon"  ' InputBox("Please enter word to convert")

     For Each c In word
         asciiValue = Asc(lcase(c))

         '#check it's not 'Z'!
         If asciiValue <= 121 Then
             asciiValue = asciiValue + shift
         Else
             asciiValue = 97
         End If

         wordConverted = wordConverted + Chr(asciiValue)
     Next
     MsgBox(wordConverted)
 End Sub

Hello,
How to find the index of the item in the listbox.

Dim items = From i In lstbox.Items Where i.ToString().StartsWith("Al")

        If items.Count > 0 Then

        Else

        End If

Select all Open in new window