dcsimg

Search:

Type: Posts; User: ssabc

Page 1 of 7 1 2 3 4

Search: Search took 0.16 seconds.

  1. Replies
    5
    Views
    230

    VS 2017 Re: Select Case Syntax

    Thank you! Case sensitivity, did not think of that...
  2. Replies
    5
    Views
    230

    VS 2017 Select Case Syntax

    Hello:

    Isn't this supposed to work, so that if one of three users are logged in, it will enable a control? Because it's only working for the last one.


    Dim user As String =...
  3. Replies
    13
    Views
    410

    Re: Insert text into cell as a hyperlink

    Shortening up the filename did the trick, Thanks!
  4. Replies
    9
    Views
    271

    Re: String.Replace not working

    Brilliant as usual, thank you!
  5. Replies
    9
    Views
    271

    Re: String.Replace not working

    What we have here are two files. A model file, AF(c), which is either a part file or an assembly file. There is also a corresponding Drawing file with the same name, which I am defining as...
  6. Replies
    9
    Views
    271

    Re: String.Replace not working

    Okay. here's the full code. No difference if I remove the try/catch.


    Try
    MatchDrawingFile = (AF(c).ToLower).Replace(".sldprt", ".slddrw")

    ...
  7. Replies
    13
    Views
    410

    Re: Insert text into cell as a hyperlink

    Hello:

    No difference with this. I think it may have more to do with the length of the hyperlink or something. When I load it manually, I get the same result. Other links work fine with spaces....
  8. Replies
    9
    Views
    271

    Re: String.Replace not working

    Ignore this post. Is there a delete function?
  9. Replies
    9
    Views
    271

    String.Replace not working

    AF(c) = "C:\Sackett-Waconia\Testing-Steve\sE7082699.SLDASM"


    MatchDrawingFile = (AF(c).ToLower).Replace(".sldasm", ".slddrw")

    MatchDrawingFile should equal...
  10. Replies
    13
    Views
    410

    Re: Insert text into cell as a hyperlink

    Yes it does
  11. Replies
    13
    Views
    410

    Re: Insert text into cell as a hyperlink

    I believe the syntax is correct. If I do this manually, it also does not work.

    But thanks for your help, because according to my calculations it should be working!
  12. Replies
    13
    Views
    410

    Re: Insert text into cell as a hyperlink

    Sorry for the incomplete response.

    Cannot open the specified file.

    This is a windows forms app, all files on the server, no web.

    Display is O:\...
    Hyperlink is its url equivalent:...
  13. Replies
    13
    Views
    410

    Re: Insert text into cell as a hyperlink

    This is great, thanks!

    Just curious though, and at this point this is not really a programming question.

    Is there a character here preventing this from opening?

    169153
  14. Replies
    13
    Views
    410

    Insert text into cell as a hyperlink

    Hello:

    How can I get this to insert to excel as a hyperlink?


    .Cells(row + 1, 10) = txtSearchFolder.Text

    My dilemma is that using Hyperlinks.Add requires an absolute position to...
  15. Replies
    2
    Views
    186

    Insert Object into a Cell

    Hello:

    I have a blurb of code here I am hoping will insert an object of any file type into a cell, along the lines of Insert / Object / Create from file in Excel.

    The example below produces:...
  16. Replies
    9
    Views
    382

    Re: Cannot delete record

    Ok, I can do it manually, but I still cannot save the document??


    Private Sub DelExcelDirect(ByVal _dbf As String, ByVal _sJob As String, ByVal _sDt As String)
    Dim xlApp As New...
  17. Replies
    9
    Views
    382

    Re: Cannot delete record

    This certainly doesn't work!

    cn = "Provider = Microsoft.ACE.OLEDB.12.0; Data Source = " & _dbf & "; Extended Properties = ""Excel 12.0 Macro;HDR=Yes;ReadOnly=False;IMEX=1""; "
  18. Replies
    9
    Views
    382

    Re: Cannot delete record

    It does not seem to matter which option I use. Read Only....

    rs.Open(_sql, cn, CursorTypeEnum.adOpenKeyset, LockTypeEnum.adLockOptimistic)

    The other option above also does not work...
  19. Replies
    9
    Views
    382

    Cannot delete record

    Hello:

    I have an Excel spreadsheet that I am treating as ADODB

    I simply want to delete a record.

    SELECT Query with RS.Delete
    or DELETE Query with RS.Update

    Either way, I get a...
  20. Replies
    9
    Views
    311

    VS 2017 Re: Write DataGridView Headers to excel

    Thanks for the reply. I got it working. I'm just deleting and rewriting the whole thing, its not that big. The initial issue, for whatever reason had to do with the write removing the column...
  21. Replies
    9
    Views
    311

    VS 2017 Re: Write DataGridView Headers to excel

    The problem is in the writing of data back to excel, not reading it in.

    If it is not read a certain way, the write excludes the headers.

    Code to ReadXL:


    Private Sub ReadDB3(UserDB As...
  22. Replies
    9
    Views
    311

    VS 2017 Re: Write DataGridView Headers to excel

    Thanks, Reading it that way doesn't lock down the file when trying to wrote back!

    The difficulty is it binds the data... I want to keep things unbound because I am adding rows to the datagrids...
  23. Replies
    9
    Views
    311

    VS 2017 Re: Write DataGridView Headers to excel

    Hello:

    I am converting this to ADODB as suggested.

    It is frustrating because I date a datagridview that I wish to update to an Excel spreadsheet. Whenever I change the size of the dgv, the...
  24. Replies
    9
    Views
    311

    VS 2017 Write DataGridView Headers to excel

    Hello:

    My code is below. I have no trouble reading in the first row as a header for a datagridview, but when I write it out it keeps truncating them.

    Why can't I just somehow say the first row...
  25. Thread: Remove "'"

    by ssabc
    Replies
    7
    Views
    260

    VS 2017 Re: Remove "'"

    The value is simply text. If the variable contains a "'", I want to get rid of it. It resides in a data grid view, manually created, no data binding...
  26. Thread: Remove "'"

    by ssabc
    Replies
    7
    Views
    260

    VS 2017 Remove "'"

    I have tried the following:

    Initial value = 5'


    If strValue.Contains(Chr(39)) Then
    strValue = strValue.Replace(Asc(39),...
  27. Replies
    3
    Views
    247

    Re: Save an open word document to an xml file

    Something like this (though not this) in Word?


    ' Open Document
    Dim oWord As Microsoft.Office.Interop.Word.Application
    Dim oDoc As Microsoft.Office.Interop.Word.Document...
  28. Replies
    0
    Views
    182

    MsOf365 Get line # from xml file

    Hello:

    I have no idea if I'm on the right track here (probably not).

    I want to get the last line number containing a value of "_Toc" from an xml file, and then use this as my starting point to...
  29. Replies
    3
    Views
    247

    Save an open word document to an xml file

    This to me seems simple, but I cannot find it anywhere.

    I want to save an open docx file to an xml file. Is this possible?

    Thanks!
  30. VS 2017 Re: Predefined type 'ValueTuple(Of ,,,,)' is not defined or imported Error

    Wow. I did not do that in another application that worked, but thanks.
  31. VS 2017 Predefined type 'ValueTuple(Of ,,,,)' is not defined or imported Error

    Hello:

    I have an error creating a string array to import into a datagridview. I've done this before without issue.

    1>C:\Users\stephena\Desktop\ReadXML\ReadXML\Form1.vb(186,41): error BC37267:...
  32. Re: Convert string to decimal producing weird results

    Bingo. Thank you.
  33. Re: Convert string to decimal producing weird results

    This math produces 5.5, where xSize2 = "1 1/2"
    xSize = FractionToDecimal(xSize2)

    Yet FractionToDecimal("1 1/2") produces 1.5
  34. Convert string to decimal producing weird results

    I have two lines of code:

    xSize2 has a string value of "1 1/2"



    MessageBox.Show(FractionToDecimal("1 1/2")) produces a value of 1.5

    xSize = FractionToDecimal(xSize2)...
  35. Replies
    3
    Views
    252

    VS 2017 Re: Entity Framework Question

    Thanks for the clarification! Here's what I ended up with:


    If Not IsNothing(cboJob.Text) Or cboJob.Text.Length > 0 Then
    Dim Qry = (From row In DT.AsEnumerable()
    ...
  36. Replies
    3
    Views
    252

    VS 2017 Entity Framework Question

    Hello:

    I am trying to query a data table. It says the column JOB does not exist.


    Private Sub cboJob_SelectedIndexChanged(sender As Object, e As EventArgs) Handles...
  37. Replies
    2
    Views
    245

    MsOf365 Re: Populating a data table from Excel

    Ok, I wrote this code to do that, and it did resolve the problem. The thought of having to do this everytime this gets randomly updated really bothers me! There's got to be a better way. The data...
  38. Replies
    2
    Views
    245

    MsOf365 Populating a data table from Excel

    Hello:

    This is my insanity of the day!

    I have two functions that I am using to populate a datatable using VS2017.

    I am using ADO.NET, or OLEDB.

    I have formatted column1 of my table to be...
  39. Replies
    15
    Views
    644

    Re: Querying a DataTable

    Hello again:

    To revisit this code (below), some of the data in excel column 1 is apparently an integer and some is a string. I have treated everything as an integer, but now need to get some of...
  40. Replies
    15
    Views
    644

    Re: Querying a DataTable

    kpmc:

    I could not agree more, that the zeros should not be trimming.

    I modified my code to treat this information as integers, and convert my lookup on the other end, and it all works well. ...
Results 1 to 40 of 278
Page 1 of 7 1 2 3 4



Featured


Click Here to Expand Forum to Full Width