VB.NET+AJAX搜索建议功能的实现

ASP.NET AJAX控件教程

最新推荐文章于 2022-07-18 13:47:36 发布

原创最新推荐文章于 2022-07-18 13:47:36 发布 · 1.6k 阅读

2 ·

CC 4.0 BY-SA版权

文章标签：

#ajax #vb.net #textbox #string #server #assembly

Ajax 同时被 2 个专栏收录

8 篇文章

订阅专栏

5 篇文章

订阅专栏

本文介绍如何在Visual Web Developer 2008 Express Edition中使用AJAX Control Toolkit实现自动补全和日期选择功能，包括配置步骤和服务端代码示例。

IDE:Visual Web Developer 2008 Express Edition

DB:Access 2007

到http://www.asp.net/ajax/downloads/下载AJAX Control Toolkit，将AjaxControlToolkit.dll拷贝到项目的bin目录下，在工具栏中引入。

在Web.config的<controls>...</controls>里加上
<add tagPrefix="ajaxToolkit" namespace="AjaxControlToolkit" assembly="AjaxControlToolkit"/>

WebService的代码：（aaa.asmx）

<WebMethod()> _ <System.Web.Script.Services.ScriptMethod()> _ Public Function GetCompletionList(ByVal prefixText As String, ByVal count As Integer) As String() Dim myConnection As OleDbConnection Dim myCommand As OleDbCommand Dim dbname As String dbname = Server.MapPath("location.accdb") myConnection = New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;DATA Source=" & dbname) myConnection.Open() Dim list As New List(Of String) myCommand = New OleDbCommand("SELECT DISTINCT(columnName) FROM tableName WHERE columnName LIKE '" + prefixText & "%" + "'", myConnection) Dim reader As OleDbDataReader = myCommand.ExecuteReader() Do While reader.Read list.Add(reader.GetString(0)) Loop Return list.ToArray() End Function

FORM中的代码：（aaa.aspx）

<asp:TextBox ID="txtNo" runat="server" autopostback="true" Columns="50"></asp:TextBox> <ajaxToolkit:AutoCompleteExtender ID="txtNo_AutoCompleteExtender" runat="server" Enabled="True" ServiceMethod="GetCompletionList" ServicePath="aaa.asmx" TargetControlID="txtNo" MinimumPrefixLength="1" EnableCaching ="true"> </ajaxToolkit:AutoCompleteExtender>

以上即可。

AJAX日期控件的使用也很方便，如：

<asp:TextBox ID="txtDate" runat="server" Columns="24"></asp:TextBox> <ajaxToolkit:CalendarExtender ID="txtDate_CalendarExtender" runat="server" Enabled="True" TargetControlID="txtDate"> </ajaxToolkit:CalendarExtender>