Posts by choudhuryshouvi

hey Shouvik,Till Now i do not want GRIDVIEW DATABINDING, I am doing if user types Rollno 1 in textbox Roll and click on search button, then in the corresponding textboxes info is displayed in other textboxes like his name,& his marks.
In VB there is no DataReader.

yes, you are right. in vb6 there is no concept of datareader.
but so what? there are still so many methods that you can use to read your records from the database.

so you wish to try the search code yourself?
ok.....go ahead....i'm always here for you.

for searching you can apply one of the these two techniques :-
1. Exact Record Searching
2. Dictionary Searching

choose which will be best suited for you.

regards
Shouvik

hey Shouvik ,Till Now I have did the foll--
I inserted the records and as the records are inserted into the database,all the textboxes are clear.
THX FOR UR HELP.
Now I m trying to do myself DELETION, UPDATION, SEARCHING the Records.

that's a good news. so you are on your way. isn't it?
ok...try those and if you need any help then plz create a new thread for that.

The eg,u have given me in ur previous reply is
GRIDVIEW DATABINDING--Rite????

wrong. there is no gridview databinding concept available in vb6. it was just a listview control and it is showing all existing records from your table. look in your VS2005 toolbox......you'll find this control there too...

Till Now,I understood that
U write Connection string as procedure.
When the User clicks on Insert button further msg box is displayed.
If yes,Records are inserted.
If no,Focus is set to textbox Roll.

wrong. i didn't write connection string as procedure. the connection string is simple a method and i just initialized it by putting my server descriptions and used open method to create the connection. the only procedure in that code is DisplayAllStudents which is responsible for fetching & displaying all existing student records from your stuinfo table.
the msgbox's purpose is exactly same what you have said.

And To Clear The textboxes I did-
Public Sub clear()
Dim txt As Control
For Each txt …

i'm getting a run time error "Run-time Error'3265' Item cannot be found in the collection to the requested name or ordinal" Its corresponding with this code

Set tempRecordSet = AdoClerk.Recordset("select * from Clerk where UCase(trim(ClerkId)) = '" & UCase(Trim(txtClerkId)) & "'")

your sql query is invalid. in your query the usage of "UCase" and "Trim" functions are invalid. They are vb6 library functions. so they won't be recognized by your ado data control and cannot be converted into sql commands. rectify the statement like this,

select * from Clerk where upper(ClerkId)='" & ucase(trim(txtClerkId.text)) & "'"

one more thing, which database you are using? try the above syntax if you are using sql server or oracle database. but if you are having an ms-access database the above syntax won't work because there is no upper() in access library. access doesn't care whether you type uppercase or lowercase characters. in that case use like this,

select * from Clerk where ClerkId='" & trim(txtClerkId.text) & "'"

Am I using the wrong code for use with a ado control???

well, you can have two answers in this context. if you use ado data control then there is nothing wrong with your code. but it is always recommended that you donot use any data bound control. instead of it use ADODB (Microsoft ActiveX Data Objects Library) objects and methods to communicate with your database. it becomes more easy and secure and gives you lots of advanced functionality. now the decision completely depends on …

Hi, Plz help me... My project is Sales system using DAO I need the code for:

Password code
System (to generate the Item code)

Item Entry code,
Item Inquiry by description,
Item Inquiry by quantity on hand
Item Inquiry by unit of measure
Item Inquiry by unit price

Custumer Entry Code
Inquiry by customer number

Employee Entry Code
Inquiry by employee number

Sales Invoice Code
Charge Invoice Code
Delivery entry code

Reports (cash transaction)
Reports (credit Transaction)

hmmm......looks like you are giving us the order to complete your school project. isn't it?
but my dear frnd, this is a free forum and no body can help you or give you a single piece of code without showing the effort from you.

you are supposed not to request someone to complete your project on behalf you.

you know why???
because everyone works very hard to code a single line. so why they will give you their code without get any return? you must do your homeworks yourself and respect others effort. now if you have some problems then others can help you.
that's it.
show us what have you done so far for completing your project.

don't take my words otherwise.
i hope you will learn something from this and start contributing your own effort.

regards
Shouvik

Can somebody tell me if and how I can introduce a variable

what does it mean? do you wish to declare a variable here, assign a value to it and then pass it as a parameter for adding to the combo list?

