Type: Posts; User: luca90
Search took 0.05 seconds.
I, but example with my data var?
i can have in MyVar (As String):
i need to get only the numeric value from string?
1) The letter are always on right of string
I need to loop all .xls files from c:\mydir\
and open "one to one", get data from column, close it, and open the next always from the same dir.
Or loop all closed xls file without open...
But i dont see the dim of var firstempty
i think col is Long...
I need to loop value in row 2 until cell in row from G1 is blank... in my case AA1 is blank
i need to use a Where clausole, in a Select query, where numbers years is <= 20 and >=90 based of birthday day
my filed name is NASCITA with date property.
My test sql:
I need to iterate all object in userform and set Enabled to false..
exactlly wath i need!!!!!!!!!!!!!!!!!
sorry for my dab english, but i think u undesrtand me.
I loop all items in a listview column.
each item have a different color font.
is possible to retrive the value of single color font of items?
i need to assign to click botton this code line, and execute it:
"C:\Program Files\Microsoft Office\Office14\MSAccess.exe" "\\rom\workarea$\FSR\Ge\DATABASE\T1.MDB" /compact
Instaed to use data in column sheet, possible to arrange code to use the data in a column Listview.
The reference title column and data are exactlly wath i have in column of my listview.
... can you show an example of the command line for running a query
simple update query, but with 2.000.000 on join to other table with approx 4.000.000 of records
... Also, why do you even...
but, after compacing the database, i need to run a query named Query_001, into the same database.
is possible to insert into the batch file a dos command line for that?
sorry for delay.
Yes are labels....
changed Dim lbl As Label in Dim lbl As object and work great!
Tks. for code.
>>>>Set lbl = Controls("C" & y) ERROR RUNTIME 13!!!"
No not have an array of label:-(
i use this for next:
for y=1 to 3
'here i need to increasing the index of label C...
Me.C"here insert the actual value of y).Caption
this line is in batch file and compact and repair an access database:
"C:\Program Files\Microsoft Office\Office14\MSAccess.exe" "\\rom\DATABASE\GIA.MDB" /compact
But is possible to check,...
...GROUP BY Split(VER.MER, '-')(1)
is a part of my SQL, in vb6
but have error!
I need group by with thw split of field VER.MER, with the 2Th part of the split function..
Wath you think about:
Dim I As Long, intItems, arrItems, strKey, objDictionary As Object, strItem
Set objDictionary =...
I just have an Array filled from recordset similar:
Set RS1 = New ADODB.Recordset
RS1.CursorLocation = adUseClient
RS1.Open SQL, CONN, adOpenStatic, adLockReadOnly, adCmdText
but but the year not is fixed.
you need to calculate based the year in MyVar
I can have:
I just have MyVar ="ott 2015" (ott iss the month ottober).
I need to fill a combo with the rest of months until dec 2015.
naturally MyVar is dinamicly it can aasume set, feb.... and year.
Dim itm As ListItem, K As Long
K = Empty
Me.VALORI.Caption = ""
For Each itm In ListView1.ListItems
If itm.SubItems(1) Like VALORE Then
During i fill the lv the code insert a 0 and 1 in hiden Column 18 with zero length..
now i need to assign in a button a code:
First click ordering items form 1 to 0, if i reclick order...
I need to assigng on a button click to order/sort listitems in listview1 by the clicked checkbox...
the checkbox is in column 0 of listview
i loop in all lines of txt with the tipical freefile=file ... dowhile not ecc....
then when i fuound in the left 4 of line with MyVar="0900", and admint MyVar="0900" is in line...
ok... admit i found MyVar="0900" in lines 456.989 how to loop the rest of line to the end of file from this line?
Sorry me to the all!
Really the line to start the loop not is 457 but 457.xxx...
This depend when MyVar i filled with a value where is in left 4 of line of text ...
in this case:
I use the tipcal free file and do while eof ecc.... to read a lines line by line ina txt file.
is possible to start the reading from line 457 to the end of file, and not from the top of txt file?
hI Milk ...
Sorry if i post on old question.
Admit my line is the number 457, how to loop the rest of txt file to the end, from this line?
Tested the code, is a lightning and work perfect!
but i need search directly only in column 3 the value"California"... and not in all item of listview.
can you change my command button code, for that?
Why code in Command2, dont find "California" in column 3?????
Private Sub Command2_Click()
Dim oItem As ListItem
Set oItem = Me.ListView1.FindItem("California", lvwSubItem, 3)
OK, I know the truncate statment.
I dont use tath because i dont need to delete alls records in table!
I need to delete a lot of records with a "Where" clausole.
Tks for suggestion.
In my case, actually i use Access and ADO conn, but the Mode=Share Exclusive, i can use also in ADO conn with SQlServer connection, or not?
..."should use a transaction", example for Access and ADO?
Dim strConnectionString As String
Dim objConn As ADODB.Connection
Dim objCommand As ADODB.Command
strConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=e:\My...
Click Here to Expand Forum to Full Width