powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / ADO.NET, LINQ, Entity Framework, NHibernate, DAL, ORM [игнор отключен] [закрыт для гостей] / База данных FoxPro (dbc) через ADO
3 сообщений из 3, страница 1 из 1
База данных FoxPro (dbc) через ADO
    #33330792
Андрей К
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Привет всем!
Кто-нибудь читал базу данных Visual FoxPro через Ado?
Пришлите ,пожалуйста, фрагмент кода
...
Рейтинг: 0 / 0
База данных FoxPro (dbc) через ADO
    #33330803
Андрей К
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Именно базу данных, а не просто DBF-таблицу (DBC-файл)
...
Рейтинг: 0 / 0
База данных FoxPro (dbc) через ADO
    #33334008
Sergey Ch
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вот кусок текста:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
<%@ Page Language="VB" Debug="true" %>
<% Response.Expires =  0  %>
<%@ Import Namespace="System" %>
<%@ Import Namespace="System.data" %>
<%@ Import Namespace="System.Data.OleDB" %>

<%@ Register TagPrefix="ie" Namespace="Microsoft.Web.UI.WebControls" Assembly="Microsoft.Web.UI.WebControls" %>

<html>

<script language="VB" Option="Explicit" runat="server" Debug="true" >
  Sub Page_Load(Sender As Object, E As EventArgs)
    dim strSQL as string
    dim objConnection as OleDbConnection
    dim objCommand as OleDbDataAdapter
    strSQL="select code,desc from categ"
    objConnection=New OleDbConnection("provider=vfpoledb.1;Data Source=c:\inetpub\mysytem\DATA\mydbf.dbc;SourceType=DBC;Exclusive=No;Backgroundfetch=NO;")
    objcommand=new OleDbDataAdapter(strSQL,objConnection )
    dim DS as dataset
    ds=new DataSet()
    try
      objcommand.Fill(DS,"categ")
'       return DS.Tables("Categ").DefaultView
    Catch ex as Exception
      Throw ex
    Finally  
      objConnection.close()
    End try

    Products.Datasource=DS.Tables("Categ").DefaultView
    Products.DataBind()
  End Sub
</script>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
<title>New Page  1 </title>
</head>
<body>
<ASP:DataList id="Products" ShowHeader=false ShowFooter=false RepeatColumns="2" RepeatDirection="horizontal" BorderWidth= 0  runat="server">
    <ItemTemplate>
      <table>
        <tr>
          <td width="150" style="text-align:center; font-size:8pt; vertical-align:top; height:200">
            <%# DataBinder.Eval(Container.DataItem, "COde") %> <br>
            <%# DataBinder.Eval(Container.DataItem, "Desc") %>
          </td>
        </tr>
      </table>
    </ItemTemplate>
  </ASP:DataList>

</body>
</html>
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / ADO.NET, LINQ, Entity Framework, NHibernate, DAL, ORM [игнор отключен] [закрыт для гостей] / База данных FoxPro (dbc) через ADO
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]