of course you can declare variables at any point within your code editor except inside a statement. as what have you supplied in the next line it has a common syntax error. try like this,

Dim sName as String

sName=trim(Text1.text)
Combo1.AddItem sName

check to see if this performs solution to your question or not...

regards
Shouvik

Secondly, in the SQL statement and AddItem statements where I have used column name 'res' , ideally I will want to use column names which are numbers eg 7609.

why do you need to do that?
what is the problem if the column name remains alphabetically?

hello...
i' m doing registration license system...
i need source code that can search due date by their month...
and i want to list their date with companies name..

what do you want actually......select a month from a combo and search all records thats matches the selected month name?
if i'm wrong then could you explain it more clearly?

how to combine two table in database??
because i want use the combine to search and display the data..

combination means creating relationships between two or more tables. for creating relationship you need a primary key in a table and a same field with reference to the primary key(also known as Foreign key) in another table.

i am having an error with the password.

what problem are you facing with your password?
what is the error?

plz explain...

hey one more thing tell me that Mastering in Visual basic 6.0 is good for freshers nor not.
It is not too highfy book na, dat freshers like me can’t understand. Cz I m planning to purchase dat book.

ya, that's a good book. i have an electronic copy of this book too. go and purchase it.
it will help you. but i think it has some sections where explanations are a little bit advanced for freshers.

hv a nice day.

regards
Shouvik

ok......this is the reason for what happening to you...

first, you have placed the record insertion code in wrong section. you are firing that code in form_load event. in this event vb actually initializes all controls. so at this time your three textboxes contain null values like txtroll="" , txtname="" and txtmarks="" . now when your program fires the

gcn.execute "insert..."

statement, it finds nothing in the text boxes. now as per your code it is converting value of those text boxes like ,
val(txtroll.text) --> 0
txtname.text --> null
val(txtmarks.text) --> 0
and storing them in your table.
as you already known that val converts equivalent string to numbers. so when it finds a null value it passes only 0. now all your statements are executing fine coz there is no syntax or compilation errors. so the msgbox "Record Inserted" is being displayed. your code has some logical mistakes.

now you said

when click on the insert button the msgbox is not coming

.
this might has the following causes :-
1. you didn't mention the insertion code under the button.
2. though you have coded it but the msgbox statement is not there.

you have to code your record insertion statements in both of your form_load (sounds crazy but as you told) and button_click events so that the same action can be performed by your program when you wish to do so. now you have written in …

yes, definitely. go and face it confidently.

one thing i like to tell you. hope this will boost up your confidence level. now-a-days most of the organizations use sql server 2005 as back-end while developing any applications (whether its a windows or web base) using .NET platform. so as you have already grabbed sql with .net i think you will successfully face all the questions.

one more thing, do you have your profile in Orkut? if yes, then add me to your frnd list. if you do this, we can communicate with each other through Google Talk. tell me what do you think about this proposal? my gmail id is choudhuryshouvik@gmail.com

once again BEST OF LUCK....

regards
Shouvik

what have you used as a container for your phonebook entries?

is it a <select> tag in HTML (means listbox)???
if its so then I think there is an attribute called "Sorted" . make its value to True like this :-

<select sorted name="phonelist" size=10>

ok....try this code...
hope this works

Private Sub cmdSearch_Click()
Dim search As String

search = InputBox("Enter card no :", "Filter Data")
[B]Data1.RecordSource = "select * from waqf where cardno like '*" & Trim(search) & "*' order by cardno"[/B]
Data1.Refresh
End Sub

Private Sub Form_Load()
Data1.DatabaseName = App.Path & "\waqf.mdb"
Data1.RecordSource = "waqf"
End Sub

see the Bolded statement. thats your key...

regards
Shouvik

D2K refers to Developer 2000.
it is a visual IDE like Visual Basic 6 and it works only with Oracle databases. developers can write dynamic sql queries which is known as PL/SQL (Procedural Language/Structure Query Language) using this development tool. this tool can be integrated with oracle database codes only.

using D2K you can build visual applications which are known as Oracle Application or in short Oracle Apps.

yes, D2k can be used as a front-end tool with back-end having oracle only. but if you use .NET framework you can work with both oracle & sql-server as back-end tools.

this is a sample one too.....

