Dim DS As New DataSet()
Dim Conn As New SqlClientConnection("")
Dim DA As SqlClientDataAdapter
Dim SQLStr As String
SQLStr="Select * From Table1 Order By ID DESC"
DA=New SqlClientDataAdapter(SQLStr, Conn)
DA.Fill(DS, 0, 1, "LastNote")
Conn.Close()
matlab.Text=DS.Table("LastNote").Rows(0).Item("Note")
Dim Conn As New SqlClientConnection("data source=db1.europe.webmatrixhosting.net,1437;initial catalog=H_omidak;password=myPass;persist security info=True;user id=omidak;workstation id=OMID;packet size=4096"(
<%@language="vbscript"%>
<%
set con=server.createobject("adodb.connection")
con.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("db.mdb")
set rs=con.execute("select * from table order by id desc")
response.write("matlab=")&rs("note")
set rs=nothing
con.close
set con=nothing
%>
آقا باز هم خيلي ممنونomidak گفت:سلام:
چونكه من با ASP.Net گفتم تو با ASP
همچنین من با SQLServer گفتم تو با Jet4.0
خوشحالم که مشکلت برترف شد
از همگي ممنونpirooz گفت:خوب ايشون هم كه سوال كرده بود براي اكسس ميخواسته ديگه پس كار اون رو راه مياندازه.
اگر دقت كنيد ميبينيد كه كانكشني هم كه درست كردن به فايل اكسس است.
مگه من چي گفتم؟pirooz گفت:خوب ايشون هم كه سوال كرده بود براي اكسس ميخواسته ديگه پس كار اون رو راه مياندازه.
اگر دقت كنيد ميبينيد كه كانكشني هم كه درست كردن به فايل اكسس است.