Hi,
I did add the objFile.WriteLine FirstLine but when I looked at my modifide file,
it had opied the same information twice. One that had the header and text. The second had header, text and current date
I also did paste exactly what you had posted
objFile.WriteLine FirstLine
arrContents =...
Hi,
I made the changes to the script. It adds the current time but it also adds the current time next to the modificationDate header. For example
First Name, Middel int, Last name,ModificationDate,2/26/2008 11:24:03 AM
This is what I did in my script but when I compile it, my script does not...
Hi,
My file includes Peoples First name, middle Initial, Last Name and Date. I am adding another column called ModificationDate. I would like to populate the modificationDate column with the current date.
For example, this is what I am trying to acomplish
First name, middle Initial, Last...
Ok,
So far I have used ADO to open up my file. Let me know if this is correct.
Private Sub myTest()
Dim con As New ADODB.Connection
Dim rs As ADODB.Recordset
con.Open "provider=sampprov;data
source=C:\data\teletick1.csv"
Set rs = con.Execute("teletick.csv")...
Hi,
I would like to know how to add the current time in my Modification column. This column is emty. This file is a text file and I dod not know how to create a script using ADO. Please advice. This is what I have so far.
'On Error Resume Next
Const ForReading = 1
Const ForWriting = 2
'open...
The thing is that the pc does not have Ms OFFICE and when I frst compiled the script I got an error on, "Excel.Application"
So far I am able to add a row on the first line and add a heading for every column. I am working on adding the current date on teh Modification column. Please advice.
'On...
Please read this one not the one above
This is what I was able to do. Still researching the rest. Any comments
Const ForReading = 1
Const ForWriting = 2
'open the data file
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile("C:\data\abc.csv"...
Ok,
This is what I was able to do. Still researching the rest. Any comments
Const ForReading = 1
Const ForWriting = 2
'open the data file
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile("C:\data\abc.csv", ForReading)
sDo Until...
Hi,
I would like to know how to I re-write this script to read and write this script in a text file format. Please advice. Thank you.
call myMacro1()
Sub mymacro1()
'
' mymacro1 Macro
' Macro recorded 2
'
'
const xlDown=&HFFFFEFE7
Set objXL = CreateObject("Excel.Application")...
Hi,
How do I put this in a loop?
dim iRow
iRow=2
Do Until objWS.Cells(intRow).Value = ""
If objWS.Cells(iRow, "F") <> "" Then objWS.Cells(iRow, "M") = Now()
objWS.MoveNext
intRow = intRow + 1
Loop
Please look at this one on the one above
Hi,
Sorry to bother you again but when I put the If statement into my script, and compiled the code I got a "Unknown runtime error on the line that has the If statement any ideas? I initialy used the objWS.cell statement but I got an error saying that...
Hi,
Sorry to bother you again but when I put the If statement into my script, and compiled the code I got a "Unknown runtime error on the line that has the If statement any ideas? I initialy used the objWS.cell statement but I got an error saying that Object doesn't support this property or...
Hi,
I have an excel spreadsheet with a few columns. I have added a column called modification date and I would like to compare it with a column card num and if there is data in card num then I want the modification date column to add the current date.
How do I do this. Please advice?
Hi...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.