Private Sub Form_Load()
txtname.Text = " "
txtIc.Text = " "
with cboroom
    .AddItem "<choose room type>"
   .AddItem "Single Bedded AC"
   .AddItem "Double Bedded AC"
end with
cboroom.ListIndex=0

with cbocheckin
   .AddItem <Choose>"
  .AddItem "Check in at morning"
  .AddItem "Check in at night" 
end with
cbocheckin.ListIndex=0

with cbocheckout
      .AddItem <Choose>"
     .AddItem "Check out at morning"
    .AddItem "Check out at night" 
end with
cbocheckout.ListIndex=0

Dim i as Integer

cboMonth.AddItem "<Choose>"
for i=1 to 12
   with cbomonth
      .AddItem MonthName(i)
  end with
next i
cbomonth.ListIndex=0

with cboyear
   .AddItem "<Choose>"
   for i=1900 to Year(Date)
      .AddItem i
   next i
end with
cboyear.ListIndex=0
End Sub

regards
Shouvik

ok......sonia......see your answers inline.

query="insert into stuinfo(roll,name,marks) values('" & txtroll.text & "','" & txtname.text & "'," & val(txtmarks.text) & ")"

1)If we broke the above line into two lines y the error comes. To split the above line what I do??

to break the line use this syntax :-

query = "insert into stuinfo(roll,name,marks)" [B]& _[/B]
           "values('" & txtroll.Text & "','" [B]& _[/B]
            txtname.Text & "'," & Val(txtmarks.Text) & ")"

see the Bolded part. it is the syntax (an ampersand followed by a space and an underscore) for breaking the line. this process is called Line Continuation.

2)Second thing when i run the form,Msg comes Record inserted and when i click on ok then the form comes. And when we fill the fields & click on OK button,then the msg do not come.

sounds confusing!!! would you mind in explaining this a little bit clear?

3) Third thing,roll no is integer na then y u use single quotes as below-
'" & txtroll.text & "'

i was just assumed that. there is no hard-n-fast rule that roll no becomes always integer. it can be alphanumeric like 'R001'. so to show you an example i used that one. you have to change it accordingly based on your data type. if its an integer avoid that single quotes otherwise use those.

4)Fourth thing,Record is inserted as below-
roll name marks
0 blank 0
0 blank 0

well I am unable to speak a …

why are you making it so confusing? just make it clear as simple as possible. now tell me what does this line mean :-

but i hv also a data w/c i need to multiply the txtQty by txtPrice and txtQty>txtPrice also.

does the above sentence make any sense??? atleast i'm not getting it.

you want to get the value of txtprice when txtqty>txtprice and you are getting it successfully. right or wrong???

now just explain what do you wish to do in the else condition...means what value do you expect to get when txtqty=txtprice or txtqty<txtprice?

just answering the above question might be enough for solving this issue.
what do you think???

regards
Shouvik

this is not at all related to either visual basic or vb.net . this is a system issue regarding your operating system. post this question in
Microsoft Windows Software Forum (Tech Talk->Microsoft Windows)

i want to find the exact location of the registry entry that the savesetting function is saving in my computer..

This is the path :-
My Computer\HKEY_CURRENT_USER\Software\VB and VBA Program Settings

as you are saving the value in "Project", "Options", "Auth" ,
now expand the node VB and VBA Program Settings and you will see a key created with name Project. expand this also and you will see a child key created with name Options. now click this and you will see some values appeared in the right pane. there you can see the value Auth.

still more questions??? just post right in..
ok...

regards
Shouvik

how do you expect this code to run? the first statement contains a big error. apart from this, the insert statement which you have written & passed to the variable query contains syntax errors. errors due to nontermination of string constant and invalid sql command. the following is the corrected syntax. try this...

Dim gcn As New ADODB.Connection
Dim query As String

[B]gcn.ConnectionString="Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=sonia"
gcn.Open[/B]
Msgbox "An active connection has been established."

[B]query="insert into stuinfo(roll,name,marks) values('" & txtroll.text & "','" & txtname.text & "'," & val(txtmarks.text) & ")"[/B]
gcn.Execute (query)
MsgBox "Record Inserted"
gcn.Close

''your insert statement should look like this :-
[B]INSERT INTO STUINFO(ROLL,NAME,MARKS) VALUES('1','SONIA',100)[/B]

regards
Shouvik

