Posts by jagpreet

Re: extract columns from a text file in vb

jagpreet 0 Newbie Poster

17 Years Ago

thanks hoppy for ur advice..

i m trying to use the following code..........but it is giving some errors and moreover i just want to extract column no 4 and 6........how can i do this with this code?

lPublic Function SortCSVFileA(ByVal sSourceFile As String, ByVal sTargetFile As String, ByVal sOrderBy As String, Optional ByVal sDelimiter As String = ",", Optional ByVal bHasHeaders As Boolean = True, Optional ByVal iColumns As Long = 0) As Long
On Error GoTo Hell

Dim aFieldNames() As String
Dim Trash As String
Dim x As Long
Dim iFields As Long
Dim iFileNum As Long

' Open the original CSV file
Dim reader As StreamReader = _
New StreamReader("C:\DATA\d2.txt")

If bHasHeaders Then
' Get the field names
Line Input #iFileNum, Trash
Else
For x = 1 To iColumns
Trash = Trash & String$(5, Chr$(64 + x)) & sDelimiter
Next
Trash = Left$(Trash, Len(Trash) - Len(sDelimiter))
End If
aFieldNames = Split(Trash, sDelimiter)
iFields = UBound(aFieldNames) ' Counter

' Add field names to Recordset.
For x = 0 To iFields
oRS.Fields.Append(aFieldNames(x), adVarChar, 100) ' 100 characters length. add more if neccessary.
Next

' Open Recordset (must do after adding columns)
oRS.Open()

' Get the field values for the record
x = 0
Do While Not EOF(iFileNum)
Line Input #iFileNum, Trash ' Grab whole …

Re: extract columns from a text file in vb

jagpreet 0 Newbie Poster

17 Years Ago

yeh its a csv file.
i heve attached it with this thread

d.txt (8.82 KB)

