sal21

Sub DUE() Dim strBuffer As String Dim strContents() As String Dim I As Long ReDim strContents(0) Erase strContents() Close #1 Open "C:\TEST\28-06-2013.TXT" For Input As #1 strBuffer = Input(LOF(1), 1) Close #1 strContents = Split(strBuffer, vbCrLf) For I = LBound(strContents) To UBound(strContents) 'Debug.Print strContents(I) Next I End Sub Problem out …

I use the tipical function: .... Open file For Input As #1 ... ecc... to reading txt file line by line. But instead to init the redaing line by line... 1) I need to find, in position mid(line, 1,8), the string INIT0000 and strat the reading of lines from here …

I have ic c:\mydir\mdb1.mdb with a table named tabella1 and 13 fileds named p01,p02...p13 (the table is blank without records) In dir c:\mydir\ have a dbase1.dbf with 13 fileds. how to recopy/export in existis tabella1 of access mdb all records from dbase1.dbf ???? Fast method, please! I think is possible …

Hi friend i use this code to connect via vb6 a mysql database in local. Is possible to connect other pc with the same code on the dsn on original pc where reside the dsn? Tks for all and sorry for my bad english i'm italian. Sub uno() Dim conn …

In a asp page have a combobox with 3 item(see html) I want to loop in all items of combobox... similar: i use this to connect oie: Set OIE = CreateObject("InternetExplorer.Application") URL = "http://mysite/GP.asp" OIE.Visible = True OIE.navigate (URL) Do While OIE.readyState <> 4 Or OIE.Busy DoEvents Loop select element …

see the image of my listview... I want colorize each cells in rowset based the percentage in cells, how to? is possible? for example: if the percntage is 50% colorize half cell if the percentage is 25% colorize 1/4 of cell .... ecc i use this to insert percentage: ITM.SubItems(5) …

Here my code to fill listview. When the rset are a few the code work fats but with 154.478 rset the code use a very very time, have asuggestion? A frined suggest me to loop all rset and fill array next loop the array to fill listview. Other friend suggest …

[url]http://www.x-rates.com/cgi-bin/cgicalc.cgi?value=1&base=EUR[/url] Based the link how to count element in table of this page? note: is the table where are all currency values tks. in vba please

After the treeview is filled is possible to: count how may AG-xxxxx are in 8501-xxx, count how may items are in each AG-xxxxx, , count how may items are in each SETT. -xx, ....ecc and store the result in a var or count during the treeview is filling and return …

Admit have mymdb.mdb with table mytable and filed myfield in c:\... Ho to fill combobox without dupes from table, please without "select distinct..." statement is possible? Tks.

I use the tipical conn in ado to connect on sql. MY prob is to find fast a string in a field (have 165.876) record. With this condition: Is the string is found in field then call sub1 else call sub2 end if

I dont know if existis a way in VB classic, to enumerate or inventory listing, all server of my LAN and get info based service installed similar:Sql, MySql, DB2...ecc Sorry me for stupid question...;-)

After i click on "Area Clienti" appear the tipical autenticatin box (see image) How to insert in user box the value of my_var = user, and in password box the value of my_password=mypassword and after check "save pasword..." and click on ok button????? naturally in VB or VBA code here …

After i click on link "Area Clienti" appear the tipical autenticatin box How to insert in user box the value of my_var = user, and in password box the value of my_password=mypassword and after check "save pasword..." and click on ok button????? naturally in VB or VBA or vbs code …

From a CICS application i send a txt file in dir c:\my_dir\test.txt my probem is when the job is finished... How to be sure when the file is updatable or movable from dir to other dir???