so, as you said i think you should go for Windows Authentication mode.

do you have both versions (2000 and 2005) installed on your machine or only one of them?

if you have it installed on local server then you don't need to write anything in the server space.

yes, it is the rule. always higher version gets preference by your OS.

regards
Shouvik

Madam Sonia,
I think Veena has already given all of your answers. So there is nothing need to say any more from my side except these,

3)
"select * from branch_details",gcn,1,2
Can u explain dat. We have to insert the records into the DataBase,Y we r selectiong it.

in the above statement we are not selecting anything from the database. a connection/reference to the table has just been established or you can say opened so that the recordset object which is "rs" here recognize/know where to send the data when the .update method fires. here we are just setting the destination for the recordset object.

4)
rs!address=trim(txtAddress.text)
In the above line,If I m not wrong,Address is the column name in database.

yes, you are correct. Address is the column name. This is just one type of syntax used here. Instead of this you can also use this, rs("Address") or this rs(2)-->here 2 is the index/subscript value of the address field in the rs recordset.

Apart from this, if you still have any more questions then feel free to post here.

regards
Shouvik

vb doesn't support object orientation. that's why you can't use protected here. other identifiers private and public can be used here like the way you use in vb.net.

public members can be accessed outside the module (both standard and form modules). even you can access an event of a form module from another form if the same is declared as public. keep in mind all events/sub-routines/functions in vb are declared Private in default.

regards
Shouvik

answer to your first and second questions i have already given in my previous reply.
just read it carefully.

and for your third question, the answer is yes.

and one more thing, please start your own thread instead of equipping in some other's thread. this will help other people to easily get their answers having same problem like you.

hope you will accept this request.

next time i wanna see you in your own thread...
ok...you are most welcome...

regards
Shouvik

ok....here are your answers...

1. well, there is nothing to say about. this is completely depend upon the company policy. but as i have seen most of the companies now use ADO techniques from vb6. in my office i'm using ADO methods. you are quite right. the company management may have some project restrictions. like in the project which i'm working on, has restrictions to use the ADO technology only.

2. not too much difference you will found in the connection techniques whether you use ADO/ODBC/OLEDB. the diff. can be while you connecting to the database but the rest of the methods/properties for further database manipulations will be same. now whichever method is use there is a common thing in all of these......they all use Microsoft Activex Data Objects Library.

3. yes, ADO/DAO is known as MDAC (Microsoft Data Access Components)

4. yes, 100% correct. you cannot use DAO to connect to a sql database. you have to use ADO for this purpose.

5. not only the case of datagridview. you have to use the dataset class for data manipulations (inserting,updating,deleting,searching...etc..). in vb6 we use Recordset just for this purpose. the recordset must be used here because there is no concept of dataset i visual basic 6.

hope this helps....
any more questions.....just put it right here...

regards
Shouvik

thanks...

Hi Sonia, first of all this is a personal request from me to you....don't call me like Hey choudhary....it becomes better if you use Hey Shouvik....ok..

now find your answers inline.

Hey choudhary,
Names I have mentioned below are all used to connect to VB or not??
ADO,RDO,ODBC,DAO,OLE DB????

Yes, you are quite right. Actually there are physically three connection types available and those are :- RDO,DAO,ADO. The ADO/ODBC/OLEDB refers to same thing which is ADO (Activex Data Objects).

DAO (Data Access Objects) is used to connect to local databases such as an ms-access database.

RDO (Remote Database Objects) was used to connect to remote database objects. this sounds too spooky. actually remote database means connecting to a database which resides on some other server/node/machine other than the machine from where the vb6 application is running but both are in the same network. this was used in LOCAL AREA NETWORK protocols. it had so many limitations. for this microsoft abandoned further improvements on this technology and it was gone. after this ADO comes into the picture which overcomes all limitations of RDO along with DAO and has more features. using ADO you can connect to any databases regardless of its locations such that it can reside in a server node or in the local machine.

AnyMore methods are there to connect to VB??
Plz just give the names as above.

No, there are no such connections method available other than these three.

well my friend,
you have been given such a task which requires mutilevel coding. that's why the coding for this are so advanced. i just found it useful and post it here. now you can also find yourself. there are tons of examples out there in the internet. making some search in google will give you enough results. you can look into these beginner sites also :-
http://www.vbexplorer.com
http://www.andreavb.com/
http://www.codeguru.com/
http://www.vbcode.com
http://www.a1vbcode.com

