VBScript - Find specific term in between commas in .csv and append columns based on values found -

-

i trying append additional columns existing .csv file called original.csv, values appended should vary base on whether n or j part of value between 4th comma , 5th comma in original.csv (technically 5th column if file opened in excel). below codes wrote. don't work, it's reference only. in advance help.

rowcounter = 1 until objoriginal.atendofstream     stroriginal = objoriginal.readline     arroriginal = split(stroriginal, ",")     arrtype = split(arroriginal(5),",")     strtype = arrtype(1)      if istrue(instr(strtype,"n"))         stroriginal = objoriginal.readline & ",type n,usd"         objposition.writeline(stroriginal)     else         stroriginal = objoriginal.readline & ",type j,usd"         objposition.writeline(stroriginal)     end if     rowcounter = rowcounter + 1 loop

the proper tool .csv files ado. need create new (text) table appending columns existing table sql statement like:

select s.*, 'whatever' & (iif([b]='j','-j', '-n')) [newcol] [dst.csv] [src.csv] s

and - in general - schema.ini file like

[src.csv] colnameheader=true format=delimited(;) col1=a integer col2=b char width 15  [dst.csv] colnameheader=true format=delimited(;) col1=a integer col2=b char width 15 col3=newcol char width 15

to specify table structures unequivocally.

in code:

' absolute path .csv folder   dim ofs   : set ofs = createobject("scripting.filesystemobject")   dim sds   : sds     = ofs.getabsolutepathname("..\data\txt") ' connectionstring   dim scs   : scs     = join(array( _        "provider=microsoft.jet.oledb.4.0" _      , "data source=" & sds _      , "extended properties=""" & join(array( _             "text" _           , "hdr=yes" _      ), ";") & """" _   ), ";") ' database/connection   dim odb   : set odb = createobject("adodb.connection")   dim ssql    odb.open scs  ' show src   ssql = "select * [src.csv]"   wscript.echo ssql   wscript.echo odb.execute(ssql).getstring(adclipstring, , vbtab, vbcrlf, "null")  ' copy/append col new dst   if ofs.fileexists(ofs.buildpath(sds, "dst.csv")) ofs.deletefile ofs.buildpath(sds, "dst.csv")   ssql = "select s.*, 'whatever' & (iif([b]='j','-j', '-n')) [newcol] [dst.csv] [src.csv] s"   wscript.echo "--------------"   wscript.echo "exec:", ssql   odb.execute ssql  ' show dst   ssql = "select * [dst.csv]"   wscript.echo "--------------"   wscript.echo ssql   wscript.echo odb.execute(ssql).getstring(adclipstring, , vbtab, vbcrlf, "null")

output:

select * [src.csv] 1       j 2       n 3       j 4       n  -------------- exec: select s.*, 'whatever' & (iif([b]='j','-j', '-n')) [newcol] [dst.csv] [src.csv] s -------------- select * [dst.csv] 1       j       whatever-j 2       n       whatever-n 3       j       whatever-j 4       n       whatever-n

that way reduce risk of blunders like

  1. polluting code un-used (und un-usable) variables (rowcounter)
  2. trying split element array created split on same separator
  3. accessing next/wrong line .readline() twice

to zero


Comments

Post a Comment

Popular posts from this blog

java - Run a .jar on Heroku -

-
i trying run .jar file on heroku, , can't find instructions anywhere on how this. have read wants me compile uploading heroku. possible, , if is, how this? if helps, trying run minecraft craftbukkit server, , don't have pom.xml file yet. you didn't provide details i'll try give , people reaches question way it. first of all, create heroku account , create heroku application (assumed have done that). second, need generate application jar , upload heroku. so, open terminal , install heroku cli (assuming unix terminal): $ sudo npm install -g heroku-cli you need have npm , nodejs installed, can check link: https://www.digitalocean.com/community/tutorials/how-to-install-node-js-on-ubuntu-16-04 once done that, can use npm update node version acceptable heroku-cli: $ sudo npm install -g n $ sudo n 7.10.0 and run: $ sudo npm install -g heroku-cli in order deploy jars, need install deploy plugin: $ sudo heroku plugins:install heroku-cli-deploy ...
Read more

java - Jtable duplicate Rows -

-
Image
when add new rows in jtable duplicate rows many times this method update jtable public final void tableaucomande(){ ((defaulttablemodel)tabcommande.getmodel()).getdatavector().clear(); session s=hibernateutil.getsessionfactory().opensession(); criteria cr1= s.createcriteria(commande.class); list <commande> lcs=cr1.list() ; criteria cr2= s.createcriteria(lignecommande.class); list <lignecommande> lck=cr2.list() ; if(lcs.size()!=0 && lck.size()!=0) { (commande lc:lcs) { for(lignecommande lig:lck){ ((defaulttablemodel)tabcommande.getmodel()).addrow(new object[]{ lc.getid_cmd(),lc.getnumcmd(),lc.getdate_cmd(),lc.getclient().getnomprenom(), lig.getproduit().getlib_prd(),lig.getquantite(),lig.getproduit().getid_prd() }); } } // tabcommande.setrowselectioninterval(tabcommande.getrowcount()-1,tabcommande.getrowcount()-1); } } this code add add data rows displaye...
Read more

validation - How to pass paramaters like unix into windows batch file -

-
i need pass various parameters .cmd file unix format file.cmd -configuration=value -source=value -flag but, try this: startlocal @echo off cls setlocal set cmdline=%* set configuration= set source= set badargs= set validation= goto main :splitargs echo splitargs(%*) if "%*" neq "" ( /f "tokens=1,2,* delims== " %%i in ("%*") call :assignkeyvalue %%i %%j & call :splitargs %%k ) goto :eof :assignkeyvalue echo assignkeyvalue(%1, %2) if /i %1==-configuration ( set configuration=%2 ) else if /i %1==-source ( set source=%2 ) else ( rem append unrecognised [key,value] badargs echo unknown key %1 set badargs=%badargs%[%1, %2] ) goto :eof :validate echo validating set validation=fail if defined configuration ( echo -configuration ok if defined source ( echo -source ok if not defined badargs ( set validation=success ) ) ) goto :eof :main cl...
Read more