Posts by lolafuertes

If you see the epson printer in the Control Panel -> Printers then you can open it an see the queue of pending (is any) document to be printed, and those being printed (if any).

If all this happens then the printer is configured as an standard printer using spooler.

Once opened, On the Printer menu, select the properties.
usually on the first (general) tab, there is a button to print a test page. Give it a try and a test page should be printed.

If not, Goto the Ports tab an verify to which port is connected; should be one of the ports COM1: to COM4:.

If this is true, go to the Control Panel - Devica Manager and verify that the Ports COM are there, and that the printer is there, both witout a warning nor a stop.

I don't think you'll need the POS.NET to solve this issue.

Hope this helps

Is your printer configured as an standard printer using the spooler to be managed?
If yes, is it the default printer?
If not, you must select it as default printer before calling the Print().

Please see here how to define the printer to be used.

Hope this helps

I will suggest to insert

sqlStatement = New SqlCommand()

before

sqlStatement.CommandType = CommandType.StoredProcedure

This will empty the previous contents if any.

Hope this helps

In this howto from Microsoft there is a way to insert an OLE object into a rich text using VB.

Maybe this helps

Just guessing if the richtextbox is empty the very first time.

If is empty, just add an space and select it before enabling the equation editor.

Hope this helps

I woud suggest to try a structure like

Public Struct Card
    Public [Image] as Image
    Public Value as Integer
End Struct

Then You define an array of Card

Dim Cards(51) as Card

After that, to initialize you can

Cards(0).Image = My.Resources.twoc
Cards(0).Value = 1
.
.
.
Cards(51).Image = My.Resources.aced
Cards(51).Value = 13

To switch the cards you need a

Dim tempCard as Card

And

tempCard = Card(i)
Card(i) = Card(switch)
Card(switch) = tempCard

Hope this helps

Not for VB but for C# you can find here some ideas. Or there.

Hope this helps

This depends on the networking rules applied. If VPN server( or router) only admits forwarding the RDP protocol to your machine, then you only can connect to your machine.

You must ask to your network admin. (Obviously you can try the restricted services once the VPN is active. ;) but this can be registered in the log of the server or router)

Hope this helps

The easiest is to ask to your RFID provider for a SDK and some examples. Usually are not free.

In resumee, you can do some thing like this untested code:

Imports System.IO
Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If RadioButton2.Checked = True Then
Dim name As String = My.Computer.Name
Dim path As String = My.Computer.FileSystem.CurrentDirectory & "\MACLIST.txt"
My.Computer.FileSystem.WriteAllText(path, "______________________________________" & vbNewLine & vbNewLine, True)
My.Computer.FileSystem.WriteAllText(path, "USER: " & TextBox2.Text.Trim & vbNewLine & vbNewLine, True)

My.Computer.FileSystem.WriteAllText(path, "______________________________________" & vbNewLine & vbNewLine, True)
My.Computer.FileSystem.WriteAllText(path, "COMPUTER: " & name & vbNewLine, True)
' 
' Here put the wireless if any
'
Dim wirelessStrings() as String = GetWireless()
If Not wirelessStrings Is Nothing then
   ForEach s as String in wirelessStrings
      My.Computer.FileSystem.WriteAllText(path1,s & vbNewLine, True)
   Next 
End If 
My.Computer.FileSystem.WriteAllText(path, "______________________________________" & vbNewLine & vbNewLine, True)


ElseIf RadioButton1.Checked = True Then
TextBox1.Enabled = True
If String.IsNullOrEmpty(TextBox1.Text.Trim()) Or TextBox1.Text.Contains(".") Then
MsgBox("Please enter a valid output file name")
Else
Dim name1 As String = My.Computer.Name
Dim path1 As String = My.Computer.FileSystem.CurrentDirectory & "\" & TextBox1.Text.Trim & ".txt"
My.Computer.FileSystem.WriteAllText(path1, "______________________________________" & vbNewLine & vbNewLine, True)
My.Computer.FileSystem.WriteAllText(path1, "USER: " & TextBox2.Text.Trim & vbNewLine & vbNewLine, True)