"Universal      ","General                        ","System Wide                    ","NumCompatibilityFields         ","Integer        ",NULL,"Number of version fields to compare for release compatibility  ","2                              ","2                              ","0                              ","4                              ",0,NULL
"Universal      ","General                        ","System Wide                    ","LoadWeightFactorCPCI           ","Integer        ",NULL,"Load weight factor for CPCI CCMs                               ","1                              ","1                              ","1                              ","1                              ",0,NULL
"Universal      ","General                        ","System Wide                    ","LoadWeightFactorAXMP           ","Integer        ",NULL,"Load weight factor for AXMP CCMs                               ","1                              ","1                              ","1                              ","1                              ",0,NULL
"Universal      ","General                        ","System Wide                    ","LoadWeightFactorNETRA          ","Integer        ",NULL,"Load weight factor for NETRA CCMs                              ","6                              ","6                              ","1                              ","8                              ",0,NULL
"Universal      ","General                        ","System Wide                    ","UseNetCCNPowerUp               ","Char           ",32,"Indicates where NetCCN will be used to power up cards          ","0                              ","0                              ",NULL,NULL,0,NULL
"Universal      ","General                        ","System Wide                    ","WEMDocVersion                  ","Char           ",NULL,"WEM User Guide Version                                         ","4.0.0.1                        ",NULL,NULL,NULL,0,NULL
"Universal      ","General                        ","System Wide                    ","MonitoringTicket               ","Char           ",55,"Ticket Used for Monitoring                                     ","1X9z%$7jlk=pa43wYp85643f       ","1X9z%$7jlk=pa43wYp85643f       ",NULL,NULL,0,NULL
"Universal      ","General                        ","System Wide                    ","ServiceProviderId              ","Integer        ",NULL,"1-TMobile, 2-AWS, 3-Cingular, 4-NextTel, 7-CMCC, 18-UNICOM     ","0                              ","1                              ",NULL,NULL,0,NULL
"Universal      ","General                        ","System Wide                    ","MaxNumOfEmsUsers               ","Integer        ",NULL,"Max Number of provisioned EMS users in the system              ","40                             ","40                             ","1                              ","200                            ",1,NULL
"Universal      ","General                        ","System Wide                    ","MaxSimultEmsUsers              ","Integer        ",NULL,"Max Number of simultanous EMS login users                      ","40                             ","40                             ","1                              ","50                             ",0,NULL
"Universal      ","General                        ","System Wide                    ","TerminalServerIpAddr           ","Char           ",NULL,"Ip Address of Terminal Server                                  ","0.0.0.0                        ",NULL,NULL,NULL,0,NULL
"Universal      ","General                        ","System Wide                    ","TrafficControlFlag             ","Integer        ",NULL,"Flag to Enable/Disable Traffic Control Mechanism               ","0                              ","0                              ","0                              ","1                              ",1,"SGW_ISUP_ID WS_MNP_ID CS_SP_ID SGW_TCAP_ID INAP_SVR_ID LCS_ID CISS_ID SMS_ID MM_MM_ID                                           "
"Universal      ","General                        ","System Wide                    ","TraceEnabledFlag               ","Integer        ",NULL,"Flag to Enable/Disable Traces in the system                    ","0                              ","0                              ","0                              ","1                              ",1,"SGW_ISUP_ID CS_SP_ID CS_FM_ID OAM_MT_ID CP_CALLM_ID MM_MM_ID SGW_BICC_ID                                                        "
"Universal      ","General                        ","System Wide                    ","ResourceUsageHigh              ","Integer        ",NULL,"Resource Usage High Threshold                                  ","85                             ","85                             ","0                              ","100                            ",0,NULL
"Universal      ","General                        ","System Wide                    ","ResourceUsageNormal            ","Integer        ",NULL,"Resource Usage Normal Threshold                                ","70                             ","70                             ","0                              ","100                            ",0,NULL
"Universal      ","General                        ","System Wide                    ","SS7_Network_Id                 ","Integer        ",4,"Default SS7 Network Id; 0 is not allowed                       ","6                              ","1                              ","1                              ","255                            ",1,"MM_MM_ID CP_CALLM_ID SMS_ID CISS_ID LCS_ID INAP_SVR_ID CS_SP_ID MM_IS41_ID SMS_IS41_ID SPM_IS41_ID                              "
"Universal      ","General                        ","System Wide                    ","LIServerType                   ","Integer        ",4,"LI Type(CALEA=1-USA,A1357_SORM=2-Europe/Russia,A1357=3-China)  ","1                              ","1                              ","1                              ","255                            ",0,NULL
"Universal      ","General                        ","System Wide                    ","VirtualMscVlrFlag              ","Integer        ",4,"Virtual MSC VLR flag                                           ","0                              ","0                              ","0                              ","1                              ",0,NULL
"Universal      ","General                        ","System Wide                    ","egcp_dscp                      ","Integer        ",NULL,"DS codepoint for control plane EGCP traffic                    ","0                              ","0                              ","0                              ","63                             ",1,"BS_DM_ID                                                                                                                        "
"Universal      ","General                        ","System Wide                    ","mp_dscp                        ","Integer        ",NULL,"DS codepoint for management plane traffic except SNMP interface","0                              ","0                              ","0                              ","63                             ",1,"OAM_CFG_ID OAM_AMA_ID OAM_PFM_ID CS_TFTPD_ID                                                                                    "
"Universal      ","General                        ","System Wide                    ","sshpath                        ","Char           ",32,"ssh Path in Solaris 10                                         ","/usr/bin/ssh                   ","/usr/bin/ssh                   ",NULL,NULL,0,NULL
"Universal      ","General                        ","System Wide                    ","CMNIndicator                   ","Integer        ",NULL,"Call Mediate Net Indicator                                     ","0                              ","0                              ","0                              ","255                            ",0,NULL
"Universal      ","General                        ","System Wide                    ","Mtp3M3UASamePC                 ","Integer        ",NULL,"Indicator of MTP3 M3UA with same point code (0: off 1:on)      ","0                              ","0                              ","0                              ","255                            ",0,NULL
"CPSNodes       ","Base Platform                  ","Program Manager                ","Olcl1ThrtlUpThrshld            ","Integer        ",NULL,"OLCL 1 Throttle Up Threshold                                   ","40                             ","40                             ","0                              ","100                            ",1,NULL
"CPSNodes       ","Base Platform                  ","Program Manager                ","Olcl2ThrtlUpThrshld            ","Integer        ",NULL,"OLCL 2 Throttle Up Threshold                                   ","40                             ","40                             ","0                              ","100                            ",1,NULL

