Hi

I am working on an application to access data via API using VB.NET.

I have so far managed to request for and retrieve a security token in the format as shown below:

{"success":true,"token":"eyJhbGciOiJIUzI1NiIsImNhbGciOiJERUYifQ.eNqqVkpOyc9NzMxTslLKTcxJrCzOTDRU0lFKrShQsjI0tTACYjNT01oAAAAA__8.ElaYAGRsAV43lh2OyQ4eR1wF4UIKl7tpHS7YFamVGD8"}

I need to retrieve the "token" value and use that to access the server and request specific information.

I have created a class


And in my code, I successfully get to this point where I get the result as shown above


I am stuck at this point in trying to split the result and retrieve just the token to use in further processing.

Any help would be appreciate.

Thank you.

On a Datagridview when I select NEW field I want it to populate the name in the grid from a text box above on the same page.

Hello, all.

I have these two commands

Example insert

{Something here} {{Something else here}}

Select all Open in new window

Dim Regex2 As Regex = New Regex("\{.*?\}")
Dim Regex4 As Regex = New Regex("\{{.*?\}}")

Select all Open in new window

They do not produce any errors, however.
The single { }
Will insert into the database for the {{ }}
In the database, you will see

{Something here}

Select all Open in new window

With the curly brackets around it.

How can I distinguish between the two commands, so that only the double curly's will insert into its column, and the single curly will only insert into its column?

Thanks
Wayne

I have an application in VB.Net using a connection via ADODB.connection.  We are in the process of moving our "stuff to the cloud".  The new server is Server 2016 and the database is SQL Server 2008 Express.  I have enabled the protocols in SQL Server for Named Pipes, TCPIP.  It appears that I have the Server/Database/User/Pwd info correct, but the connection object is not supported?

The connection string is similar to this:
"Driver={SQL Server};Server=SQL1\SQLEXPRESS;Database=Orders;UID=sa;pwd=Adg991!; providerName=System.Data.SqlClient"

Thanks for you help!

C# code converted to VB. The problem is List.SelectedItems or, rather, my lack of understanding. The exception is:

Object reference not set to an instance of an object.

Public Function CommaDelimitedString _
    (
        ByRef List As ListBox
    ) As String

         Dim returnString as string

            For Each ListBoxItem In List.SelectedItems
                Dim DataRowView As Object = Nothing
                Dim drwItem As Object = Nothing

                If drwItem Is DataRowView Then 'Check Then If the Then item can be cast To your Class
                       ' build string
                End If
            Next
  return returnString

I'm drawing a blanks on this. What am I missing? Thanks for any help.

Hi Experts,

I'm trying to build in some error handling to tie the script below together and am stuck, any help with this is appreciated.

Issue:  for any computers that are offline, I'm getting RPC unabilable errors and these continue to process through the loop

Here is what I'm trying to accomplish:

1.  For error handling, is there a way to have a function determine whether the computer is up or not >  then return $true or $false and put into a condition for if.  If it's not up, is there a way to pause until it responds or break out of the loop for just that computer?  If it's up, then do patching/install functions in the workflow.

2.  In the process-monitor function (6) - I wanted to log into the .csv if this was online or offline.

3. I wanted to incorporate a function that checks for any missing or pending updates to determine if the workflow needs to be processed. (I left (2) empty for this), not sure how to accomplish this and then condition.  Here are the queries:

get-wmiobject -query "SELECT * FROM CCM_SoftwareUpdate WHERE ComplianceState = 0" -namespace "ROOT\ccm\ClientSDK"  #which updates are missing:

Select all Open in new window

(get-wmiobject -query "SELECT * FROM CCM_SoftwareUpdate" -namespace "ROOT\ccm\ClientSDK").name  #show needed updates

Select all Open in new window

-Then if the above are true, trigger all, which I have in (5):

([wmiclass]'ROOT\ccm\ClientSDK:CCM_SoftwareUpdatesManager').InstallUpdates([System.Management.ManagementObject[]] (get-wmiobject -query 'SELECT * FROM CCM_SoftwareUpdate' -namespace 'ROOT\ccm\ClientSDK'))

Select all Open in new window

Here is what the script does, I've numbered all functions in order:
1 - Test-Connection
2 - detect missing/pending
3 - detect pending reboot
4 - run advert
5 - invoke all updates
6 - process monitor
6a - call from within process monitor function to send email

Thanks!

Select all Open in new window

…

WRiting code in visual studio vb to declare a variable that will store the cost of bananas per pound

I have a vb.net windows form that uses filters on the on [bindingsource]
I am trying to get a search criteria that is found anywhere in a string to return in the filter results.
[exisiting code] Master_ContactsBindingSource.Filter = "c_company = '" & InStr(CompanySearch.Text, 1) & "'"

The problem is that I receive no results (and does not error either) for terms that I know are in the table such as "son".

The desired result is to return all records that contain the search term "son" but clearly I have this wrong.

c_company = [table field]
[CompanySearch.text] is the textbox with the search term

Thoughts?

Hello All;

I have been using the ID3v2 component, ID3TagLibrary, to read the metadata of MP3 files uploaded to my server for a few years now.
And I just found out it will not keep the text format. Example.
It will take this
Dvořák
And change it to
DvoYk

I need a component that will NOT mess up the formatting of the text.
Any and all ideas will be greatly welcomed.

Thank you.
Wayne

Hello All;

As the title suggests, I have just installed SQL Server 2019 on my test system, in hopes that I can get it to accept the Case-insensitive and accent-sensitive characters like the example below.

Dvořák Hall

So far, when I insert these characters, I get a BIG Y from the >> řá <<

Table column information

The column is set to ( CHAR )
Collation = Latin1_General_100_BIN2_UTF8

In my web.config file, I have the following.

<?xml version="1.0" encoding="UTF-8"?>
<configuration>
    <system.web>
	<globalization requestEncoding="utf-8" responseEncoding="utf-8" />

Select all Open in new window

Any additional information would be wonderful.

I have the following loop that I want to continue until every line in SR (StreamReader) has been read and outputted. What condition should I add to the Do While Loop to have it read all the lines?

        Do While (strLine ???)            
            strLine = SR.ReadLine                               '// Read in line
            If strLine Is Nothing Then
                MessageBox.Show("Unable to extra data, please try again. If it continues to fail, please contact Brian L.")
                Exit Sub
            End If
            '// Output line when it contains useful info
            If strLine.Contains("Gi") Then
                OutputTextBox.AppendText(strLine)
                OutputTextBox.AppendText(vbCrLf)
            End If
        Loop

Select all Open in new window