ok......as you requested i will try to create a sample program for you. but i'm telling from advance that this will take some time. so you have to wait for that.
do you have sufficient time in your hand? when should you have to submit your task?
is it your school project or some module job for a software development project?

waiting for your reply.
hv a nice day...

regards
Shouvik

you saw that blank because you clicked on the cancel button. after testing your connection click on the OK button to save all settings.
now right click on the udl file->select open with->select notepad

you should look similar content like the following if you successfully build up a connection using a UDL file :-

[oledb]
; Everything after this line is an OLE DB initstring
Provider=SQLOLEDB.1;Persist Security Info=False;User ID=bs;Initial Catalog=BILLING_SYSTEM

now you can see three lines in that file. among these the last/third line is your connection string which you need to pass from your vb6 application through an ado connection object in order to communicate with your database.

one more thing, regarding connections :-
in the connection tab of the data link properties dialog box (displayed when you double click on the udl file) you can write or skip writing the server name. whether you need to write/select a server name or not depends on the location of your server.
if your sql server is installed in your local machine (means the same machine from where you are running your front-end application) you don't need to write/select any server name. you need to mention it when the sql server is installed in some other remote node and your application is trying to connect to it from your local machine.
now after that, you must select an authentication mode which are of two types :-
1. Windows NT authentication …

you have to provide the password manually for your database if you use shellexecute to open the file from your application.

but if you wish to open the database (more techinal term is --> "Connecting to Database") which is password protected then you can do this from your application. the password can be given in to the connectionstring to access the database without making your system to prompt for the password.

use like this :-

Private Sub Command1_Click()
Dim a, b As Integer
a = 10
b = 20
[B]Call sum1(a,b)[/B]
End Sub

regards
Shouvik

just clear this out :-

do you want to open your .mdb file in Microsoft Access when you click on a button in your vb6 program?

if yes, then you can try this code :-

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Private Sub Command1_Click()
ShellExecute Me.hwnd, "Open", [B]"c:\mydatabase.mdb"[/B], vbnullstring, vbnullstring, vbMaximizedFocus
End Sub

replace the Bold part with your database path.

regards
Shouvik

hey somebody tell me is it necessary to use val like val(txtPrice.text). The same thing cannot be done without using val.

Val is necessary to use when comparison between two or more values need to be performed and the values are going to be taken from some controls having .text property such as combo box, textbox, listbox, listview, treeview, etc.

for example, if you wish to compare two numbers to see which one is greater and you have these two numbers in two diff. textboxes then you need to use this Val function. this function converts all strings/characters to its equivalent integers/numerals. now to compare values of textboxes you must use this function. otherwise the relational operators won't function properly and you'll get an invalid output.

regards
Shouvik

I have a grid with all of the information that I need from the DB. The company name is the primary key. When the page with the grid comes up I would like to be able to type characters and it will go to the row that most closely matches what I type.

Like I mentioned before if I had the following records:
Anne
Bob
Bill
Bud
Carl
Carlos
Chris
Curt

And type "C" it will jump down to the first row with "C" for the company name (Carl for this example). If I type "Ch" it will go to the row with "Ch" in it (Chris for this example).

Does that make better sense?

ok......i understood...now try the following steps :- (for testing)

1. take one ADODC, one DATAGRID, one TEXTBOX control on your form.
2. this code is tested on sql server database. so create a sample database "COMPANY" and inside it create a table "DETAILS" with three fields :-
COMPANY_NAME (VARCHAR PRIMARY KEY)
ADDRESS (VARCHAR)
PHONE (NUMBER)
3. now make connection with the ADODC control to the sql server database.
4. connect the DATAGRID with the ADODC control
5. now in the CHANGE event of the TEXTBOX control paste the following code :-

[B]Private Sub Text1_Change()[/B]
If Adodc1.Recordset.RecordCount > 0 Then Adodc1.Recordset.MoveFirst
Adodc1.RecordSource = "details where upper(company_name) like '%" & UCase(Trim(Text1.Text)) & "%'"
Adodc1.Refresh
[B]End Sub[/B]

now execute the program. …

Visit this link to get some sample snippets

regards
Shouvik

