ASP.NET Tutorial #02

Πληροφορίες σχετικές με την ASP, ASP.NET και με τις εφαρμογές που είναι γραμμένες με αυτήν.

Συντονιστές: WebDev Moderators, Super-Moderators

Απάντηση
Άβαταρ μέλους
tsiger
Honorary Member
Δημοσιεύσεις: 1431
Εγγραφή: 11 Νοέμ 2002 13:40
Τοποθεσία: Thessaloniki Observation Center
Επικοινωνία:

ASP.NET Tutorial #02

Δημοσίευση από tsiger » 08 Φεβ 2005 16:05

Ενα παραδειγμα εμφανισης των δεδομενων:

Κώδικας: Επιλογή όλων

<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.Odbc" %>
<%@ Page Language="VB" Debug="true" %>
<html>
<script language="VB" runat="server">

    Sub Page_Load&#40;Sender As Object, E As EventArgs&#41; 

' dilosi stoixewn tou server        
Dim MyConString As String = "DRIVER=&#123;MySQL Driver&#125;;" & _
									"SERVER=server_name;" & _
									"DATABASE=db_namet;" & _
									"UID=username" & _
									"PASSWORD=pass;" & _
									"OPTION=3;"
		'anoigma mias sindesis							
		Dim Conn As New OdbcConnection&#40;MyConString&#41;
		Conn.Open&#40;&#41;
		
'dimiourgia erotimatos
Dim da As New OdbcDataAdapter&#40;"select * from news", Conn&#41;
	'dimiourga set dedomenwn	
        Dim DS As New DataSet&#40;&#41;
        da.Fill&#40;ds, "news"&#41;

'proetoimasia tou control gia emfanisi twn dedomenwn
        MyDataGrid.DataSource=ds.Tables&#40;"news"&#41;.DefaultView
        MyDataGrid.DataBind&#40;&#41;
    End Sub

</script>




<body>
<!-- xrisi tou control ASP&#58;Datagrid gia emfanisi twn dedomenon -->
  <ASP&#58;DataGrid id="MyDataGrid" runat="server"
    Width="700"
    BackColor="#FFFFFF" 
    BorderColor="blue"
    ShowFooter="false" 
    CellPadding=3 
    CellSpacing="0"
    Font-Name="Verdana"
    Font-Size="8pt"
    HeaderStyle-BackColor="#aaaadd"
    EnableViewState="false"
  />

</body>
</html>
paradeigma : http://www.viciousdream.com/aspx/data_access.aspx

Απάντηση

Επιστροφή στο “ASP, ASP.NET”

Μέλη σε σύνδεση

Μέλη σε αυτήν τη Δ. Συζήτηση: Δεν υπάρχουν εγγεγραμμένα μέλη και 0 επισκέπτες