Hi,
may be this code will help..
first add refrence for Excel
Dim objXL As Excel.Applicati on
Dim objWB As Excel.Workbook
Dim objWS As Excel.Worksheet
Set objXL = New Excel.Applicati on
Set objWB = objXL.Workbooks .Open("C:\Docum ents and Settings\raj\De sktop\Value Card\Appreciati on.xls")
Set objWS = objWB.Worksheet s(1)
With objWS
.Cells(17, 6) = Combo2.Text...
Muiz
Last Activity: Nov 30 '07, 11:57 AM
Joined: Nov 26 '07
Location:
-
Hi,
May be you can try using ADODB recordset.
[code=vb]
Dim con As ADODB.Connectio n
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
Set con = New ADODB.Connectio n
con.ConnectionS tring = "provider=micro soft.jet.oledb. 4.0;data source=\\wangmo d2\Database\Col AMS.mdb;" & "Jet OLEDB:Database Password=compaq "
con.Open
rs.Open "SELECT Username...Leave a comment:
-
Hi Mahesh,
'exporting the data to excel
If MsgBox("Are You Sure to Export the Data", vbInformation + vbYesNo, "Rep-Labs") = vbYes Then
Dim objXL As Excel.Applicati on
Dim objWB As Excel.Workbook
Dim objWS As Excel.Worksheet
Dim r As Long
Dim c As Long
Set objXL = New Excel.Applicati on
Set objWB = objXL.Workbooks .Add...Leave a comment:
-
Hi Veena,
Its working..
Thanks you very much....
Have a nice day.
MuizLeave a comment:
-
Hi Veena,
If the exe file runs in the client it will take client time right ?
MuizLeave a comment:
-
How to take the server time in VB 6
Hi,
Please help me i have to system time of the server (i.e. system time where SQL Server is available).
please help me
Thanks in advance.
No activity results to display
Leave a comment: