Improve company productivity with a Business Account.Sign Up

x
?
Solved

access database

Posted on 2000-05-06
5
Medium Priority
?
159 Views
Last Modified: 2010-05-02
well i have a access database and the database is on the server on internet i want to display the records from that database

is it possible and how please send me any samples if u  have
its urgent please

thanks
0
Comment
Question by:sonalchouhan
5 Comments
 
LVL 1

Expert Comment

by:4P
ID: 2783887
For the easiest quick solutions, see the "About static and dynamic HTML format" topic in the Access help.
0
 
LVL 14

Expert Comment

by:wsh2
ID: 2783905
You have two choices in getting the data from this MDB.

1. The Data has to be exposed by the Server.. via an ASP or a COM component.. that your program can link to.

2. Download the file to your hard drive and access it from there.

0
 

Expert Comment

by:pramesh
ID: 2785107
dim con as new ADODB.connection
con.open connectionstring
you can specify the url here.
http://www.somedomail.com
specify the path of the mdb file in recoredset.
0
 

Expert Comment

by:amarti
ID: 2785475
If you don't need user specify query, one simple solution is a freeware software that generates HTML pages from Access, like DBtoWEB for Windows 95/98/NT4.   You can find in:
http://www.endpoint.freeserve.co.uk/ 

0
 

Accepted Solution

by:
tq1962 earned 20 total points
ID: 2785478
<HTML>
<HEAD>

</HEAD>
<BODY>

<HTML>
<HEAD>

</HEAD>
<BODY>
<H1> Name List </H1>
<%

strDBFile=Server.Mappath("Telephone.mdb")
strSQL="SELECT * from personal ORDER BY Name"

strConn="{Driver=Microsoft Access Driver (*.mdb)}; " 

set oConn=strconn & "DBQ=" & Server.CreateObject("ADODB.Connection")
oConn.Open strConn
set oRs=oconn.execute(strsql)
ors.movefirst
If Not ors.EOF Then
%>
  <TABLE BORDER>
  <TR>
    <TD><B>Name</B></TD>
    <TD><B>Family</B></TD>
    <TD><B>Phone</B></TD>
  </TR>
<%
  Do While Not ors.EOF
%>
    <TR>
      <TD><%= ors("Name") %></TD>
      <TD><%= ors("Family") %></TD>
      <TD><%= ors("home") %></TD>
    </TR>
<%
    ors.MoveNext
  Loop
Else
%>
  <B>No records in recordset!</B>
<%
End If


ors.Close
oconn.Close
%>
</TABLE>
</BODY>
</HTML>

0

Featured Post

Get your problem seen by more experts

Be seen. Boost your question’s priority for more expert views and faster solutions

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

When trying to find the cause of a problem in VBA or VB6 it's often valuable to know what procedures were executed prior to the error. You can use the Call Stack for that but it is often inadequate because it may show procedures you aren't intereste…
Most everyone who has done any programming in VB6 knows that you can do something in code like Debug.Print MyVar and that when the program runs from the IDE, the value of MyVar will be displayed in the Immediate Window. Less well known is Debug.Asse…
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…

608 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question