I am having Scanned PDF File /having headers like Date,PO. No, Item Description, etc I want to read the Values written In front of/below these Titles.I used the below code but it isnt working and giving me the desired result Please assist Imports Emgu.CV Imports Emgu.Util Imports Emgu.CV.OCR Imports Emgu.CV.Structure Dim OCRz As Tesseract = New Tesseract("tessdata", "eng", Tesseract.OcrEngineMode.OEM_DEFAULT) Dim pic As Bitmap = New Bitmap(270, 100) Dim gfx As Graphics = Graphics.FromImage(pic) gfx.CopyFromScreen(New Point(Me.Location.X + PictureBox1.Location.X ..read more

A happy 2024 to all of those who still visit VBCity. It is so sad to see that the site has all but been abandoned.  I learned an enormous amount by asking questions and having them answered in a civil way.  Why did it fade away so quickly a few years ago?  I hope it does not get shut down as there is still a wealth of information in the various forums. I am looking for help with an ADO.Net problem and have not managed to get any help by using Google. How to we get this site working again in way that it did about 10 years ago ..read more

Hi, The code below is used to save a list thats in a textbox to an Access database table. The code sort of works, it saves the data but after its saved about 80 ish lines, it then muddles up the order of the list. So once saved, all the items in the list are saved to the database but it is not in the correct order. 'Open connection to database tbl_PartsList Dim cnnSave As ADODB.Connection Set cnnSave = New ADODB.Connection cnnSave.ConnectionString = "Provider = Microsoft.Jet.OLEDB.4.0;" & "Data Source =" & frmReportPg1!lblDbasePath.Caption cnnSave.Open 'Delete all rec ..read more

I don't know what I am missing but I am getting the " Failed to convert parameter value from a string to a decimal" when I am trying to INSERT data. I have a access database with a table that has decimal fields. I am using decimal field because I need to store a number like xx.xx. The field is set as: Field size as Decimal Precision as 4 Decimal places as 2 This is the parameter I am using. I have tried many ways I have found on internet search but none work. .Parameters.Add(New System.Data.OleDb.OleDbParameter("@RateUnitRate1", System.Data.OleDb.OleDbType.Decimal, 4, CType(tbRateUnitRate1.Te ..read more

I have a CUDA form that I use to add meter readings from customers. It contains a EXIT button, multiple text boxes. One of the text boxes is the variable that I use to find the meter information. When I when I want to exit the form and the textbox is blank and has focus then the Leave event is fired. I have been trying to add code to stop the rest of the event from executing but I have been unsuccessful. Please give me some advise to what I am missing. Below is one of my attempts that doesn't work. It catches the blank text but doesn't execute the "Disposal". Private Sub tbReadMeterNo_Leave(s ..read more

Hi, Haven't been here for years Been trying everything to open a binary file into a listbox and basically just getting a 0 in the box or with the code below at the line = listBox1.Items.Add(br.ReadBytes(((int)br.BaseStream.Length))); I will get Byte[]Array in the box, with the streamreader code below that I get some binary code in the box, really stuck and need help. Thanks Steve if (openFileDialog1.ShowDialog() == DialogResult.OK) { string filename = openFileDialog1.FileName; FileStream fs = new FileStream(filename, FileMode.Open, FileAccess.Read); BinaryReader br = new BinaryReader(fs); br ..read more

based the link: http://anagrafe.cng.it/anagrafe/geometri.aspx how to insert value from MyVar="LIVORNO" in combobox (collegio), and click on button "cerca geometri" tks. Sorry but really urgent ..read more

I am attempting to update my applications connectionString and runtime, and it is giving me problems. Any assistance is greatly appreciated. Public Sub SaveConnectionString(ByVal conString As String) Dim name As String = "MyDatabaseConnectionString" Dim config = ConfigurationManager.OpenExeConfiguration(ConfigurationUserLevel.None) Dim section = CType(config.GetSection("connectionStrings"), ConnectionStringsSection) section.ConnectionStrings(name).ConnectionString = conString config.Save(ConfigurationSaveMode.Modified) ConfigurationManager.Refre ..read more

How do! I thought I'd be the first to say, Happy 20th birthday VBCity. I am the vMan I am today because of you, and Serge obviously. Happy Christmas to you all - and a very happy New Year ..read more

Hi, I wish to delete my account but when I search through forum, each account is permanent. It is possible to delete this accoount from the administration? Thanks. Regards, roonmar ..read more