extract columns from a text file in vb

jagpreet 0 Newbie Poster

17 Years Ago

can anyone provide me with the script for extracting columns from a text file.
the script needs to be in visual basic

Re: how to get the difference between the data of the two files

jagpreet 0 Newbie Poster

17 Years Ago

can u help me out with any of these methods?

Re: how to get the difference between the data of the two files

jagpreet 0 Newbie Poster

17 Years Ago

i have two data files which contain the values to be stored into the columns of the table .
these files are of same nature ,i.e their data needs to be put into the same table.
these files have data for 6 columns.
now i want to compare the data of only two columns and want to get the difference between these two columns only.
if we can compare these two files and get the difference between two columns before loading them into the table , then that would also be fine.

can u guys help me out with its code..

Re: how to get the difference between the data of the two files

jagpreet 0 Newbie Poster

17 Years Ago

i have to load the two files into the same table not in two different tables.
then i want to compare the following thing
say c1 is column1,c2 is column 2
r1 is row1 and r2 is row2
now the values in the table r like this
c1r1 c2r1(data from file 1)
c2r2 c2r2( data from file 2)
now i want to get the difference between c2r1 and c2r2

jagpreet 0 Newbie Poster

17 Years Ago

i have done all those changes.
now it is giving the following error

Parameter '?f''' must be defined.

how to get the difference between the data of the two files

jagpreet 0 Newbie Poster

17 Years Ago

i have load two data files into a mysql table.now i want the compare the data from these two files (i.e want to compare a particular column of the table and want to get the difference between the values from these two files).
i dont know how to do this.can anyone help me out with this?

jagpreet 0 Newbie Poster

17 Years Ago

everytime it is not able to find the correct path,infact it shows this error

File 'C:\Program Files\MySQL\MySQL Server 4.1\Data\systemconfiguration\?f' not found (Errcode: 22)

but when i hardcode the file path in the load query it works fine as it shown below

myCommand.CommandText = "load data infile 'C:/Documents and Settings/jagpreet/d2.txt' into table configparams columns terminated by ',' enclosed by '""' lines starting by '""'"

but whern i try to do it dynamically it gives the error.

jagpreet 0 Newbie Poster

17 Years Ago

this is what i want to do dynamically with the help of parameters.
what i want is that user just enter the filename along with the path in the textbox and then the code automatically put the data of the file into database.

i can also fix the path the path of the file but i want the filename dynamically.

i have written this code.

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click


Dim conn As New MySqlConnection
Dim myCommand As New MySqlCommand
Dim myAdapter As New MySqlDataAdapter
Dim myData As New DataTable


conn = New MySqlConnection()
conn.ConnectionString = "server=localhost " & ";" _
& "user id= root " & ";" _
& "password= cricket" & ";" _
& "database=systemconfiguration"


Dim filename As String


Dim fs As FileStream = New FileStream(textbox.text, FileMode.Open, FileAccess.Read)
(textbox.text is a textbox through which i want to give the filename or full filepath.)



FileSize = fs.Length
rawData = New Byte(FileSize) {}
fs.Read(rawData, 0, FileSize)
fs.Close()


myCommand.Connection = conn
myCommand.CommandText = "LOAD DATA INFILE  '?f' into table configparams columns terminated by ',' enclosed by '""' lines starting by '""'"


myCommand.Parameters.AddWithValue("?f", filename)



conn.Open()
myCommand.ExecuteNonQuery()

jagpreet 0 Newbie Poster

17 Years Ago

no path is not fixed and files are in txt.

load bulk data files into mysql dynamically

jagpreet 0 Newbie Poster

17 Years Ago

i want to load bulk data files dynamically inot mysql database by using visual basic as front end.
i want to get the filepaths dynamically i.e i just enter the file name into textbox and it will automatically load the data into the database.
i have written this code

myCommand.CommandText = "LOAD DATA INFILE '?filename' into table configparams columns terminated by ',' enclosed by '""' lines starting by '""'"

myCommand.Connection = conn

myCommand.Parameters.AddWithValue("?filename", filename)
but with this code is not able to get the desired filepath

can anyone help me out plz