My.Computer.FileSystem.WriteAllText(path1, "______________________________________" & vbNewLine & vbNewLine, True)
My.Computer.FileSystem.WriteAllText(path1, "COMPUTER: " & name1 & vbNewLine, True)
' 
' Here put the wireless if any
'
Dim wirelessStrings() as String = GetWireless()
If Not wirelessStrings Is Nothing then
   ForEach s as String in wirelessStrings
      My.Computer.FileSystem.WriteAllText(path1,s & vbNewLine, True)
   Next 
End If 

My.Computer.FileSystem.WriteAllText(path1, "______________________________________" & vbNewLine & vbNewLine, True)


End If
End If

TextBox1.Enabled = True

Button2.Select()


End Sub

Private Function GetWireless() as string()

Dim ReturnInfo() …

I would sugest:
First, install an antivirus, antispam, antiads and verify if you have any in your system.
Second, when you are sure your system is clear, change the password to a strong one (ie. 16 digits containing uppr and lower case letters, some digits and a couple of special signs)
Third, you can try (as in some TV series) to searach the source of the logins into your gmail account. And act according.

Hope this helps

The IndexOf function from the string class will do the trick.

Please read here on how to use it.

Example:

If TheCurrenLineread.ToLower.IndexOf("wireless") <> -1 then
   ' found
Else
   ' Not found
End If

Hope this helps

You can find a howto and example here. Another there.

Hope this helps

Not from my knowledge. The proces start determines if the target is an executable. If not tryes to search for the default program associated with the extension and launches it like if you double click on the file.

If you want to interact with Excel, you'll need to use the Excel interop object model.

You can read http://msdn.microsoft.com/en-us/library/microsoft.office.interop.excel(v=office.11).aspx for more info. And here for howtos.

Hope this helps

I can't tell you wy, but is very simple the how.

For example, you send some one a mail from your account. This people forwards your email address to the spammer without cleanig it, so your email account appears in the body.

The spammer uses your account in the FROM clause of a SMTP message.

No matter if you have Linux or Firefox or both. Anyway, there are antivirus programs for Linux, and I suggest to use them.

I suggest to read about SMPT here.

Hope this helps

Just a few questions:
1) Did you defined the insert update and delete commands of your data adapter?
2) Wich is the currentrow value?

Hope this helps

Just the 192,168.x.x are class C free net addresses to be used in the intranet. No ISP can sell them.
Usually, the ISP sells you an IP address range, with a certain number of valid addresses in it, by means of a mask.

Any way, the IP you bough will mean the full range of addresses, according to the mask your ISP assigned to you.

The main IP, itself, will be the gateway for the first subnet.

Hope this helps

Maybe you can use a tricky solution.

Convert the values to be operated to the largest one, then operate and convert back to the original type.

IE:

return Ctype(Ctype(_rollingTotal,Long)/Ctype(_Values.Count,Long),T)

Be aware that when adding values, the result can be greater than the maximum allowed on the type being used. Also in substract you can get a value lower than the minimum.

Hope this helps

Did you already tryed

sqlcon = New SqlCeConnection("Data Source=stuDB.sdf")

By default, to open the data base will use the standard search path, wich in the first place, is the path where the executable is placed.

Hope this helps

I would suggest to create a new, temporary imagelist.
Then, use the add function to insert the images from your image list until the point you want to insert/replace the old one.
Add the new one from your pinture box to the new imagelist, skip one from the old if replacing, and continue to add from the old to the new one.
Finally, set the old image list to be the new one

Hope this helps

Because teh getmac command it self has no way to filter the contents, I will suggest not to set the output to the same output file you are writing.

Instead, you can send the output, in overryde mode (only one > sign), to another file name like 'tempmac.txt'.

Then, using the ReadAll function, you can read all the contents ina a variable in your program.

Using the string split function, will separate the variable into lines using the Control Char crlf as separator.

Then you can cicle over the returned lines and consider only those starting with wireless.

Hope this helps

Maybe this article can help you to understant the data table object in Visual Studio.

Hope this helps

Ok. According to the code shown on this thread, you instantiate a new form Options, but is not shown yet.

In this code, the Options.ShowDialog does not appear, so we can infere that the CheckedListBox, even in the case that you fill it in the New sub of the form Options, has no checked item yet, unless you set some of them explicitely.

Then you try to find the CheckedListBox.CheckedItems. Obviously there are none.

Maybe I am wrong, but try to show the form (dialog mode) first.

Hope this helps.

Sorry if I do not understand what is doing the line of code

Options opt = new Options();

Can you be so kind to put the full code for class Options here?
Specially I Am interested on the void New().

Thanks in advance.

What is doing

Options opt = new Options();

If this does not fills the opt.checkedListBox1 with some checked items, then the for-each will do nothing.

Can you be so kind to post your full code here?

Can you be so kind to show your current code?

Use the label1.Top property to set the new vertical position of the label according to the scroll bar value.

Hope this helps

Not from my knowledge.

Do you issue an insert command for each record in the datagrid, using a transaction to isolate it inb case of duplicates?

I would suggest to create a long multi-insert SQL command, ie each 100 inserts to improve it.

Hope this helps

In the stored procedure source, you can remove the line that drops the temp table. This is done automatically by SQL.

When you say 'I try to import this sttored procedure' into VS2010 I do not understand what do you try.

The stored procedures can't be imported into a DS. They must be used as a stand alone SQLCommand.

The sintax for the SQL Command can be:

Dim sqlCmd as SQLCommand = new SQLCommand("EXECUTE MyStoredProcedure")

Then it can be used in a select for a data adapter to fill a table, or for a data reader.

In order to try to help you, please post the piece of code where you try to use the stored procedure.

Hope this helps

The best way is to reset the LiveBox to the default values. Then you can see the default values in this french page.

Hope this helps

Some times the thigs are easier, or not.

In SQL you can use an external rowset using OpenDataSource to obtain the data to be inserted into an existing table.

Your SQL Sentence can be replaced by some thing like:

sql = "INSERT INTO DestinationSQLTable SELECT * FROM OpenDataSource('Microsoft.Jet.OLEDB.4.0', 'Data Source=""" & database & """;Jet OLEDB:Database Password=bekdemir;')"

Hope this helps

The foreach structure will analyze the checked items that will return objects, not char. I will recommend to use var to let the C# define the type of.

foreach (var itemObj in opt.checkedListBox1.CheckedItems

Then when accessing to the object, mostly you'll need to cast it instead of using the ToString() that, in this case, will return the class name of the object.

My be you can try some thing like

newItem.InnerText = (string) itemObj;

Hope this helps

Did you tryed to join all the values in a string, then use it to fill the list view subitem?

IE:

string thetextToShowInTheCell="";
foeach(string valueToshow in ListOfStringValuesToShowInTheCell){
    if (thetextToShowInTheCell.Length>0) thetextToShowInTheCell+=", ";
    thetextToShowInTheCell += valueToshow; }

Hope this helps

Well, If you did'nt that, who did?

Some one wrotes this function, expecting to be implemented in the future, and, in the meanwhile, and to remember that some process is to be done here, the author wrote the sentence to throw a not implemented exception.

If you do'nt need this function, just comment it, else, remove the sentence and fill in.

Hope this helps

Lets imagine that a user control has a property called connectors

This property can be a list of conector.

A conector is an object that has an ID, a property Connected with a value of true or false and, if true has a ConnectedTo object of type conector.

Once graphically via drag/drop you 'connect' from connector A of element1 to connector B of element2 you only need to add new conector object in the list of element1 with the id of the source conector, the connected value to true an the destination conector of the element2 selected by the drag/drop.

Once that, if a signal is to be output from the element1, you only will need to search in the list of connectors the connected ones, and send the 'signal' to the referenced element.

A good way to do that is suscribing the element2 input signal yo the output signal of the element1 via events and delegates.

Just a hint.

Well done so far. But... There is always ...

Obviously, you still need to create the temporary table before, but it will need to have all the destination fileds like:

CREATE TABLE #Total(
    InID nvarchar(10)
    ,  InDate datetime
    ,  OrderId nvarchar(15)
    ,  Shipper nvarchar(20)
    ,  Carrier nvarchar(20)
    ,  Qty int
    ,  User nvarchar(20)
    )

I suggested to create a cursor to cicle over every record in the tblIn, but you did'nt.

To create a cursor please read here

I would suggest the following cursor:

DECLARE tblIn_Cursor CURSOR FORWARD_ONLY FOR 
SELECT tblIn.InId as InId, tblIn.InDate as InDate, tblIn.OrderID as OrderId, C1.Companyame as Shipper, C2.ComapnyName as carrier, tblUser.Fname + ' ' + tblUser.Lname As User
FROM tblIn
INNER JOIN tblCompany C1 on C1.CompanyID = tblIn.ShipperID
INNER JOIN tblCompany C2 on C2.ComapnyID = tblIn.CarrierID
INNER JOIN tblUser on tblUser.EmpId = tblIn.EmpId;

Also you will need to declare a few variables and adjust the types according (here only a suggestion):

DECLARE @InId nvarchar(10);
DECLARE @InDate datetime;
DECLARE @OrderId nvarchar(15);
DECLARE @Shipper nvarchar(20);
DECLARE @Carrier nvarchar(20);
DECLARE @User nvarchar(20);

Also you will need:

DECALRE @CountOfTblInventoryDetail int;
DECLARE @CountOfTblWrongRa int;
DECLARE @SumOfTblinBulk int;

Then you can open the cursor and fetch the next record

OPEN tblIn_Cursor;
FETCH NEXT FROM tblInCursor INTO @InId, @InDate, @OrderId, @shipper, @Carrier, @User

Then you will need a WHILE loop like:

WHILE @@FETCH_STATUS = 0 BEGIN
.
.
.
END

Then, to close the cursor and free the resources you will …

Talking about SQL Tunning or SQL Optimization, your query is almost inadecuate because the comparasion values in the select subqueries are calculated once (with the first record) then used for the other records, resulting in null values.

Your calculation involves counting or summing data from tables depending on the current value of the tblIn record.

To do so, I will recommend to create an stored procedure that will create a temp table, then fill it in with the necessary records and return the content from this table.

In order to fill the temp table, you can use a cursor to navigate the tblIn inner joined to tblCompany twice with alias C1 and C2 to obtain the shipper and the carier, and to tblUser to obtain the user full name, and, for each recor retrieved,
* Create/clear the temp variables CountOfInventoryDetail, CountOfWrongRa and SumOfInBulk
* do the select from the tblInventory detail and store the count in a variable CountOfInventoryDetail,
* do the select from the tblWrongRA and store the result in a variable CountOfWrongRa
* do the select from the tblInBulk and store the result in a variable SumOfInBulk

Then insert into the temp table the required values, including the sum of the 3 temp variables. Be aware that some of them can result in null, so try to use of the ISNULL function to return a 0 in case of null.

Once retrieved all records, close the cursor and do …

To create a custom control you need to add a new user control into your project.
This user control can have a GUI that defines how is show in your form. You must add there textboxes, buttons, graphics, tabs or whatever you want in.

Then you will need to define interfaces, events, methods, functions and/or properties that will define how this control will interact with the rest of the world, or change his presentation or behaviour.

Once this is defined, you can use it in any form as any other predefined control.

Read here and here to know a little bit more over this.

Hope this helps

Maybe you can try some thing like this untested code:

Private Sub btnUpdate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnUpdate.Click
    '
    '  Here declare a string to receive all the Ids returned
    '
    Dim txtMessage as String = ""
    For i = 1 To DataGridViewIU68E.SelectedRows.Count
        '
        '  If there is almost an id in the message, separate it from the next
        '
        If txtMessage.Length > 0 Then txtMessage &= ", "
        '
        '  Add the Id to the existing txtMessage
        '
        txtMessage &= DirectCast(DataGridViewIU68E.SelectedRows(0).Cells("EvaluationIDDataGridViewTextBoxColumn").Value, Integer).ToString()
    Next
    '
    '  And show the result
    '
    MsgBox(txtMessage)
End Sub

Hope this helps

Private Function QuarantineeFileName() As String Throw New NotImplementedException End Function

You are just throwing an unhandled exception.

What is expected to do the QuarantineeFileName function?

Which unhandled exception?
Did you verifyed that have write permissions to the quarantine folder?

My experience on Dell installation disks is that came with a hardware detection that does ot permits to install in a non Dell targeted computer.

More over, normally only one version is in the recovery disk, according to the OS version brougth.

Hope this helps

On your connection string, there is no info about the machine name supporting the SQLEXPRESS service.

Also atrusted connection is not allowed unless your server (W7) and your client(XP or Vista) are in the same active directory.
Integrated Security and Trusted_connection are mutually equivalent and only one is needed

In order to know the parameters you can use in your connection string visit this page.

My fault when writing the User Id as a unique word. Should be two.

When in the connection string I say ServerName, this will represent the actual name of your W7 machine. Please replace according.

Then the connection string should look like

ServerName\SQLEXPRESS;Database=GGDBase;User Id=sa;Password=;Persist Security Info=False

Hope this helps

This error happens when the index parameter is less than 0 or greater than the value of the Count property of the ListView.ListViewItemCollection.

To avoid this problem, use the Add method to insert the item in the last position or use the index 0 to inset always int he first one.

If you want to insert at an specific position, then be sure that there are enough items in the ListViewItemCollection and that the position index is less than the Count property.

Hope this helps

When you use a trusted connection, this will mean that the computer and the user running the application should be trusted by the SQL server.

Usually this can be accomplished putting the server, and the client computers in an Active Directory Domain, then loggin in the domain with a domain user.

Once you have all this, you must go to the SQl Server management console and in the Security/Logins folder add the users authorized to access the server. Each user must be Mapped to the databases he/sue must access and select the appropiate access level like datareader or datawriter or owner or ...

If you have the SQL server in mixed mode, then you should have a user called sa. Usually this user has no pasword, but to be a little more secure you must set a password. Also, to use this users on your connection string, the user must have a password. Lets assume that you put the passwrod H2+o

Then you can change the connection string to some thing like:

ServerName\SQLEXPRESS;Database=GGDBase;UserId=sa;Password=H2+o;Persist Security Info=False

Do not forget the servername if the server machine is other than the client machine.

Hope this helps

As far as I know, not all the infections can be cleaned.
The mechanism other AV use to reecognize a file as being infected, and to be able to remove the infection is out of my knowledge.

How to obtain a Guid?
Using the System.Guid.NewGuid().ToString() you can ogtain a value (like 9245fe4a-d402-451c-b9ed-9c1a04247482) that can be used as the file name.

Example:

Dim QurantineeFileName as String = System.Guid.NewGuid().ToString()
Dim QuarantineeInfoFileName = QuarantineeFileName & ".log"
Dim QuarantineFilder as System.IO.DirectoryInfo = New System.IO.DirectoryInfo ("C:\Quarantine")
If QuarantineFolder.Exists = false Then
   Try
      QuarantineFolder.Create
   Catch ex as Exception
      msgBox("Error creating the quarantine directory: " & ex.Message)
      '
      '   Maybe you want to wait for a Cancel or Retry
      '
   End try
End If
Dim OriginalFile as System.IO.FileInfo = New System.IO.Fileinfo(TextBox1.Text)
Dim DestinationFile as System.IO.FileInfo = New System.IO.Fileinfo(QurantineeFileName)
Dim DestinationInfoFile as System.IO.FileInfo = New System.IO.Fileinfo(QuarantineeInfoFileName)
'
'
'
Do While DestinationFile.Exists or DestinationInfoFile.Exists
   QurantineeFileName = System.Guid.NewGuid().ToString()
   QuarantineeInfoFileName = QuarantineeFileName & ".log"
   DestinationFile = New System.IO.Fileinfo(QurantineeFileName)
   DestinationInfoFile = New System.IO.Fileinfo(QuarantineeInfoFileName)
Loop

With this action, hopefully you reset the router to the default configuration.
Usually, this configuration uses a DHCP server in the router to supply the internal LAN addresses.
Try to connect the router to your lan card using a cable.

In your computer configuration, is there a dinamic address configured (using DHCP) or just a fixed one?

If is fixed, then note the current configuration (to restore it if the next step fails) and try to use the DHCP option for IP Address and DNS.

Disable the lan card and enable it again.

If this option allows you to connect to the router, then using the command IPCONFIG /ALL from a CMD window, will show the current configuration, and hopefully the default gateway is the address of the router.

Most of the routers have a web server that allows you to connect to them using the http://routerAdress from a browser, and there asks for a user id and a pasword.

Here you must have the router documentation in order to know the default pasword, or call the support services of the manufacturer.

Hope this helps

Did you checked your disk for integrity? (CHKDSK /R) Probably youll need to run it whith Admin privileges.

Then if the disk appears OK, try to repair the system from the original DVD.

Hope this helps

I would suggest to define a Splash screen.
See here as an example.

Hope this helps

I am curious on how did you tryed to secure the unsecured wireless.