for yyyy-mm-dd for this you can use a macro to get system date if this is what you want but for filename and author.. it will be easier if you'll enter it manually...just a suggestion

but if you...

check out this link..hope it would give you an idea.. http://www.netstumbler.org/f24/simple-vbscript-update-ms-access-database-18601/

check out this link from MS Office site, it might give you an idea on how to get started http://office.microsoft.com/en-us/excel/HA010872961033.aspx

your friend Google will never fail you for good examples regarding your query for that.. just type the keywords "vb6 get computer name", "vb6 get computer ip address", or "vb6 network programming"...

post what you've done, just take out important data replace with any data to simulate what you're trying to achieve..

try this, remove Set Count = Set_Listbox.ListCount
replace with the code below,

For count = 0 To Set_Listbox.ListCount - 1
Next count
you just want to get the total list count..and use on...

hi, don't know what you're trying to achieve..rename the file name or what? because the replace vbs that you have it will open the file and add contents to that file.. it also stated on the link...

However when I go try to run this using the shell command from Excel VB it does not work.

hi, can post your code in excel vba and your code in vbs that you have right now...

what you want...

hi, try something like this..
copy all your files to this directory C:\Documents and Settings\tops\My Documents
copy also cscript to that directory..no need to include chdir in your code

try...

hi patstarks, try to put your excel file which has the vba plus the vbs file and the text file in same directory. don't forget to change the path of your shell command...
and one more thing copy...

hi just try this: don't know if it will help never test
try to add an if then else statement...


if Finish = GetickCount then
Delay (1000 - Duration)
else
end if

but why declare a phone number as string?
as you said in post#21, you have an space in phone number data...so if you declare it in string it can accept space...

the sequence i=i+1 will do

try declaring phone number as string not an integer...
regarding the sequence number.. you want it for what reason?

if you just want your database records to be in sequence... no need to do...

the variable holding the data for phone number you declare it as a integer or string? or how did you declare it?

sequence number? have you tried like this >> i = i + 1

text1.text= calendar1.value

use Microsoft Calendar Control..go to Project->Components then click Microsoft Calendar Control..

hi mpande, the code that Proffessor PC gives you it seems to work fine.. so maybe you can post the code that you try :)

check out this link..
it might give you an idea to get started :)
http://silverlight.net/forums/t/46589.aspx

check out this link http://www.vbforums.com/showthread.php?t=361764 it might help :)

hi, i hope this would give you an idea.. :)
hope some expert can give you a clearer idea. :)

Private Sub cmdMovetoRight_Click()
Dim i, num As Integer
Dim strdata as String

num = 1 '...

hi, this might give you an idea:


num = 1 ' initialize counter
'rs is the reference to your recordset change if needed
Do While Not rs.EOF
' See if the data has been found
...

try to post the code you have started..

how about adding an if statement like:


if CommonDialog1.CancelError = True then
exit sub
end if
just a suggestion maybe other guys around here got a better solution :)

Goodluck!

check out this link it might help.. :)

http://msdn.microsoft.com/en-us/library/aa984314(VS.71).aspx

how about using ISDATE function.. :)

Goodluck!

Hmm..that's really better.. :)

yup, you can use a dynamo and control the rotation or the movement of your cam, i think if you want to view the whole place then you must have an origin in which you place the camera at that...

try this:



Sub xx()
Dim txt As String
Dim x As Variant
Dim i As Long
txt = "10,11,12,13,14,15,16,17,18,1,2,3,4"
x = Split(txt, ",")

As said by sengreen...give details on what you want to do... you want to create an interface card and control that card using the PC or what?

ok, try sending your data...maybe guys around here also got an idea on what you want to achieve...

and also post details on what you want to do :)

Welcome to DaniWeb!!!

hi check out this link.. it might give you an idea :)

http://www.vbforums.com/archive/index.php/t-267226.html

i think he's talking about the serial number of the pc not the windows product key..which i believe can be accessed only through the BIOS.. if ever manufacturer put that data on the BIOS.. :)

hi, Engineer.Saleh, check out this link..scroll down to the bottom of the page.. it might give you an idea...
http://www.experts-exchange.com/Programming/System/Windows__Programming/Q_21617669.html...

hey guys, i think anyone can write a nick for whatever he/she wants anyway, there's no rule for writing a nick..LOL.. ;)

@Engineer.Saleh: what you mean find the serial number of the computer using...

check my previous post..i implement the input box..then just put a loop.. like msgbox yes, no.. :)

try this:


Sub Macro2()


Dim lRow As Long, x As Long, y As Long, z As Long, i As Long
Dim xx(5) As String 'increase the array to any number you want

lRow =...

why need a batch file, just use vbscript to execute that isql command line..from the script..take a look at this on how to execute an exe file from vbscript


Set wshShell = WScript.CreateObject...

try this, hope it helps.

try this.. :)


Sub Macro1()

Dim x, y As Boolean
Dim x1, x2, x3 As String
Dim y1, y2 As String

'declare the data to find

hi shahji, try this, hope it helps... ;)


Sub Macro1()

Dim x, y As Boolean
Dim x1, x2, x3 As String
Dim y1, y2, y3 As String

'declare the data to find