more clear explanation will be preferable.

you can visit this link :-
http://support.microsoft.com/kb/209953

hello..please help me
i need to edit data using form(user fill in details)..but after editing the record in database.nothing changes happen otherwise it create new row of date databook.Recordset.Edit
databook.Recordset("name") = txtname.Text
databook.Recordset("ic_num") = txtIc.Text
databook.Recordset("room_type") = cboroom.Text
databook.Recordset("check_in") = cbocheckin.Text
databook.Recordset("check_out") = cbocheckout.Text
databook.Recordset("Month") = cbomonth.Text
databook.Recordset("Year") = cboyear.Text

databook.Recordset.Update
databook.refresh

have you binded your database fields with these controls such as textbox, combo box,etc.
if your answer is yes, then do the following :-
1. simply navigate though the records to select one using the navigator buttons in your datacontrol.
2. change your data and fire this code :-

Data1.Recordset.Edit
Data1.Recordset.Update
Data1.Refresh

that's all. now navigate through the records once more. you will see the updated ones. now close your program and open the database. you can also see the table is updated.

hope this helps. if not then forward your questions.

regards
Shouvik

what exactly are you trying to do?
explain in detail.

I want to put the value of txtPrice to lblVal if the value in txtQty>txtPrice. what shall be my code?

just place it inside proper textbox change event. lostfocus or validate event can also be applied. choice is yours.

[B]Private Sub txtPrice_Change()
if val(trim(txtQty))>val(trim(txtPrice)) then
   lblval.caption=trim(txtPrice)
end if
End Sub[/B]

regards
shouvik

so ultimately your question is how you can bypass this problem so that more than 10 users can access the database synchronously in an winxp os?

if its so then the answer is you can't. this is the restriction of the os itself. so there is nothing can be done. the only solution for this you might have to change your platform for implementation. as i suggest use windows server 2003 operating system or winvista. hope your problem will be history.

regards
Shouvik

yes, vb 6. Maybe i am confuse, but we are talking of a tracker or something similar. I mean, i would like take all url of each object into a web page, images, sound, mp2, wmv, files, etc...select and download.

ok...you can try this code snippet. just follow the instructions.

List all Links on a particular site :-
The following recursive sub will list all links on a particular document, including all links inside frames (any level) and places them in a list box. If you got a form (form1), a listbox (list1), a command button, and a webbrowser (webbrowser1); you could call this sub like this form command1_click: "ListAllLinks webbrowser.document, List1".

[B]Show the links text in the listbox[/B] :-

Public Sub ListAllLinks(doc As Variant, List As ListBox)
  If doc.frames.length = 0 Then
    For i = 0 To doc.links.length - 1
      List.AddItem doc.links(i).outerText
    Next i
  Else
    For i = 0 To doc.frames.length - 1
      ListAllLinks doc.frames(i).Document, List
    Next i
  End If
End Sub

[B]Show the links url in the listbox[/B] :-

Public Sub ListAllLinkUrls(doc As Variant, List As ListBox)
  If doc.frames.length = 0 Then
  For i = 0 To doc.links.length - 1
    List.AddItem doc.links(i).href
  Next i
  Else
    For i = 0 To doc.frames.length - 1
      ListAllLinkUrls doc.frames(i).Document, List
   Next i
  End If
End Sub

notify me if this works. here is a screenshot for you.

regards
Shouvik

but the problem is that he needs "for a divine cause" to use access.

but in the case of using windows XP as a DB server(), no more than 10 connections is available.

would you please explain these more clearly?

okk....

Go to project and then select the components and then check the M/S common dialog control 6.0

if i'm not wrong that thing is already done in previous replies.
he has also started coding.

obviously it won't work.
the reason is, when you are specifying the location App.Path & "http://mywebsite.com/LOGIN.txt, it searches for the login.txt file inside a directory http://mywebsite.com inside the project directory. but there is no such thing exists. so it is returning you an error.

how could the program recognize that the specified location is a virtual directory until and unless you tell it so? for this you need to do coding. this is not recommended using vb6. instead of this use an ASP script with VBSCRIPT coding.

You can visit this link for accessing files using ASP scripts

regards
Shouvik

is this related to vb6?

ms-access has some limitations.

tell your frnd to upgrade the database to sql server or oracle.

does your ms-word file maintain any special format?