As businesses continue to embrace digital transformation, leveraging cloud solutions has become essential for maintaining competitive advantage. One of the most powerful cloud platforms available today is Microsoft Azure Cloud Service in Virginia. Microsoft Azure provides a comprehensive suite of cloud-based tools and services, offering businesses the flexibility, scalability, and security they need to succeed. For businesses located in Virginia or across the broader U.S., Azure enables seamless deployment of applications and services in the cloud, facilitating innovation and efficiency. When paired with the expertise of a managed cloud service provider in New Jersey, companies can unlock the full potential of Microsoft Azure, ensuring optimal cloud performance and seamless integration with their existing IT infrastructure.

What is Microsoft Azure Cloud Service in Virginia?

Microsoft Azure is a cloud computing platform that offers a wide array of services such as virtual machines, databases, networking, analytics, and AI tools. The platform’s diverse capabilities cater to businesses in various industries, helping them scale their IT infrastructure with ease while reducing capital expenses. For companies in Virginia, Azure provides a local cloud option with fast data processing speeds, ensuring a robust and reliable performance tailored to regional needs.

Azure’s data centers in Virginia ensure that businesses have low-latency access to cloud services and resources. This is especially important for companies requiring real-time data processing, like those in finance, healthcare, and e-commerce. With the added benefit of high availability and redundancy, Microsoft Azure in Virginia helps businesses maintain continuous operations, even in the event of a disaster or system failure.

Benefits of Microsoft Azure Cloud Services in Virginia

Cost Efficiency: Microsoft Azure is known for its cost-effective pricing structure. With Azure, businesses only pay for what they use, ensuring they only incur charges for active resources. This pay-as-you-go model allows organizations to scale their cloud services according to their needs, without overcommitting to long-term investments in physical infrastructure.

Scalability and Flexibility: As businesses in Virginia expand, their need for IT resources grows. Azure allows for seamless scalability, enabling organizations to increase their computing power, storage, or network capabilities as needed. The flexibility of Azure’s architecture ensures that businesses can quickly adapt to changing market demands or business requirements.

Enhanced Security and Compliance: Security is a top concern for any business. Azure is built with top-tier security features such as multi-factor authentication, role-based access control, and data encryption both at rest and in transit. For businesses operating in Virginia, Azure also ensures compliance with regulations like HIPAA, GDPR, and other industry-specific standards, making it an ideal choice for highly regulated sectors such as healthcare and finance.

High Availability: With data centers located in Virginia, Microsoft Azure provides businesses with a reliable and resilient infrastructure. The platform’s service-level agreements (SLAs) ensure high uptime and minimal disruptions, offering peace of mind for businesses that rely on their IT systems for daily operations.

Seamless Integration: For businesses already using Microsoft tools such as Office 365, Microsoft Dynamics, and Power BI, Azure offers seamless integration with these products, providing a unified platform that enhances overall productivity and simplifies IT management.

Role of a Managed Cloud Service Provider in New Jersey

While Microsoft Azure Cloud Service in Virginia offers immense capabilities, managing a cloud environment requires expertise and experience. This is where a managed cloud service provider in New Jersey becomes invaluable. Managed cloud service providers (MCSPs) specialize in the deployment, management, and optimization of cloud infrastructure, helping businesses maximize the value of their Azure services while minimizing the complexity of day-to-day operations.

1. Expert Cloud Management Solution

A managed cloud service provider in New Jersey brings expert knowledge of Microsoft Azure and can assist businesses in configuring and managing their cloud resources efficiently. Whether it’s deploying virtual machines, setting up databases, or managing network resources, the provider ensures that the cloud environment is optimized for the business’s needs.

2. 24/7 Support and Monitoring

With the support of a managed cloud service provider, businesses can benefit from continuous monitoring and support. Providers use advanced tools to track the performance of cloud resources, identify potential issues, and ensure that services run smoothly. This proactive monitoring minimizes downtime and ensures that businesses in Virginia experience high uptime and performance.

3. Cost Optimization

Managing cloud costs is a challenge for many businesses. A managed cloud service provider can help optimize cloud spending by monitoring usage patterns and making recommendations for resource adjustments. By analyzing the business’s needs, the provider can suggest the most cost-effective cloud solutions, ensuring that resources are allocated efficiently without unnecessary expenditure.

4. Security and Compliance

Ensuring that your cloud environment remains secure and compliant with industry regulations is critical for any organization. A managed cloud service provider in New Jersey can implement robust security practices, including encryption, intrusion detection systems, and disaster recovery solutions. Additionally, they help businesses meet compliance standards, reducing the risk of security breaches and penalties.

5. Disaster Recovery and Backup

A managed cloud service provider can implement backup and disaster recovery strategies, ensuring that critical business data is protected. If any disaster or outage were to occur, the provider can quickly restore services, ensuring business continuity and minimal disruption.

What is Microsoft Azure?

Microsoft Azure, launched in 2010, is a cloud computing platform that enables organizations to build, deploy, and manage applications through Microsoft-managed data centers. It supports a variety of programming languages, frameworks, and tools, making it a versatile choice for businesses of all sizes. Azure offers Infrastructure as a Service (IaaS), Platform as a Service (PaaS), and Software as a Service (SaaS) solutions, allowing users to choose the level of control and management they require.

Security is another critical consideration for organizations considering cloud adoption. Microsoft Azure places significant emphasis on security, offering a range of compliance certifications and built-in security features. Organizations can benefit from Azure’s robust security architecture, which includes advanced threat protection and identity management services.

Furthermore, Azure’s global data centers enable businesses to deploy applications closer to their users, reducing latency and improving performance. Companies can choose from numerous regions around the world, allowing for compliance with local regulations and improved service delivery.

Key Features of Microsoft Azure

Cloud computing has revolutionized the way businesses and individuals store, manage, and process data. Among the leading cloud service providers, Microsoft Azure stands out as a comprehensive platform offering a wide range of solutions for computing, storage, networking, and artificial intelligence. Azure provides scalable, secure, and flexible cloud services that cater to enterprises, developers, and IT professionals. This article explores the key features, benefits, and use cases of Microsoft Azure, along with its competitive advantages in the cloud computing industry.

1. Compute Services

One of the standout features of Azure compute services is their ability to optimize resources for specific workloads. Businesses can choose from different VM sizes and types, tailored to workloads that require varying levels of CPU, memory, and storage. For example, compute-optimized VMs are useful for high-performance computing tasks, whereas memory-optimized VMs are ideal for database workloads that demand rigorous memory performance.

Azure recognizes that organizations often operate across a diverse technology stack. As such, Azure facilitates both Windows and Linux workloads, offering flexibility for businesses to run their applications as they see fit. This support goes beyond mere deployment; Azure’s services integrate seamlessly with existing development tools, frameworks, and libraries, regardless of the underlying operating system.

Azure provides multiple compute options to handle different workloads:

Virtual Machines (VMs): Enables users to deploy Windows or Linux-based virtual servers in the cloud.
Azure App Services: A fully managed platform for building web and mobile applications.
Azure Kubernetes Service (AKS): Simplifies the deployment and management of containerized applications.
Functions: A serverless computing service that runs event-triggered code without managing infrastructure.

2. Storage Solutions

In addition to scalability, Azure emphasizes security, which is paramount in today’s environment where data breaches and cyber threats are on the rise. Azure’s storage solutions are built with security in mind, integrating multiple layers of protection. Data is encrypted both during transit and at rest, ensuring that sensitive information remains secure. Furthermore, Azure provides sophisticated access controls, enabling organizations to manage who can access their data and what permissions they have. This granular control helps ensure compliance with various regulatory requirements and promotes best practices in data governance.

Azure offers several storage options, including Blob Storage, File Storage, Disk Storage, and Queue Storage. Blob Storage is ideal for unstructured data such as videos, backups, and large media files. It provides a high-performance, scalable solution that can handle massive amounts of unstructured data efficiently. On the other hand, Azure File Storage provides fully managed file shares in the cloud, allowing for easy integration with various applications and on-premises tools.

Azure offers scalable and secure storage options:

Blob Storage: Ideal for storing unstructured data like images, videos, and documents.
Azure Files: Provides fully managed file shares accessible via standard protocols.
Disk Storage: High-performance block storage for virtual machines.
Azure Data Lake Storage: Designed for big data analytics with massive datasets.

3. Networking Capabilities

For organizations prioritizing security, Azure’s network security features provide a comprehensive suite of tools. Azure Firewall and Network Security Groups (NSGs) are designed to manage and control incoming and outgoing network traffic based on specified rules. These tools not only protect applications from threats but also enhance compliance with regulatory requirements, instilling confidence among stakeholders regarding data integrity and protection.

Moreover, Azure’s VPN Gateway allows businesses to establish secure point-to-site and site-to-site connections, enabling remote workers and branch offices to access necessary resources without compromising security. This is particularly important in today’s world, where remote work has become more prevalent than ever. Azure’s ExpressRoute further enhances connectivity by offering dedicated private connections between on-premises infrastructure and Azure, reducing latency and increasing throughput for sensitive workloads.

Azure’s networking services ensure secure and reliable connectivity:

Virtual Network: Enables private and isolated cloud networks.
Azure Load Balancer: Distributes traffic to ensure high availability.
Azure ExpressRoute: Establishes private connections between Azure and on-premises data centers.
DNS: Provides domain name system hosting with high availability.

4. AI and Machine Learning

Azure Machine Learning stands out as a robust and comprehensive service that allows enterprises to build, train, and deploy machine learning models at scale. With a user-friendly interface, it caters to data science professionals and novices alike, enabling organizations to harness predictive analytics without requiring extensive expertise in the field. By utilizing these machine learning capabilities, businesses can anticipate market trends, understand customer behavior, and make informed strategic decisions.

Azure’s blend of AI and machine learning technologies seamlessly integrates with traditional business intelligence solutions. Tools like Power BI work in synergy with Azure’s machine learning capabilities, enabling users to visualize complex datasets dynamically. With Power BI, businesses can create interactive reports that not only present data but also highlight critical insights generated through machine learning models. This integration enhances the decision-making process by providing stakeholders with clear, visual representations of what the data reveals.

Azure integrates AI and machine learning tools to enhance business intelligence:

Azure Machine Learning: A cloud-based platform for building, training, and deploying ML models.
Cognitive Services: Pre-built AI models for vision, speech, and language processing.
Azure Databricks: A collaborative Apache Spark-based analytics platform.

5. Security and Compliance

One of the core components of Azure’s security strategy is its commitment to compliance with industry standards and regulations. Azure is compliant with a wide range of international and regional standards, such as ISO 27001, GDPR, HIPAA, and PCI DSS. These certifications reflect Azure’s dedication to adopting industry best practices, helping organizations meet their compliance requirements more efficiently.

Microsoft Azure continuously invests in security advancements. With integrated threat detection tools using artificial intelligence and machine learning, Azure can identify potential security threats in real-time. Azure Security Center plays a pivotal role in this regard by providing a centralized view of security across hybrid cloud workloads. This tool helps organizations to monitor, manage, and improve their security postures while keeping compliance requirements in check.

Microsoft Azure adheres to strict security standards, including:

Azure Active Directory (AD): Identity and access management for secure authentication.
Azure Security Center: Provides unified security management and threat protection.
Compliance Certifications: Meets global standards like GDPR, HIPAA, and ISO 27001.

Use Cases of Microsoft Azure

Microsoft Azure is a leading cloud computing platform that offers a wide range of services to businesses and individuals. Its flexibility, scalability, and security make it a preferred choice for various industries. Below are some of the most prominent use cases of Microsoft Azure, covering enterprise application development, data analytics, disaster recovery, IoT solutions, and gaming and media streaming.

Enterprise Application Designing

Azure provides a robust environment for developing, deploying, and managing enterprise applications. Businesses leverage Azure App Service to build web and mobile applications without worrying about infrastructure management. With support for multiple programming languages, including .NET, Java, Node.js, and Python, developers can create scalable applications tailored to business needs.

Azure Kubernetes Service (AKS) simplifies containerized application deployment, enabling enterprises to run microservices architectures efficiently. Additionally, Azure DevOps offers integrated tools for continuous integration and continuous delivery (CI/CD), streamlining the software development lifecycle. Enterprises benefit from Azure’s global data centers, ensuring low-latency access to applications worldwide.

Data Analytics and Big Data Processing

Organizations generate vast amounts of data daily, and Azure provides powerful tools to process and analyze this data effectively. Azure Synapse Analytics combines big data and data warehousing, allowing businesses to run complex queries on large datasets in real time.

Azure Data Lake Storage offers a scalable solution for storing structured and unstructured data, while Azure Databricks provides an Apache Spark-based analytics platform for machine learning and AI-driven insights. Businesses use these services to enhance decision-making, predict trends, and optimize operations.

Disaster Recovery and Backup

Downtime can be costly for businesses, making disaster recovery and backup solutions essential. Azure Site Recovery (ASR) enables organizations to replicate workloads to the cloud, ensuring business continuity in case of outages or disasters. Azure Backup provides secure, automated backups for on-premises and cloud-based data.

With geo-redundant storage options, Azure ensures data is replicated across multiple regions, minimizing the risk of data loss. Enterprises can perform failover testing without disrupting operations, making Azure a reliable choice for disaster recovery strategies.

Internet of Things (IoT) Solutions

Azure IoT Hub connects, monitors, and manages IoT devices at scale. Industries such as manufacturing, healthcare, and logistics use Azure IoT to collect and analyze sensor data in real time. Azure IoT Edge extends cloud intelligence to edge devices, enabling faster decision-making in remote locations.

Azure Digital Twins allows businesses to create digital models of physical environments, improving predictive maintenance and operational efficiency. By integrating AI and machine learning, Azure IoT solutions help organizations optimize processes and reduce costs.

Gaming and Media Streaming

The gaming industry benefits from Azure’s high-performance cloud infrastructure. Azure PlayFab provides backend services for multiplayer games, including player authentication, leaderboards, and in-game purchases. Game developers use Azure to scale resources dynamically, ensuring smooth gameplay experiences during peak demand.

For media streaming, Azure Media Services offers tools for encoding, streaming, and content protection. Companies like Netflix and Disney+ leverage Azure’s global content delivery network (CDN) to deliver high-quality video streams with minimal buffering. Azure’s AI-powered video indexing enhances content discoverability and accessibility.

Conclusion

By leveraging Microsoft Azure Cloud Service in Virginia, businesses can harness the power of the cloud to scale operations, enhance security, and drive innovation. Azure’s cost-efficiency, scalability, and seamless integration with Microsoft products make it an ideal choice for businesses in Virginia looking to modernize their IT infrastructure. However, to fully optimize Azure and ensure that your cloud environment meets your specific needs, partnering with a managed cloud service provider in New Jersey is essential. With their expertise, support, and proactive management, businesses can unlock the full potential of Microsoft Azure, drive growth, and stay competitive in an increasingly digital world.

The post Leveraging Microsoft Azure Cloud Services in Virginia for Business Growth appeared first on OneStop Shop.

Custom Mobile Application Development is becoming more and more popular; according to surveys, they save workers 7.5 hours per week on average, and 82% of business owners think they’ve enhanced earnings. Custom mobile apps may be modified in part or entirely to suit your business’s requirements. Instead of offering a service that meets the needs of a vast population with a variety of requirements, these apps appeal to a specific target audience.

Many Business Advantages of Custom Mobile Application Development

Today’s firms of all sizes, whether small, medium-sized, or large businesses, can maintain their competitiveness and boost productivity thanks to customized business apps. Some of the most well-liked benefits of mobile application development for organizations include the following.

Enhances Effectiveness

Business applications work as a single, all-encompassing piece of software that can perform a variety of duties, obviating the need for several apps because they were developed with the needs of your firm in mind. Because they are made to fit your working style, these applications help increase employee productivity, which is great for businesses. provide high ROI scalability

Applications that are used frequently control a small number of resources and operations. These apps might not be able to handle the demand if your business were to expand.

Security of Data for Applications

Common business apps probably lack specialized security safeguards, endangering your company’s data security. Your data security system will improve if you have a custom app made just for your business since the needs of your business will be taken into consideration during the app development process.

Integrates With Existing Software

Your current software and typical business apps might work together without any complications. Because they are created concerning the business software you already use, custom apps are ensured to integrate correctly and operate without any issues.

Easily maintained

You run the danger of putting yourself in the hands of a dishonest mobile app developer if you use traditional apps for your regular business activities. You will need to locate a new app and stop using your existing one if the creator decides to stop supporting the app for whatever reason. You may take full control of your company app and stop depending on third parties by creating one.

Improves Consumer Communications

You can provide your present clients with real-time, customized updates on your goods and services with the use of customized business applications.

Allows data to be retrieved from new clients

You can gather crucial client data by including simple questionnaires and surveys in the custom mobile application. It functions as a covert method of data collection in addition to saving clients and staff time by removing the requirement for them to physically submit the papers.

Instantly permits projects access

Having quick access to all of your work documents is helpful when traveling. With a custom-created app for your business, you can effortlessly connect your phone and desktop and access all of your work-related data, projects, calendars, etc. Additionally, getting contracts and brochures that you can give to your clients is simple when you use specialized business apps.

Project management is simple

Project deadlines and progress can be tracked in real-time using customized apps that can be loaded. Updates can be sent following the conclusion of each project phase, maintaining the payment cycle.

Make digital records in support of accountability

You can quickly take notes on the phone for dictation if the ideas and thoughts are pertinent to your consumer. After then, these recordings can be immediately stored in secure locations and will only be visible to authorized individuals. By doing this, you may increase responsibility and offer better customer service.

During Custom Mobile Application Development, Consider the Following:

Bespoke app solutions must be thoroughly studied before being implemented due to the market environment, rapidly changing mobile platforms and the requirement for quick turnaround. Consider a few factors before building a unique mobile app for your business.

Faster Time to Market – For custom business apps to go to market quickly, they need to be inexpensive and produced quickly.

Greater Efficiency – The custom apps need to be modified and mended for greater efficiency to ensure that the final solution is successful and improves.

Many Network Compatibility – To ensure that the created app works properly on various networks in various regions, it must be tested for multiple operators.

Data security – Since the majority of apps are made to be used by many people, they need to offer strong authentication and secure data access.

Battery Life – Because people dislike apps that drain their batteries quickly, it is important to consider how the app affects battery life.

Impressive UI/UX – The custom app should have a lovely user interface and provide users with an excellent user experience.

Effective Data Synchronization – The application must be able to reliably and at the right frequency synchronize data with the server.

A streamlined communication channel, such as texting, WAP, or another protocol, must be available in the app.

Trends for Custom Mobile Application Development

Build Your App (BYOA) is a development of the bring your device (BYOD) idea as a result of the increasing consumerization of information technology. Although BYOA enables employees to use better work apps, it can also be seen as a huge security issue. Employees will use mobile or cloud apps if they have little control over how their data is stored, accessed, or used.

The post Custom Mobile Application Development benefits appeared first on OneStop Shop.

When looking for a business solution to help you launch a new business online or run an existing one efficiently, you should think of an e-commerce platform. A Microsoft e-commerce platform is a business solution suite built on ASP.NET architecture with a myriad of features to help entrepreneurs create online pages, add and edit products, sell to customers, and process payments, among other operations.

Reliable Microsoft e-commerce platforms may also separate the business front end and back end to promote more focus on customers and products. If you have heard of headless e-commerce, this is it. With this introduction, you now know some of the features to check for your business. But let’s discuss these more in detail.

Tools to Promote Online Business

The Microsoft e-commerce platform you choose should be equipped with tools to help you operate online. They include the following.

Web page creation tools – Whether you need to create a unique webshop or use existing markets, the platform you choose should facilitate this efficiently. On the same note, it should make it possible to produce descriptions, images, and change them without challenges.

Marketing tools – When you want to drive revenue to your business, you need to market the business efficiently. A good .NET platform should come with SEO and other marketing tools to promote the business efficiently.

Payment processing engine – Whether you are integrated with places or using any other webshop, it is the responsibility of the Microsoft e-commerce platform to help process payments securely and accurately. So, ensure that it has this feature.

These features perfectly suit Virto Commerce, which is an ASP.NET commerce platform that you may want to consider right now for your business.

Cloud-Based

Today, most businesses solutions are operated online. They are called cloud-based, which is where remote servers store the data and can present it via the internet anywhere in the world. An appropriate Microsoft e-commerce platform should function online and provide cloud-based solutions. With these, entrepreneurs can operate from anywhere using their internet-connected laptops, tablets, or mobile phones.

Integration

It is better when the Microsoft e-commerce platform you choose can work with other online solutions. This happens through integration, which gives you more features and tools to utilize. These could be markets, marketing platforms, or other partners.

If you happen to follow up on the integration, ensure that they add value to your online business. This means you should be able to access and utilize them as soon as you subscribe to the platform.

Data Processing Capability

We live in a world full of data. Any online business processes a lot of data every minute from customer buying habits to stocks and finances. A good Microsoft e-commerce platform should have the mechanism to collect, store, analyze, and report on data efficiently.

Luckily, all ASP.NET Microsoft e-commerce platforms are designed to handle a large amount of data, so they are efficient for any business. And since they are cloud-based, you can access the data securely from any location.

Conclusion

Even as we conclude, it is worth mentioning that the cost of subscribing to the platform is very important. All ASP.NET platforms are affordable because the programming architecture is also affordable. So, your main focus should be on the features we have discussed.

The post Microsoft E-Commerce Platform features for Businesses appeared first on OneStop Shop.

Gridview is an awesome Control to display data in Tabular shape. Let’s assume while displaying records in a Gridview Customer wants to re-order the records. In such scenario row Drag and Drop feature works great. In back-end to maintain Order of records here I am with a column in Excel. Using order by with a SQL query I am displaying the records in Sequence.

Understanding Drag and Drop Functionality

Drag and drop is an intuitive user interface feature that allows users to move or reorder elements by clicking, holding, and dragging them to a new location. This functionality enhances user experience by simplifying interactions, reducing the need for manual input, and improving efficiency.

In this example I am with a Gridview control “gvLocations”. Which displaying data from an excel file using OLEDB connection. Code for Gridview is as below.

Gridview

<asp:GridView ID="gvLocations" runat="server" AutoGenerateColumns="false">
<Columns>
<asp:TemplateField HeaderText="Id" ItemStyle-Width="30">
<ItemTemplate>
<%# Eval("ID")%>
<input type="hidden" name="LocationId" value='<%# Eval("ID") %>' />
</ItemTemplate>
</asp:TemplateField>

<asp:BoundField DataField="Location" HeaderText="Location" ItemStyle-Width="150" />

<asp:BoundField DataField="Order" HeaderText="Order" ItemStyle-Width="100" />
</Columns>
</asp:GridView>
<br />
<asp:Button Text="Update Preference" runat="server" OnClick="UpdatePreference" />

To implement Drag and Drop over a Gridview. In the below section I am using jQuery. To add this in your app, embed the jQuery library files in your app and Copy the below JQ Function to the header part of your aspx page.

Drag and Drop using Jquery

<script type="text/javascript" src="https://ajax.googleapis.com/ajax/libs/jquery/1.8.3/jquery.min.js"></script>
<link rel="stylesheet" href="https://ajax.googleapis.com/ajax/libs/jqueryui/1.8.24/themes/smoothness/jquery-ui.css" />
<script type="text/javascript" src="https://ajax.googleapis.com/ajax/libs/jqueryui/1.8.24/jquery-ui.min.js"></script>
<script type="text/javascript">
$(function () {
$("[id*=gvLocations]").sortable({
items: 'tr:not(tr:first-child)',
cursor: 'pointer',
axis: 'y',
dropOnEmpty: false,
start: function (e, ui) {
ui.item.addClass("selected");
},
stop: function (e, ui) {
ui.item.removeClass("selected");
},
receive: function (e, ui) {
$(this).find("tbody").append(ui.item);
}
});
});
</script>

In Code behind I am 3 subroutines BindGrid, UpdatePreference and UpdatePreference with different signature. Whie page load if page is not postback I am calling the BindGrid() subroutine. Which help to display records in the Grid. Drag and Drop happening using the above Jquery Code. Now after re-ordering while I am updating the Excel. For this I have a button “Update Preference” in my aspx page. Onclick of this button I am calling UpdatePreference() subroutine. From 2 UpdatePreference() subroutine first one is responsible to extract id and order. Then from this I am calling the another UpdatePreference(locationId, order). Which updating records in Excel File using the Loop defined at UpdatePreference.

Code-behind

Imports System.IO
Imports System.Data.OleDb
Imports System.Data
Imports System.Configuration

Partial Class _Default
Inherits System.Web.UI.Page

Dim FilePath As String = "C:\Users\biswabhusan_panda\Documents\Visual Studio 2013\WebSites\KShop\Files\temp.xlsx"
Dim Extension As String = ".xlsx"

Dim ConStr As String = ConfigurationManager.ConnectionStrings("ConnString").ConnectionString()

Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
If Not IsPostBack Then
Me.BindGrid(FilePath, Extension)
End If
End Sub

Private Sub BindGrid(ByVal FilePath As String, ByVal Extension As String)

ConStr = String.Format(ConStr, FilePath)

Dim connExcel As New OleDbConnection(ConStr)
Dim cmdExcel As New OleDbCommand()
Dim oda As New OleDbDataAdapter()
Dim dtbl As New DataTable()

cmdExcel.Connection = connExcel

'Get the name of First Sheet 
connExcel.Open()

Dim dtExcelSchema As DataTable
dtExcelSchema = connExcel.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, Nothing)
Dim SheetName As String = dtExcelSchema.Rows(0)("TABLE_NAME").ToString()

connExcel.Close()

'Read Data from First Sheet 
connExcel.Open()

cmdExcel.CommandText = "SELECT * From [" & SheetName & "]"

oda.SelectCommand = cmdExcel
oda.Fill(dtbl)
connExcel.Close()

'Bind Data to GridView 
gvLocations.DataSource = dtbl
gvLocations.DataBind()

End Sub

Protected Sub UpdatePreference(sender As Object, e As EventArgs)
Dim locationIds As String() = (From p In Request.Form("LocationId").Split(",") Select p).ToArray()
Dim order As Integer = 1

For Each locationId As Integer In locationIds
Me.UpdatePreference(locationId, order)
order += 1
Next

Response.Redirect(Request.Url.AbsoluteUri)
End Sub

Private Sub UpdatePreference(locationId As Integer, order As Integer)

ConStr = String.Format(ConStr, FilePath)

Dim connExcel As New OleDbConnection(ConStr)
Dim cmdExcel As New OleDbCommand()
Dim oda As New OleDbDataAdapter()
Dim dtbl As New DataTable()

cmdExcel.Connection = connExcel

'Get the name of First Sheet 
connExcel.Open()

Dim dtExcelSchema As DataTable
dtExcelSchema = connExcel.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, Nothing)
Dim SheetName As String = dtExcelSchema.Rows(0)("TABLE_NAME").ToString()

connExcel.Close()

'Read Data from First Sheet
connExcel.Open()

cmdExcel.CommandText = "UPDATE [" & SheetName & "] SET Order='" & order & "' WHERE ID=" & locationId & ""
cmdExcel.ExecuteNonQuery()
connExcel.Close()

End Sub
End Class

Web.Config

<connectionStrings>
<!--<add name ="Excel03ConString" connectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source={0}; Extended Properties='Excel 8.0'" />-->
<add name ="ConnString" connectionString="Provider=Microsoft.ACE.OLEDB.12.0;Data Source={0}; Extended Properties='Excel 8.0'"/>
</connectionStrings>

Common Challenges and Solutions

1. Performance Issues with Large Datasets For grids with many items, consider:

– Virtual scrolling to render only visible items.
– Debouncing drag events to reduce unnecessary re-renders.

2. Cross-Browser Compatibility Test the implementation across browsers and use polyfills if needed for older versions.

Use Cases

1. Content Management Systems: Reordering images or articles in a gallery.
2. Task Management Apps: Prioritizing tasks by dragging them up or down.
3. E-Commerce Platforms: Rearranging product listings.

Conclusion

Implementing drag and drop in a GridView enhances usability by allowing users to intuitively rearrange data. By following the steps outlined above, developers can create a seamless and interactive experience. Proper handling of events, styling, and persistence ensures the feature works reliably across different platforms and devices. With these techniques, you can build dynamic applications that improve user engagement and efficiency.

The post How to Rearrange Rows in a Gridview using Drag and Drop? appeared first on OneStop Shop.

Whether in a banking application or a job portal every where we required to authenticate user before allowing access. Or else Spam user can destroy our properties. In the login mechanism of ASP.NET using Form Authentication we can validate an user. During Forms Authentication ASP.NET authenticates user and maintains authentication token in a cookie for next consecutive actions. During page request the cookie travels with URL. In a ASP.NET page cycle Form Authentication participate through the FormsAuthenticationModule class.

To implement Form Authentication first you required to update you web.config file with the following line of Codes. In forms tag set loginUrl property value to Login page file path. Then to block anonymous users from unknown login set Authorization to deny All. Syntax for deny all is <deny users=”?” />.

Web.Config

<system.web>
<authentication mode="Forms">
<forms loginUrl="login.aspx" name=".lgnConfig">
</forms>
</authentication>
<authorization>
<deny users="?" />
</authorization>
</system.web>

In Login.aspx after validating user credentials, redirecting the logged user to default page using “RedirectFromLoginPage” method.

Login.aspx

<%@ Page Language="VB" %>
<%@ Import Namespace="System.Web.Security" %>

<script runat="server">
Sub Login_Click(ByVal sender As Object, ByVal e As EventArgs)
If ((txtEmailID.Text = "biswabhusan_panda@infosys.com") And _
(UserPass.Text = "raghavi")) Then
FormsAuthentication.RedirectFromLoginPage _
(txtEmailID.Text, chkRemember.Checked)
Else
lblMsg.Text = "Invalid credentials. Please try again."
End If
End Sub
</script>

<html>
<head id="Head1" runat="server">
<title>Exmple of Forms Authentication</title>
</head>
<body>
<form id="frmLogin" runat="server">
<h3>User Login Page</h3>
    
<div>E-mail ID</div>
<div><asp:TextBox ID="txtEmailID" runat="server" /><asp:RequiredFieldValidator ID="rfEmailID" ControlToValidate=" txtEmailID" Display="Dynamic" ErrorMessage="Empty values are not allow." runat="server" /><div>

<div>Password</div>
<div><asp:TextBox ID="txtPassword" TextMode="Password" runat="server" /><asp:RequiredFieldValidator ID="rfPassword" ControlToValidate="txtPassword" ErrorMessage=" Empty values are not allow." runat="server" />
</div>

<div><asp:CheckBox ID="chkRemember" runat="server" />&nbsp;Remember for Next Login</div>
<div><asp:Button ID="btnLogin" OnClick="Login_Click" Text="Log in" runat="server" /></div>
<div><asp:Label ID="lblMsg" ForeColor="red" runat="server" /></div>
</form>
</body>
</html>

Once user is at default page, In default page provided Signout button. Which destroys authenticated cookie using FormsAuthentication.SignOut method.

Default.aspx

<%@ Page Language="VB" %>
<html>
<head>
<title>Successful Forms Authentication</title>
</head>

<script runat="server">
Sub Page_Load(ByVal Src As Object, ByVal e As EventArgs)
lblWelcomeMsg.Text = "Welcome, " & Context.User.Identity.Name
End Sub

Sub Signout_Click(ByVal sender As Object, ByVal e As EventArgs)
FormsAuthentication.SignOut()
Response.Redirect("Login.aspx")
End Sub
</script>

<body>
<h3>Example of Forms Authentication</h3>
<asp:Label ID="lblWelcomeMsg" runat="server" />
<form id="frmDefault" runat="server">
<asp:Button ID="btnSignOut" OnClick="Signout_Click" Text="Sign Out" runat="server" /><p>
</form>
</body>
</html>

The post How to implement Forms Authentication in ASP.NET? appeared first on OneStop Shop.

In ASP.NET there are several controls to present data in a web page. Some of the popular data controls are GridView, ListView, DetailsView, FormView, Repeater or SQLDataSource. If you will notice in the recent versions of Visual Studio you will watch DataPager as a Data Control. Like a Gridview using DataPager Control we can present data in tabular shape. Look at the example below where I am binding data to a DataPager control inside a ListView Control.

To enable users to page through data in a ListView control or a control which implements IPageableItemContainer interface, we can use DataPager control in ASP.NET. While declaring a DataPager Control declare it inside LayoutTemplate. If your DataPager Control is not inside the ListView control then you need to set PagedControlID property value to ListView control ID.

ListView from Default.aspx

<asp:ListView ID="lvEmployees" runat="server" GroupPlaceholderID="grpPlaceHoder"
ItemPlaceholderID="itemPlaceHolder" OnPagePropertiesChanging="OnPropertiesChanging">
<LayoutTemplate>
<table cellpadding="0" cellspacing="0">
<tr>
<th>Emp ID</th>
<th>Emp Name</th>
<th>Status</th>
</tr>
<asp:PlaceHolder runat="server" ID="grpPlaceHoder"></asp:PlaceHolder>
<tr>
<td colspan="3">
<asp:DataPager ID="dpager" runat="server" PagedControlID="lvEmployees" PageSize="10">
<Fields>
<asp:NextPreviousPagerField ButtonType="Link" ShowFirstPageButton="false" ShowPreviousPageButton="true"
ShowNextPageButton="false" />
<asp:NumericPagerField ButtonType="Link" />
<asp:NextPreviousPagerField ButtonType="Link" ShowNextPageButton="true" ShowLastPageButton="false" ShowPreviousPageButton="false" />
</Fields>
</asp:DataPager>
</td>
</tr>
</table>
</LayoutTemplate>
<GroupTemplate>
<tr>
<asp:PlaceHolder runat="server" ID="itemPlaceHolder"></asp:PlaceHolder>
</tr>
</GroupTemplate>
<ItemTemplate>
<td><%# Eval("ID")%></td>
<td><%# Eval("Name")%></td>
<td><%# Eval("Status") %></td>
</ItemTemplate>
</asp:ListView>

Code-behind Default.aspx.vb

Imports System.IO
Imports System.Data.OleDb
Imports System.Data

Partial Class _Default
Inherits System.Web.UI.Page

Dim FilePath As String = "C:\Users\biswabhusan_panda\Documents\Visual Studio 2013\WebSites\ExcelApp\Files\temp.xlsx"
Dim Extension As String = ".xlsx"

Dim ConStr As String = ConfigurationManager.ConnectionStrings("ConnString").ConnectionString()

Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
If Not Me.IsPostBack Then
Me.BindListView(FilePath, Extension)
End If
End Sub

Protected Sub OnPropertiesChanging(sender As Object, e As PagePropertiesChangingEventArgs)
TryCast(lvEmployees.FindControl("dpager"), DataPager).SetPageProperties(e.StartRowIndex, e.MaximumRows, False)
Me.BindListView(FilePath, Extension)
End Sub

Private Sub BindListView(ByVal FilePath As String, ByVal Extension As String)

ConStr = String.Format(ConStr, FilePath)

Dim connExcel As New OleDbConnection(ConStr)
Dim cmdExcel As New OleDbCommand()
Dim oda As New OleDbDataAdapter()
Dim dtbl As New DataTable()

cmdExcel.Connection = connExcel

'Get the name of First Sheet 
connExcel.Open()

Dim dtExcelSchema As DataTable
dtExcelSchema = connExcel.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, Nothing)
Dim SheetName As String = dtExcelSchema.Rows(0)("TABLE_NAME").ToString()

connExcel.Close()

'Read Data from First Sheet 
connExcel.Open()

cmdExcel.CommandText = "SELECT * From [" & SheetName & "]"

oda.SelectCommand = cmdExcel
oda.Fill(dtbl)
connExcel.Close()

'Bind Data to GridView 
lvEmployees.DataSource = dtbl
lvEmployees.DataBind()

End Sub
End Class

The post How to Bind Data to DataPager inside ListView Control in ASP.NET? appeared first on OneStop Shop.

In ASP.NET Gridview is a best approach to present Tabular data. Looking into the advanced functionalities of a Gridview control using this you can fetch data from any data media like SQL, MySQL or even an Excel File. In the below demo I have an Excel File with 5 columns of data. Using Gridview we are presenting those excel records in tabular shape on a web page.

To try the below demo, Create an ASP.NET Web Application. Then to prepare data open an Excel File. Add any 5 columns of data with single word header. Name the File as temp.xlsx. Then in your application under root folder create a folder named as “FILES”. Move the temp.xlsx File inside. To debug the below app in your new app, Add the Default.aspx file with it’s code-behind file in VB.NET. To get started Copy the below Gridview Control in your Default.aspx page.

Gridview using Auto Generate Edit Button

<asp:GridView ID="grdRecords" runat="server" AutoGenerateColumns="false" AutoGenerateEditButton="true" AllowPaging="true" PageSize="20" Font-Names="Arial" Font-Size="11pt" AlternatingRowStyle-BackColor="#C2D69B" HeaderStyle-BackColor="green" HeaderStyle-ForeColor="#FFFFFF" OnPageIndexChanging="OnPaging" Width="100%">
<Columns>
<asp:TemplateField HeaderText="Emp Name">
<ItemTemplate>
<asp:Label ID="lblEmpName" runat="server" Text='<%# Bind("Name")%>'></asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Emp ID">
<ItemTemplate>
<asp:Label ID="lblEmpID" runat="server" Text='<%# Bind("ID")%>'></asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Status">
<EditItemTemplate>
<asp:DropDownList ID="ddlRowStatus" runat="server" AutoPostBack="true">
<asp:ListItem>thisis</asp:ListItem>
</asp:DropDownList>
</EditItemTemplate>
<ItemTemplate>
<%# Eval("Status") %>
</ItemTemplate>
</asp:TemplateField> 
<asp:TemplateField HeaderText="Starts">
<ItemTemplate>
<asp:Label ID="lblStarts" runat="server" Text='<%# Bind("Starts")%>'></asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Ends">
<ItemTemplate>
<asp:Label ID="lblEnds" runat="server" Text='<%# Bind("Ends")%>'></asp:Label>
</ItemTemplate>
</asp:TemplateField>                   
</Columns>
</asp:GridView>

You must noticed here how I am binding data to the above Gridview. Status Field is the Field which I want to edit using Auto Generate Edit Button. That’s why inside template field for this column I am with 2 sub-entries ItemTemplate and EditItemTemplate. EditItemTemplate holding that control which will display in the place of Status column at the time of Edit.

The below Code is from the Code-behind File. Logic is very simple. Using BindGrid() sub-routine we are displaying records in the Grid. 3 more gridview events I used grdRecords_RowCancelingEdit, grdRecords_RowDataBound, grdRecords_RowUpdating. Using RowCancelingEdit() event I am handling the Cancel button functionalities. While using RowDataBound() we are binding data for Status dropdownlist in Grid. Finally after user Edit the record we are updating the Excel File under RowUpdating() event. FilePath and Extention these two are used as parameters in many Functions. That’s why it is declared as global variable.

Code-behind Codes for Gridview using Edit button

Imports System.IO
Imports System.Data.OleDb
Imports System.Data

Partial Class _Default
Inherits System.Web.UI.Page

Dim FilePath As String = "C:\Users\biswabhusan_panda\Documents\Visual Studio 2013\WebSites\ExcelApp\Files\temp.xlsx"
Dim Extension As String = ".xlsx"
Dim ddlRowStatus As DropDownList

Dim ConStr As String = ConfigurationManager.ConnectionStrings("ConnString").ConnectionString()

Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
ViewState("Filter") = "ALL"
BindGrid(FilePath, Extension)
End If
End Sub

Protected Sub OnPaging(sender As Object, e As GridViewPageEventArgs)
grdRecords.PageIndex = e.NewPageIndex
Me.BindGrid(FilePath, Extension)
End Sub

Private Sub BindGrid(ByVal FilePath As String, ByVal Extension As String)

ConStr = String.Format(ConStr, FilePath)

Dim connExcel As New OleDbConnection(ConStr)
Dim cmdExcel As New OleDbCommand()
Dim oda As New OleDbDataAdapter()
Dim dtbl As New DataTable()

cmdExcel.Connection = connExcel

'Get the name of First Sheet 
connExcel.Open()

Dim dtExcelSchema As DataTable
dtExcelSchema = connExcel.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, Nothing)
Dim SheetName As String = dtExcelSchema.Rows(0)("TABLE_NAME").ToString()

connExcel.Close()

'Read Data from First Sheet 
connExcel.Open()

If ViewState("idFilter") <> "" Then
cmdExcel.CommandText = "SELECT * From [" & SheetName & "] WHERE ID LIKE '%" & ViewState("idFilter").ToString() & "%'"
ElseIf ViewState("nameFilter") <> "" Then
cmdExcel.CommandText = "SELECT * From [" & SheetName & "] WHERE NAME LIKE '%" & ViewState("nameFilter").ToString() & "%'"
Else
If ViewState("Filter").ToString() = "ALL" Then
cmdExcel.CommandText = "SELECT * From [" & SheetName & "]"
Else
cmdExcel.CommandText = "SELECT * From [" & SheetName & "] WHERE Status='" & ViewState("Filter").ToString() & "'"
End If
End If

oda.SelectCommand = cmdExcel
oda.Fill(dtbl)
connExcel.Close()

'Bind Data to GridView 
grdRecords.DataSource = dtbl
grdRecords.DataBind()

End Sub

Protected Sub grdRecords_RowCancelingEdit(sender As Object, e As GridViewCancelEditEventArgs) Handles grdRecords.RowCancelingEdit
grdRecords.EditIndex = -1
Me.BindGrid(FilePath, Extension)
End Sub

Protected Sub grdRecords_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles grdRecords.RowDataBound

If e.Row.RowType = DataControlRowType.DataRow Then
If (e.Row.RowState And DataControlRowState.Edit) > 0 Then
ddlRowStatus = DirectCast(e.Row.FindControl("ddlRowStatus"), DropDownList)

If (ddlRowStatus.ID = "ddlRowStatus") Then

Dim list As New ArrayList

ConStr = String.Format(ConStr, FilePath)

Dim ConnExcel As New OleDbConnection(ConStr)
Dim CmdA As New OleDbCommand()
Dim CmdB As New OleDbCommand()
Dim oda As New OleDbDataAdapter()
Dim dtbl As New DataTable()

CmdA.Connection = ConnExcel
CmdB.Connection = ConnExcel

'Get the name of First Sheet 
ConnExcel.Open()

Dim dtExcelSchema As DataTable
dtExcelSchema = ConnExcel.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, Nothing)
Dim SheetName As String = dtExcelSchema.Rows(0)("TABLE_NAME").ToString()

ConnExcel.Close()

'Read Data from First Sheet 
ConnExcel.Open()

CmdA.CommandText = "SELECT DISTINCT Status From [" & SheetName & "]"

Dim reader As OleDbDataReader = CmdA.ExecuteReader()

If reader.HasRows Then
Do While reader.Read()
list.Add(reader(0).ToString())
Loop
End If

reader.Close()

ddlRowStatus.DataSource = list
ddlRowStatus.DataBind()
End If
End If
End If
End Sub

Protected Sub grdRecords_RowEditing(sender As Object, e As GridViewEditEventArgs) Handles grdRecords.RowEditing
grdRecords.EditIndex = e.NewEditIndex
Me.BindGrid(FilePath, Extension)
End Sub

Protected Sub grdRecords_RowUpdating(sender As Object, e As GridViewUpdateEventArgs) Handles grdRecords.RowUpdating

ddlRowStatus = DirectCast(grdRecords.Rows(e.RowIndex).FindControl("ddlRowStatus"), DropDownList)
Dim lblEmpID As Label = DirectCast(grdRecords.Rows(e.RowIndex).FindControl("lblEmpID"), Label)

ConStr = String.Format(ConStr, FilePath)

Dim connExcel As New OleDbConnection(ConStr)
Dim cmdExcel As New OleDbCommand()
Dim oda As New OleDbDataAdapter()
Dim dtbl As New DataTable()

cmdExcel.Connection = connExcel

'Get the name of First Sheet 
connExcel.Open()

Dim dtExcelSchema As DataTable
dtExcelSchema = connExcel.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, Nothing)
Dim SheetName As String = dtExcelSchema.Rows(0)("TABLE_NAME").ToString()

connExcel.Close()

'Read Data from First Sheet 
connExcel.Open()

cmdExcel.CommandText = "UPDATE [" & SheetName & "] SET Status='" & ddlRowStatus.SelectedValue & "' WHERE ID=" & lblEmpID.Text.ToString() & ""
cmdExcel.ExecuteNonQuery()
connExcel.Close()

grdRecords.EditIndex = -1
Me.BindGrid(FilePath, Extension)

End Sub

End Class

The post How to update records in a Gridview using Auto Generate Edit Button? appeared first on OneStop Shop.

Due to the popularity of MS Excel, Still today more than 75% of Organizations prefers to maintain their data in MS-Excel. Whether it’s the matter of project management or a budget plan, MS-Excel is an awesome tool. I noticed in my organization more then 80% percent records are in Excel. One day my boss come to me with a plan that he need to update “Utilization_Reports.xlsx” using User Interface. For him I had taken the ownership to develop this tool. During this development phases I found how to fetch data from an Excel File like a database table using SQL Queries. This stay interesting for me. Sharing the same for your reference.

Gridview

<asp:GridView ID="grdRecords" runat="server" AutoGenerateColumns="false" AllowPaging="true" PageSize="10" Font-Names="Arial" Font-Size="11pt" AlternatingRowStyle-BackColor="#C2D69B" HeaderStyle-BackColor="green" HeaderStyle-ForeColor="#FFFFFF" OnPageIndexChanging="OnPaging" AutoGenerateEditButton="true" Width="100%">
<Columns>
<asp:TemplateField  HeaderText="Employee Name" SortExpression="Name">
<ItemTemplate>
<asp:Label ID="lblEmpName" runat="server" Text='<%# Bind("Name")%>'></asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Employee ID" SortExpression="ID">
<ItemTemplate>
<asp:Label ID="lblEmpID" runat="server" Text='<%# Bind("ID")%>'></asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>
Status:
<asp:DropDownList ID="ddlStatus" runat="server" OnSelectedIndexChanged="CountryChanged" AutoPostBack="true" AppendDataBoundItems="true">
<asp:ListItem Text = "ALL" Value = "ALL"></asp:ListItem>
</asp:DropDownList>
</HeaderTemplate>
<EditItemTemplate>
<asp:DropDownList ID="ddlRowStatus" runat="server" AutoPostBack="true">
<asp:ListItem>thisis</asp:ListItem>
</asp:DropDownList>
</EditItemTemplate>
<ItemTemplate>
<%# Eval("Status") %>
</ItemTemplate>
</asp:TemplateField>                    
</Columns>
</asp:GridView>

As we mentioned above here I want to fetch an excel file like a database table. So first let us declare the connection string for MS-Excel. That’s what I did in below web.config file.

Web.Config

<appSettings>
<add key="FolderPath" value="Files/"/>
</appSettings>
<connectionStrings>
<!--<add name ="Excel03ConString" connectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source={0}; Extended Properties='Excel 8.0'" />-->
<add name ="ConnString" connectionString="Provider=Microsoft.ACE.OLEDB.12.0;Data Source={0}; Extended Properties='Excel 8.0'"/>
</connectionStrings>

To bind data to the Gridview in Codebehind I am with the below Subroutine. In BindGrid I am passing FilePath and File Extention as the parameters. These are simple string varibales. Declare as global variables. To fetch data from Excel like a database First I am traking the 0th Sheet of Excel. Then running a SQL Query over the table of my Excel File. Finally using a ASP.NET DataAdapter I am filling data to the gridview.

BindGrid

Private Sub BindGrid(ByVal FilePath As String, ByVal Extension As String)

ConStr = String.Format(ConStr, FilePath)

Dim connExcel As New OleDbConnection(ConStr)
Dim cmdExcel As New OleDbCommand()
Dim oda As New OleDbDataAdapter()
Dim dtbl As New DataTable()

cmdExcel.Connection = connExcel

'Get the name of First Sheet 
connExcel.Open()

Dim dtExcelSchema As DataTable
dtExcelSchema = connExcel.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, Nothing)
Dim SheetName As String = dtExcelSchema.Rows(0)("TABLE_NAME").ToString()

connExcel.Close()

'Read Data from First Sheet 
connExcel.Open()

If ViewState("Filter").ToString() = "ALL" Then
cmdExcel.CommandText = "SELECT * From [" & SheetName & "]"
Else
cmdExcel.CommandText = "SELECT * From [" & SheetName & "] WHERE Status='" & ViewState("Filter").ToString() & "'"
End If

oda.SelectCommand = cmdExcel
oda.Fill(dtbl)
connExcel.Close()

'Bind Data to GridView 
grdRecords.DataSource = dtbl
grdRecords.DataBind()

End Sub

The above subroutine is responsible to Fill the Gridview. But to display data in Gridview we need to Call this during page load. That’s what I am doing in below. Inside the not page.ispostback event I am calling the Function with required parameters.

In Page Load

Dim FilePath as String = "C:/demo.xlsx"
Dim Extension as String = ".xlsx"

If Not Page.IsPostBack Then
ViewState("Filter") = "ALL"
BindGrid(FilePath, Extension)
End If

The post How to display Excel File records in an ASP.NET Gridview? appeared first on OneStop Shop.

We use filter to Search information’s easier. Recall a web-page where you have lot of records in a Grid. What your Customer wants is “They want to provide Search filter in the header row for some columns of the grid”. You can say like MS-Excel column filter. Here my app is with ASP.NET. To display data I am using a Gridview. Here in Gridview I am with 3 columns Name, ID and Status. Refer to my Customer they wants me to implement a dropdownlist with all the possible status in Status column header. Functionally, On change of dropdownlist event he wants to filter only those records which are having the selected Status.

Look at the below demo app. Here in place of database I am fetching data from a MS-Excel file. Data structure I maintained in Excel file is with 3 columns Name, ID and Status. Similar to a database table here Emp ID acts like the Primary Key. This is unique for each.

Gridview

<asp:GridView ID="grdRecords" runat="server" AutoGenerateColumns="false" AllowPaging="true" PageSize="10" Font-Names="Arial" Font-Size="11pt" AlternatingRowStyle-BackColor="#C2D69B" HeaderStyle-BackColor="green" HeaderStyle-ForeColor="#FFFFFF" OnPageIndexChanging="OnPaging" AutoGenerateEditButton="true" Width="100%">
<Columns>
<asp:TemplateField  HeaderText="Employee Name" SortExpression="Name">
<ItemTemplate>
<asp:Label ID="lblEmpName" runat="server" Text='<%# Bind("Name")%>'></asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Employee ID" SortExpression="ID">
<ItemTemplate>
<asp:Label ID="lblEmpID" runat="server" Text='<%# Bind("ID")%>'></asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>
Status:
<asp:DropDownList ID="ddlStatus" runat="server" OnSelectedIndexChanged="CountryChanged" AutoPostBack="true" AppendDataBoundItems="true">
<asp:ListItem Text = "ALL" Value = "ALL"></asp:ListItem>
</asp:DropDownList>
</HeaderTemplate>
<EditItemTemplate>
<asp:DropDownList ID="ddlRowStatus" runat="server" AutoPostBack="true">
<asp:ListItem>thisis</asp:ListItem>
</asp:DropDownList>
</EditItemTemplate>
<ItemTemplate>
<%# Eval("Status") %>
</ItemTemplate>
</asp:TemplateField>                    
</Columns>
</asp:GridView>

Like the general, to bind data to the grid I am calling BindGrid() subroutine under page_load. Additionally I am with 1 more sub-routine BindCountryList() which responsible to display all possible Status from Excel File. To reset custom search in 0th index of dropdownlist I added “ALL”. By changing dropdownlist selected value to “ALL”, it is updating a ViewState variable. Which conditionally filtering using a SQL Query in BindGrid() subroutine.

VB.NET Code Behind

Imports System.IO
Imports System.Data.OleDb
Imports System.Data

Partial Class _Default
Inherits System.Web.UI.Page

Dim FilePath As String = "C:\Users\biswabhusan_panda\Documents\Visual Studio 2013\WebSites\ExcelApp\Files\temp.xlsx"
Dim Extension As String = ".xlsx"

Dim ConStr As String = ConfigurationManager.ConnectionStrings("ConnString").ConnectionString()

Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
ViewState("Filter") = "ALL"
BindGrid(FilePath, Extension)
End If
End Sub

Protected Sub OnPaging(sender As Object, e As GridViewPageEventArgs)
grdRecords.PageIndex = e.NewPageIndex
Me.BindGrid(FilePath, Extension)
End Sub

Protected Sub CountryChanged(ByVal sender As Object, ByVal e As EventArgs)
Dim ddlStatus As DropDownList = DirectCast(sender, DropDownList)
ViewState("Filter") = ddlStatus.SelectedValue
Me.BindGrid(FilePath, Extension)
End Sub

Private Sub BindGrid(ByVal FilePath As String, ByVal Extension As String)

ConStr = String.Format(ConStr, FilePath)

Dim connExcel As New OleDbConnection(ConStr)
Dim cmdExcel As New OleDbCommand()
Dim oda As New OleDbDataAdapter()
Dim dtbl As New DataTable()

cmdExcel.Connection = connExcel

'Get the name of First Sheet 
connExcel.Open()

Dim dtExcelSchema As DataTable
dtExcelSchema = connExcel.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, Nothing)
Dim SheetName As String = dtExcelSchema.Rows(0)("TABLE_NAME").ToString()

connExcel.Close()

'Read Data from First Sheet 
connExcel.Open()

If ViewState("Filter").ToString() = "ALL" Then
cmdExcel.CommandText = "SELECT * From [" & SheetName & "]"
Else
cmdExcel.CommandText = "SELECT * From [" & SheetName & "] WHERE Status='" & ViewState("Filter").ToString() & "'"
End If

oda.SelectCommand = cmdExcel
oda.Fill(dtbl)
connExcel.Close()

'Bind Data to GridView 
grdRecords.DataSource = dtbl
grdRecords.DataBind()

Dim ddlStatus As DropDownList = DirectCast(grdRecords.HeaderRow _
.FindControl("ddlStatus"), DropDownList)
Me.BindCountryList(ddlStatus, FilePath, Extension)

End Sub

Private Sub BindCountryList(ByVal ddlStatus As DropDownList, ByVal FilePath As String, ByVal Extension As String)

ConStr = String.Format(ConStr, FilePath)

Dim ConnExcel As New OleDbConnection(ConStr)
Dim CmdA As New OleDbCommand()
Dim oda As New OleDbDataAdapter()
Dim dtbl As New DataTable()

CmdA.Connection = ConnExcel

'Get the name of First Sheet 
ConnExcel.Open()

Dim dtExcelSchema As DataTable
dtExcelSchema = ConnExcel.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, Nothing)
Dim SheetName As String = dtExcelSchema.Rows(0)("TABLE_NAME").ToString()

CmdA.CommandText = "SELECT DISTINCT Status From [" & SheetName & "]"

ddlStatus.DataSource = CmdA.ExecuteReader()
ddlStatus.DataTextField = "Status"
ddlStatus.DataValueField = "Status"
ddlStatus.DataBind()
ConnExcel.Close()

ddlStatus.Items.FindByValue(ViewState("Filter").ToString()) _
.Selected = True
End Sub
End Class

The post How to add Search Filter in the Column Header of Gridview? appeared first on OneStop Shop.

ADO stands for ActiveX Data Objects. Command object is the biggest object in ADO.NET. It is the only object which can perform actions with database. You can create instances of Command object using Command class or Connection.Create. For absolute beginners in this session let us explore more about ADO.NET architecture with examples.

Connection using ADO.NET

SqlConnection sqlConn = new SqlConnection("............");
SqlCommand sqlCmd = sqlConn.CreateCommand();

All databases supports 2 types of queries.

Action Queries – Action queries are those which change the state of database and which don’t return any results except the number of records affected. Example of few action based queries are Insert, Delete & Update statements.

Non-action Queries – Non-action queries are those which don’t affect the database but return the result. Example of non-action based queries are Select statements.

ADO.NET Methods to Executing queries

ADO.NET Command object provides the following methods to execute queries.

• ExecuteNonQuery()
• ExecuteReader()
• ExecuteScalar()
• ExecuteXMLReader()

1. ExecuteNonQuery

This method is used to execute those queries which perform some action & changes against the state of the database. We use this method to execute action based queries such as Insert, Delete or Update records.

Ex:

Delete * from EmpDetails;

Or

INSERT INTO EmpDetails VALUES(‘Biswabhusan’, ‘Software Developer’, ‘InfoSys’);

2. ExecuteReader

Using this method we can execute any kind of Select Statements. ExecuteReader returns single or multiple value depending upon the Query.

Ex:

SELECT EmpName FROM EmpDetails; //This query returns multiple values.
SELECT count(*) FROM EmpDetails; //This query returns a single value.

SELECT emp.EmpID, emp.EmpName, dep.DepNo, dep.DepName from EmpDetails emp, DepDetails dep where emp.DepNo = dep.DepNo //This conditional query returns values from multiple tables.

3. ExecuteScalar

This method is used for Select statements which return only single values.

Ex:

SELECT count(*) FROM EmpDetails;

4. ExecuteXMLReader

This method is applicable only for SqlClient namespace. It is used for queries which return XML data. But OLEDB managed provider does not support this method.

Ex:

SELECT * FROM JobDetails FOR XML AUTO

Note: ExecuteNonQuery(), which is included from ADO.NET Version 1.0/1.1 is used for synchronous execution of queries, whereas BeginExecuteQuery() and EndExecuteQuery() methods which were introduced in ADO.NET Version 2.0 are used for asynchronous execution of queries.

Batch SQL

We can write more than one SQL statement in a single string and execute them as a group(internally execution takes place one after the other) at the same time. This is called batch SQL. The statements are separated by a semicolon and written in the same string.

Ex:

“SELECT empName FROM EmpDetails; SELECT * FROM JobDetails; SELECT * FROM DepDetails”

Batch SQL is very effective & saves time because it is not necessary to wait for the execution of first statement, in order to run the next statement. But there is also a great drawback in this approach, which relates to the SQL injection attacks.

SQL Injection attacks – If even a Single statement which is harmful to the database is provided in the batch, it results in stalling of the whole database.

DataReader

In ADO.NET there are only two objects which can store data. One is DataSet while the other is DataReader.

Features of DataReader – DataReader is a forward only accessible object. Using DataReader we can only read the data. It is a read-only object of ADO.NET. It provides sequential access for rows & can be extended for sequential column access also.

How DataReader Works?

The select statement from the command object is processed and a ResultSet with the required data is created in the form of rows and columns at the database server. The address of this ResultSet is provided to the DataReader.

cmd=new SqlCommand(“SELECT * FROM EmpDetails”, conn);
dr=cmd.ExecuteReader(); //provides the address of the ResultSet to the DataReader(dr)

When the read() method of the DataReader is used it returns true if records are present and false if records are not present. At the same time if records are present, a similar structure like the ResultSet is created at the client side and the first record is fetched into it. The DataReader reads the record from this structure. dr[n] is an indexer to access its created structure.

Ex: dr[0] provides the first column of the retrieved row.
dr[1] provides the second column of the retrieved row.

A pointer exists on ResultSet to identify the record being read. When the read() method is again called from the DataReader, the pointer moves to the next record if present. The structure at the DataReader now gets overwritten by this record.

Drawbacks of DataReader – It is a forward-only and read-only object. DataReader is a connection-oriented object, which means that the access to data is possible only as long as the connection exists. DataReader works only on databases, but not on other data sources like XML files.

Note: It is always necessary to close the DataReader object after the required data is read. Inspite of all drawbacks, DataReader usage is in its performance. To access data, DataReader is the fastest object in entire .NET Framework.

More DataReader Methods and Properties

dr.GetString(0): This statement is used to retrieve the data in the required format. Here the requirement is to retrieve the first column value of the DataReader in the form of a string. Normally for this purpose, the below method is adopted.

textBox1.Text=dr[0].ToString();

Here the data is first retrieved and then converted into string format. But if dr.GetString(0) is used, the data is directly retrieved in the form of string, which aids in better performance.

dr.GetInt32(1) – This works similar to the above method, but fetches data in the form of an integer. Similarly there are methods like GetDouble, GetByte, GetDateTime etc. for different datatypes.

HasRows Property – It checks whether records are present or not and returns true or false accordingly. This property provides better performance than Read() because Read method checks the presence of the records and also reads the records. Since HasRows property does not read the records it performs faster.

IsClosed – It returns true if the DataReader is closed, otherwise returns false. If cmd.ExecuteReader (CommandBehaviour.CloseConnection) is used then connection gets closed when DataReader is closed. In such cases, the state of the connection can be checked by using IsClosed property.

IsDBNull – This property is used to check if a DataRow is null. Returns true if it is null, otherwise returns false.

Ex: if(dr.IsDBNull[0]) checks whether the first row is null.

Stored Procedures

Different methods of writing programs in back-end are Blocks (T-SQL for SQL Server, PL/SQL for Oracle) – Blocks compile every time when called. They are not Stored Procedures – Procedures get compiled and stored as part of database objects. So they perform faster in execution. They need to be explicitly called using an execute statement or functions – They also get compiled and stored like procedures. They can be called with a select statement.

Triggers – They are executed automatically(implicitly called).

Why use Stored Procedures?

Stored Procedures are used because of the following features they offer

• Modular programming
• Distribution of work
• Database security
• Faster execution
• Network traffic reduction
• Flexibility

A typical procedure looks like the following one.

CREATE PROCEDURE dbo.AddJob
(
@jobdesc varchar(50),
@minlvl int,
@maxlvl int
)
AS
INSERT INTO JobDetails VALUES(@jobdesc, @minlvl, @maxlvl)
RETURN

Every parameter in a procedure should be preceded by a special character @ to differentiate from the column names of the table. By default all the declared parameters are input parameters. If the procedure has to return values, then the output parameters must be explicitly specified by using OUTPUT keyword for SQL Server and OUT for Oracle.

Calling procedures from Client-side

This is the code for adding records into the jobs table. The three column values are entered into the text boxes (no need to add values to the first column because it is an identity column) and at the click of a button the whole record should be entered into the table. This is done by using the stored procedure shown earlier. To call that procedure, the button click code should be written as follows.

cmd = new SqlCommand("AddJob", cn);
cmd.CommandType = CommandType.StoredProcedure;
cmd.Parameters.AddWithValue("@jobdesc", txtJobDesc.Text);
cmd.Parameters.AddWithValue("@minlvl", txtMinLvl.Text);
cmd.Parameters.AddWithValue("@maxlvl", txtMaxLvl.Text);
cmd.ExecuteNonQuery();
MessageBox.Show("Record Added");

Here the textbox values are assigned to the parameters of the procedure by using Parameters.AddWithValue() method using command object. When the command is executed, it executes the procedure at the database server and records are added into the table.

Note: If OleDb is used then the parameters should be in same order as the columns in the table, but for SQL Server this is not required.

The command types that are supported by ADO.NET are:

Text: This is default. It can be any query including the table name.
StoredProcedure: To call a procedure at the back-end.
TableDirect: This is mainly for OleDb, where the table name has to be specified in place of command text.

Procedures can be written to return query results also(i.e. select statement results). To execute the procedures that return query results, ExecuteReader should be used from the command object instead of ExecuteNonQuery as shown below.

cmd = new SqlCommand("jobsinfo", cn);
cmd.CommandType = CommandType.StoredProcedure;
SqlDataReader dr = cmd.ExecuteReader();

But it is not preferred to write such procedures because all databases do not support them. But for returning values from the procedures, nearly all back-ends support directional parameters-IN, OUT, INOUT.

IN Parameter: It is read-only in procedure i.e.the procedure can only read the value from it and but cannot return value to it. The direction of this parameter is from the calling program (client) to called program(server).

OUT Parameter: It is write-only which means that the procedure can only return values to it, but cannot read any values from it. Direction is from server to client.

INOUT Parameter: It can be used for both Read and Write. It is bi-directional i.e. from server to client as well as from client to server.

The post ADO.NET ExecuteNonQuery, ExecuteReader, ExecuteScalar Examples appeared first on OneStop Shop.

During we develop a product its always wise to save user time. Think about a login page. Here for Consecutive logins it is much better if we will store user Login Credentials. Using which System will remember the user id and password for next login. In this demo app I am creating a ASP.NET login page with “Remember me” Option.

The logic behind is so simple “During a user login to the System I am storing his/her user id and password to a Cookie. Then under page load event checking is Cookie exists. If so taking user id and password from the Cookie”.

Login.aspx

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Login.aspx.vb" Inherits="Login" %>
<!DOCTYPE html>
<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
<title>Demo Login App</title>
<style type="text/css">
#frmLogin { max-width: 300px; margin: 0 auto; padding-top: 120px; }
.formControl { font-family: Verdana; font-size: 12px; }
.loginDiv { width:300px; margin-top: 20px; padding: 20px 20px 20px 20px; background-color: #f7f7f7; -moz-box-shadow: 0px 2px 2px rgba(0, 0, 0, 0.3); -webkit-box-shadow: 0px 2px 2px rgba(0, 0, 0, 0.3); box-shadow: 0px 2px 2px rgba(0, 0, 0, 0.3); } 
.rounded { border-radius: 10px; -moz-border-radius: 10px; -webkit-border-radius: 10px; }
</style>
</head>
<body>
<form id="frmLogin" runat="server">
<div class="loginDiv rounded">
<div class="formControl">
Email ID&nbsp;<span style="color: Red;">*</span>
</div>
<div class="formControl">
<asp:TextBox ID="txtEmailID" runat="server" Width="100%"></asp:TextBox>
<asp:RequiredFieldValidator ID="rfvEmailID" runat="server" ControlToValidate="txtEmailID"
Display="Dynamic" ErrorMessage="Email should not be blank.<br />"></asp:RequiredFieldValidator>
<asp:RegularExpressionValidator ID="revEmailID" runat="server" ControlToValidate="txtEmailID"
Display="Dynamic" ErrorMessage="Enter a valid Email ID.<br />" ValidationExpression="\w+([-+.']\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*"></asp:RegularExpressionValidator>
</div>
<div class="formControl">
Password&nbsp;<span style="color: Red;">*</span>
</div>
<div class="formControl">
<asp:TextBox ID="txtPassword" runat="server" TextMode="Password" Width="100%"></asp:TextBox>
<asp:RequiredFieldValidator ID="rfvPassword" runat="server" ControlToValidate="txtPassword"
Display="Dynamic" ErrorMessage="Password should not be blank."></asp:RequiredFieldValidator>
</div>
<asp:Button ID="btnVisitorLogin" runat="server" Text="Login" />
<asp:Label ID="lblMsg" runat="server"></asp:Label>
<asp:CheckBox ID="chkNextLogin" runat="server" />&nbsp;Remember me<a href="#" class="pull-right margin-gap">Need
help?</a>
</div>
</form>
</body>
</html>

For security reason in Code behind I added my EncryDecry.vb Class from app_code/vb. To execute vb code inside vb folder of app_code I Configured my web.config.

Login.aspx.vb

Imports System.Web.Security
Imports System.Data
Imports System.Data.SqlClient

Partial Class Login
Inherits System.Web.UI.Page

Dim LoginSqlConn As New SqlConnection(ConfigurationManager.AppSettings.Get("DBKey").ToString())

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
txtEmailID.Focus()

'Check if the browser support cookies
If Request.Browser.Cookies Then
'Check if the cookies with name PBLOGIN exist on user's machine
If Request.Cookies("PBLOGIN") IsNot Nothing Then
'Pass the user name and password to the VerifyLogin method
Me.VerifyLogin(Request.Cookies("PBLOGIN")("UNAME").ToString(), Request.Cookies("PBLOGIN")("UPASS").ToString())
End If
End If
End If
End Sub

Protected Sub btnVisitorLogin_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnVisitorLogin.Click
'Decrypt the Password & UserID from Database
Dim EncrDecr As New EncryDecry

'Validation Checking Aginest Submission
If rfvPassword.IsValid And rfvEmailID.IsValid Then
'Clear Invalid login Message Label
lblMsg.Text = ""

'Temporary SecuredUniqueKey
Dim UniKey As String = "FCPH6-BPK27-2V4MR"

'Login Checking command in shape of a Stored Procedure that returns Record Count
Dim LoginCommand As New SqlCommand("USP_LoginCheck", LoginSqlConn)
LoginCommand.CommandType = CommandType.StoredProcedure

'Pass Parameter to Stored Procedure
LoginCommand.Parameters.Add("@UserID", SqlDbType.NVarChar, 256).Value = EncrDecr.TripleDESEncode(Trim(txtEmailID.Text), "RC2")
LoginCommand.Parameters.Add("@Passcode", SqlDbType.NVarChar, 256).Value = EncrDecr.TripleDESEncode(Trim(txtPassword.Text), "RC2")
LoginCommand.Parameters.Add("@SecuredUniqueKey", SqlDbType.NVarChar, 256).Value = UniKey
LoginCommand.Parameters.Add("@Status", SqlDbType.NVarChar, 20).Value = "Active"

Dim RecordCNT As Integer = 0

Try
Dim LoginDataReader As SqlDataReader
LoginSqlConn.Open()
LoginDataReader = LoginCommand.ExecuteReader
If LoginDataReader.Read Then
RecordCNT = Convert.ToInt32(LoginDataReader(0).ToString())
End If
Catch ex As Exception
Response.Write(ex.ToString())
Finally
LoginSqlConn.Close()
End Try

'Login Checking using the return int value of USP_LoginCheck stored procedure
If (RecordCNT = 1) Then
Me.VerifyLogin(EncrDecr.TripleDESEncode(Trim(txtEmailID.Text), "RC2"), EncrDecr.TripleDESEncode(Trim(txtPassword.Text), "RC2"))
ElseIf (RecordCNT > 1) Then
lblMsg.Text = "Invalid Login Credentials"
'Implement 5 Login Attempts of Account Lock
ElseIf (RecordCNT < 1) Then
lblMsg.Text = "Invalid Login Credentials"
'Implement 5 Login Attempts of Account Lock
End If
End If
End Sub

Private Sub VerifyLogin(ByVal UserID As String, ByVal Password As String)
Dim LoginDetailsCommand As New SqlCommand("USP_LoginDetails", LoginSqlConn)
LoginDetailsCommand.CommandType = CommandType.StoredProcedure

'Pass Parameter to Stored Procedure
LoginDetailsCommand.Parameters.Add("@UserID", SqlDbType.NVarChar, 256).Value = UserID
LoginDetailsCommand.Parameters.Add("@Passcode", SqlDbType.NVarChar, 256).Value = Password

Try
Dim LoginDetailsDR As SqlDataReader
LoginSqlConn.Open()
LoginDetailsDR = LoginDetailsCommand.ExecuteReader

If LoginDetailsDR.Read Then
Session("UserID") = LoginDetailsDR("PkUid")
Session("UserEmail") = UserID

Session("FirstName") = LoginDetailsDR("FirstName")
Session("LastName") = LoginDetailsDR("LastName")

Session("RootPath") = Server.MapPath("../")

'Using form authentication redirect the page to the Default.aspx
FormsAuthentication.RedirectFromLoginPage(Trim(txtEmailID.Text), True)

'check if remember me checkbox is checked on login
If (chkNextLogin.Checked) Then
'Check if the browser support cookies
If (Request.Browser.Cookies) Then
'Check if the cookie with name PBLOGIN exist on user's machine
If (Request.Cookies("PBLOGIN") Is Nothing) Then
'Create a cookie with expiry of 30 days
Response.Cookies("PBLOGIN").Expires = DateTime.Now.AddDays(30)
'Write username to the cookie
Response.Cookies("PBLOGIN").Item("UNAME") = UserID
'Write password to the cookie
Response.Cookies("PBLOGIN").Item("UPASS") = Password
Else
'If the cookie already exist then wirte the user name and password on the cookie
Response.Cookies("PBLOGIN").Item("UNAME") = UserID
Response.Cookies("PBLOGIN").Item("UPASS") = Password
End If
End If
End If
Else
lblMsg.Text = "Invalid Login Credentials"
End If
Catch ex As Exception
Response.Write(ex.ToString())
Finally
LoginSqlConn.Close()
End Try
End Sub
End Class

web.config

<?xml version="1.0"?>
<configuration>
<appSettings>
<add key="DBKey" value="Data Source=VIJAYSHANTI; uid=sa; pwd=tiger; database=CodeRND;"/>
</appSettings>
<connectionStrings/>
<system.web>
<compilation debug="true" strict="false" explicit="true">
<codeSubDirectories>
<add directoryName="VB"/>
</codeSubDirectories>
</compilation>
<authentication mode="Windows"/>
</system.web>
</configuration>

EncryDecry is the class which helps to convert user id and password to RC2 format. In-case an other user find out the cookie in client machine he or she can’t able to hack the original user.

EncryDecry.vb

Imports System.Security.Cryptography
Imports Microsoft.VisualBasic

Public Class EncryDecry

Public Function TripleDESEncode(ByVal value As String, ByVal key As String) As String
Dim des As New System.Security.Cryptography.TripleDESCryptoServiceProvider
des.IV = New Byte(7) {}
Dim pdb As New System.Security.Cryptography.PasswordDeriveBytes(key, New Byte(-1) {})
des.Key = pdb.CryptDeriveKey("RC2", "MD5", 128, New Byte(7) {})
Dim ms As New IO.MemoryStream((value.Length * 2) - 1)
Dim encStream As New System.Security.Cryptography.CryptoStream(ms, des.CreateEncryptor(), System.Security.Cryptography.CryptoStreamMode.Write)
Dim plainBytes As Byte() = Text.Encoding.UTF8.GetBytes(value)
encStream.Write(plainBytes, 0, plainBytes.Length)
encStream.FlushFinalBlock()
Dim encryptedBytes(CInt(ms.Length - 1)) As Byte
ms.Position = 0
ms.Read(encryptedBytes, 0, CInt(ms.Length))
encStream.Close()
Return Convert.ToBase64String(encryptedBytes)
End Function

Public Function TripleDESDecode(ByVal value As String, ByVal key As String) As String
Dim des As New System.Security.Cryptography.TripleDESCryptoServiceProvider
des.IV = New Byte(7) {}
Dim pdb As New System.Security.Cryptography.PasswordDeriveBytes(key, New Byte(-1) {})
des.Key = pdb.CryptDeriveKey("RC2", "MD5", 128, New Byte(7) {})
Dim encryptedBytes As Byte() = Convert.FromBase64String(value)
Dim ms As New IO.MemoryStream(value.Length)
Dim decStream As New System.Security.Cryptography.CryptoStream(ms, des.CreateDecryptor(), System.Security.Cryptography.CryptoStreamMode.Write)
decStream.Write(encryptedBytes, 0, encryptedBytes.Length)
decStream.FlushFinalBlock()
Dim plainBytes(CInt(ms.Length - 1)) As Byte
ms.Position = 0
ms.Read(plainBytes, 0, CInt(ms.Length))
decStream.Close()
Return Text.Encoding.UTF8.GetString(plainBytes)
End Function

End Class

The post ASP.NET Login page example with Remember me Option appeared first on OneStop Shop.

Designing a Login form is not so easy as we are thinking. Modern login pages comes with various rich feature such as Validating User, Form Validation, Capcha or Remember Password. In this Login form Example demo app we are going to show you how to authenticate an user using records from SQL Server user table. To start with first you required to Create a user table in SQL Server.

Create a SQL Table for Users

To Create an user table which will store Login details such as UserID or Password your required to run the following Transact-SQL Query.

CREATE TABLE user_table (
id INT PRIMARY KEY, 
userid VARCHAR(255) NOT NULL, 
password VARCHAR(56)
);

Then insert some sample records.

In front-end Copy n Paste my default.aspx page Codes. Here I have 2 textbox Controls such as user id and password. To stop spam here I am using required field validation for both the fields. Additionally to valid an email id I am using ASP.NET RegularExpressionValidator validation control. Then in my form I have a submit button. Which submits the form to server using post method.

ASP.NET Login form Example

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %>
<!DOCTYPE html>
<html>
<head runat="server">
<title>ASP.NET Login form Example</title>
<link rel="stylesheet" href="master.css" />
</head>
<body>
<form id="frmLogin" runat="server">
<div class="loginDiv rounded">
<div class="formControl">
Email ID&nbsp;<span style="color: Red;">*</span>
</div>
<div class="formControl">
<asp:TextBox ID="txtEmailID" runat="server" Width="100%"></asp:TextBox>
<asp:RequiredFieldValidator ID="rfvEmailID" runat="server" ControlToValidate="txtEmailID"
Display="Dynamic" ErrorMessage="Email should not be blank.<br />"></asp:RequiredFieldValidator>
<asp:RegularExpressionValidator ID="revEmailID" runat="server"
ControlToValidate="txtEmailID" Display="Dynamic" ErrorMessage="Enter a valid Email ID.<br />"
ValidationExpression="\w+([-+.']\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*"></asp:RegularExpressionValidator>
</div>
<div class="formControl">
Password&nbsp;<span style="color: Red;">*</span>
</div>
<div class="formControl">
<asp:TextBox ID="txtPassword" runat="server" TextMode="Password" Width="100%"></asp:TextBox>
<asp:RequiredFieldValidator ID="rfvPassword" runat="server" ControlToValidate="txtPassword"
Display="Dynamic" ErrorMessage="Password should not be blank."></asp:RequiredFieldValidator>
</div>
<asp:Button ID="btnVisitorLogin" runat="server" Text="Login" />
<asp:Label ID="lblMessage" runat="server"></asp:Label>
<input type="checkbox" value="remember-me" />&nbsp;Remember me<a href="#" class="pull-right margin-gap">Need help?</a>
</div>
</form> 
</body>
</html>

To valid user from SQL Server in Code behind file I am executing my business logics inside “btnVisitorLogin_Click” event. To connect and execute SQL query which will fetch data I imported the system files “System.Data” and “System.Data.SqlClient” in page header.

To establish a Connection I am creating a new instance for SQL Server Connection object. Which accepts connection string from my web.config file. Look at the below code to know how to declare connection string in web.config file.

<connectionStrings>
<add name="connStr" connectionString="Data Source=WINSERV;Initial Catalog=phase2;User ID=sa;Password=win#serv" providerName="System.Data.SqlClient"/>
</connectionStrings>

Here Data Source is my Database Server name. Initial Catalog is the Database name and User id, password is for the database user.

To compare user Credentials with database records here I am executing a command object and fetching user table records to a SQL DataReader. As you know datareader works like a pointer. Using a DataReader compare to a DataSet we can minimize the login time. To validate a user I am running a while loop until the end record of SQL DataReader “dr_pass”. For each record inside the while loop I am comparing the value with user password. In case it returns true I am allowing the user to redirect into the application dashboard page.

Default.aspx.vb

Imports System.Data
Imports System.Data.SqlClient

Partial Class _Default
Inherits System.Web.UI.Page

Protected Sub btnVisitorLogin_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnVisitorLogin.Click

Dim oMyConnection As New SqlConnection(ConfigurationManager.ConnectionStrings("connStr").ToString)
Dim oMyCommand As New SqlCommand("SELECT password, userid FROM user_table WHERE userid= '" & txtEmailID.Text & "' ", oMyConnection)
Dim dr_pass As SqlDataReader

oMyConnection.Open()
dr_pass = oMyCommand.ExecuteReader(System.Data.CommandBehavior.CloseConnection)

If Not dr_pass.HasRows Then
lblMessage.Text = "Invalid Email or Password."
End If

While dr_pass.Read
If Trim(txtPassword.Text) = dr_pass("password") Then
Session.Add("sess_uid", dr_pass("userid"))
Response.Redirect("../Dashboard.aspx")
End If
End While
End Sub
End Class

Login Form CSS Style (master.css)

#frmLogin { max-width: 300px; margin: 0 auto; padding-top: 120px; }
.formControl { font-family: Verdana; font-size: 12px; }
.loginDiv { width:300px; margin-top: 20px; padding: 20px 20px 20px 20px; background-color: #f7f7f7; -moz-box-shadow: 0px 2px 2px rgba(0, 0, 0, 0.3); -webkit-box-shadow: 0px 2px 2px rgba(0, 0, 0, 0.3); box-shadow: 0px 2px 2px rgba(0, 0, 0, 0.3); } 
.rounded { border-radius: 10px; -moz-border-radius: 10px; -webkit-border-radius: 10px; }

The above demo will run without CSS. But beauty attracts eyes. This is the cause I am with the above CSS classes. Apply this CSS to have a basic look. You modify it as per the mock-up.

The post ASP.NET Login form Example validating user from SQL Server Database appeared first on OneStop Shop.

By default under Validations ASP.NET provides 5 Controls. They are Required field validator, Range Validator, Regular Expression Validator, Compare Field Validator & ASP.NET CustomValidator. Using Required field validator we do check whether the field is mandatory to user or not. Range Validator valid a specific range of values. For an example if I am going to valid an IP address in this case I can set the range to 255. Regular Expression validator validates user data using per-defined regular Expressions. Compare field do comparison.

Now tell if some other kind of validation you want in your app then how to do this. In real-time it is ugly to break sequence. I mean if you are using ASP.NET Validation then for all fields it need to same.

ASP.NET CustomValidator Example

Let’s take an example below. Here I am validation password length. What I need is user must need to enter 6 character length password. I did this using asp:CustomValidator & pure JavaScript. I mean CustomVaidator working with Client Script. To do this demo here inside HTML body I have added a ASP.NET Custom Validation control. Using ErrorMessage I am display the message which user will receive if he/she trying enter invalid data. As it is an error message using ForeColor=”Red” I am applying style to my Control. In my CustomValidator using ClientValidationFunction I am suplying my javascript function name without parenthesis.

Inside the JavaScript function passwordLength I am getting 2 values. These are function parameters sender and arguments. In argument under run-time I am fetching the txtPassword value and checking its length. Now you must have a query how my password field control is connected to the Custom Validator Control. Look Closely you will watch ControlToValidate=”txtPassword” in Vaidator Control. With this I am giving instruction to Custom Validator Control that Validate the input box which id is txtPassword.

ASP.NET CustomValidator using JavaScript Function

<%@ Page Language="VB" AutoEventWireup="false" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head id="Head1" runat="server">
<title>JavaScript function with ASP.NET CustomValidator</title>
<script type="text/javascript">
/* passwordLength JS Function which I am referring in asp:CustomValidator */
function passwordLength(sender, args) {
debugger;
if (args.Value.length < 6)
/* If password length is less than 6 charecters returning False */
return args.IsValid = false;
else
return args.IsValid = true;
}
</script>
</head>
<body>
<form id="frmDemoApp" runat="server">
<div>
Password: <asp:TextBox runat="server" ID="txtPassword"></asp:TextBox>
<asp:CustomValidator ID="CustomValidator1" ClientValidationFunction="passwordLength" ForeColor="Red" ErrorMessage="Enter a Password with minimum length of 6 characters."
ControlToValidate="txtPassword" runat="server">
</asp:CustomValidator>
</div>
</form>
</body>
</html>

The post How to use JavaScript function with ASP.NET CustomValidator? appeared first on OneStop Shop.

Do you ever worked for any file management system? Where you have word files, excel file or it can be an image file like jpeg or png? In .NET Gridview is a popular Control to present tabular data. In this demo app I implemented various icons in each row of the Gridview dynamically by checking the file type.

Logic is so simple, Using FindControl in side the Gridview RowDataBound event I am locating the imgPreview tag from aspx. Then storing its value to a variable. I have icon images are in IMAGES/type_icons folder. By checking file extension I updating the image URL.

Display icon images in Datagrid

<asp:GridView AllowSorting="true" DataKeyNames="CodeID" ID="grdFileList" runat="server" AutoGenerateColumns="False" CellPadding="0" CellSpacing="0" ForeColor="#333333" GridLines="None" Width="100%" AllowPaging="true" PageSize="20">

<FooterStyle BackColor="#1C5E55" Font-Bold="True" ForeColor="White" />

<Columns>

<asp:TemplateField>

<HeaderTemplate>
<input type="checkbox" onmouseover=if(t1)t1.Show(event,l1) onmouseout=if(t1)t1.Hide(event) style="width:20px;" name="chkAll" id="chkAll" onclick="javascript:checkAll(this);" />
</HeaderTemplate>
<ItemTemplate>
<input type="checkbox" style="width:20px;" value='<%# Container.DataItem("CodeID") %>' id="chkSelect" name="chkSelect" />
</ItemTemplate>
<HeaderStyle Width="35px" />
</asp:TemplateField>

<asp:TemplateField HeaderText="File Name" SortExpression="CodeFileName">
<ItemTemplate>
<a style="cursor:hand;" href='AddCode.aspx?SourceCode=1&CodeID=<%#Container.DataItem("CodeID")%>&AttachFile=1' class="GridLink"><%# Container.DataItem("CodeFileName") %></a>&nbsp;&nbsp;
</ItemTemplate>
</asp:TemplateField>

<asp:TemplateField HeaderText="Description" SortExpression="CodeDescription">
<ItemTemplate>
<a style="cursor:default;"><%# Container.DataItem("CodeDescription") %></a>&nbsp;&nbsp;
</ItemTemplate>
<ItemStyle HorizontalAlign="Left" />
</asp:TemplateField>

<asp:TemplateField HeaderText="SearchKey" SortExpression="SearchKey">
<ItemTemplate>
<a style="cursor:hand;"><%#Container.DataItem("SearchKey")%>&nbsp;&nbsp;
</ItemTemplate>
<ItemStyle HorizontalAlign="Left" />
</asp:TemplateField>

<asp:TemplateField HeaderText="File Name" SortExpression="AttachFileName">
<ItemTemplate>
<a style="cursor:hand;"><%#Container.DataItem("AttachFileName")%>&nbsp;&nbsp;
</ItemTemplate>
<ItemStyle HorizontalAlign="Left" />
</asp:TemplateField>

<asp:TemplateField HeaderText="File Size" SortExpression="AttachFileSize">
<ItemTemplate>
<a style="cursor:hand;"><%#Container.DataItem("AttachFileSize")%>&nbsp;&nbsp;
</ItemTemplate>
<ItemStyle HorizontalAlign="Left" />
</asp:TemplateField>

<asp:TemplateField HeaderText="File Type" SortExpression="AttachFileType" Visible="False">
<ItemTemplate>
<asp:Label ID="lblAttachmentType" Text='<%#Container.DataItem("AttachFileName")%>' runat="server"></asp:Label>
</ItemTemplate>
<ItemStyle HorizontalAlign="Left" />
</asp:TemplateField>

<asp:TemplateField HeaderText="File Type" SortExpression="AttachFileType">
<ItemTemplate>
<asp:Image ID="imgPreview" runat="server" />
</ItemTemplate>
<ItemStyle HorizontalAlign="Left" />
</asp:TemplateField>

<asp:TemplateField HeaderText="Is Shared" SortExpression="IsShareable">
<ItemTemplate>
<a style="cursor:hand;"><%#Container.DataItem("IsShareable")%></a>&nbsp;&nbsp;
</ItemTemplate>
<ItemStyle HorizontalAlign="Left" />
</asp:TemplateField>

<asp:TemplateField HeaderText="Status" SortExpression="IsShareable">
<ItemTemplate>
<a style="cursor:hand;"><%# Container.DataItem("Status") %></a>&nbsp;&nbsp;
</ItemTemplate>
<ItemStyle HorizontalAlign="Left" />
</asp:TemplateField>
</Columns>
<RowStyle BackColor="#E3EAEB" />
<EditRowStyle BackColor="#7C6F57" />
<SelectedRowStyle BackColor="#C5BBAF" Font-Bold="True" ForeColor="#333333" />
<PagerStyle BackColor="#D7F6FA" ForeColor="Black" HorizontalAlign="Center" />
<HeaderStyle Height="22px" BackColor="#005B90" Font-Bold="True" ForeColor="White" HorizontalAlign="Left" />
<AlternatingRowStyle BackColor="White" />
</asp:GridView>

<asp:SqlDataSource ID="SqlDataSource1" runat="server" ConnectionString="<%$ ConnectionStrings:connectionString %>">
</asp:SqlDataSource>

Datagrid rows with various icon images using Code-behind

Protected Sub grdFileList_RowDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles grdFileList.RowDataBound
If e.Row.RowType = DataControlRowType.DataRow Then
Dim lblAttachmentTypeID As Label = CType(e.Row.FindControl("lblAttachmentType"), Label)

Dim objImg As Image = CType(e.Row.FindControl("imgPreview"), Image)

Dim AT As String = lblAttachmentTypeID.Text

Dim splitDot As Array = AT.Split(".")

Dim Ext As String = splitDot(1)
Ext = Trim(Ext)

'Response.Write(ds.Tables(0).Rows(0).Item(20))

If (Ext = "doc") Then
objImg.ImageUrl = "../IMAGES/type_icons/doc.gif"
ElseIf (Ext = "docx") Then
objImg.ImageUrl = "../IMAGES/type_icons/doc.gif"
ElseIf (Ext = "xls") Then
objImg.ImageUrl = "../IMAGES/type_icons/xls.gif"
ElseIf (Ext = "zip") Then 'ALLOW USER TO UPLOAD ZIP FILES
objImg.ImageUrl = "../IMAGES/type_icons/zip.gif"
ElseIf (Ext = "sql") Then
objImg.ImageUrl = "../IMAGES/type_icons/sql.gif"
ElseIf (Ext = "ppt") Then
objImg.ImageUrl = "../IMAGES/type_icons/ppt.gif"
'ElseIf (Ext = "odt") Then
'objImg.ImageUrl = "../IMAGES/type_icons/create.gif"
ElseIf (Ext = "txt") Then
objImg.ImageUrl = "../IMAGES/type_icons/txt.gif"
ElseIf (Ext = "gif") Then
objImg.ImageUrl = "../IMAGES/type_icons/gif.gif"
ElseIf (Ext = "bmp") Then
objImg.ImageUrl = "../IMAGES/type_icons/bmp.gif"
ElseIf (Ext = "exe") Then
objImg.ImageUrl = "../IMAGES/type_icons/exe.gif"
ElseIf (Ext = "dll") Then
objImg.ImageUrl = "../IMAGES/type_icons/ddl.gif"
ElseIf (Ext = "cs") Then
objImg.ImageUrl = "../IMAGES/type_icons/cs.gif"
ElseIf (Ext = "fla") Then
objImg.ImageUrl = "../IMAGES/type_icons/fla.gif"
ElseIf (Ext = "htm") Then
objImg.ImageUrl = "../IMAGES/type_icons/htm.gif"
ElseIf (Ext = "html") Then
objImg.ImageUrl = "../IMAGES/type_icons/htm.gif"
ElseIf (Ext = "jpeg") Then
objImg.ImageUrl = "../IMAGES/type_icons/jpg.gif"
ElseIf (Ext = "jpg") Then
objImg.ImageUrl = "../IMAGES/type_icons/jpg.gif"
ElseIf (Ext = "image/pjpe") Then
objImg.ImageUrl = "../IMAGES/type_icons/jpg.gif"
ElseIf (Ext = "png") Then
objImg.ImageUrl = "../IMAGES/type_icons/png.gif"
ElseIf (Ext = "js") Then
objImg.ImageUrl = "../IMAGES/type_icons/js.gif"
ElseIf (Ext = "pdf") Then
objImg.ImageUrl = "../IMAGES/type_icons/pdf.gif"
ElseIf (Ext = "mdb") Then
objImg.ImageUrl = "../IMAGES/type_icons/mdb.gif"
ElseIf (Ext = "swf") Then
objImg.ImageUrl = "../IMAGES/type_icons/swf.gif"
ElseIf (Ext = "vsd") Then
objImg.ImageUrl = "../IMAGES/type_icons/vsd.gif"
ElseIf (Ext = "xml") Then
objImg.ImageUrl = "../IMAGES/type_icons/xml.gif"
Else
'THIS IS THE GENERAL FILE ICON WHICH NEED TO SHOW ON OVER THE ICON EXTENTION NOT FOUND FROM DB
objImg.ImageUrl = "../IMAGES/type_icons/txt.gif"
End If
End If
'imgSrc.ImageUrl = "IMAGES/AloneLogo.png"
End Sub

The post How to display various Files icon images in Datagrid rows? appeared first on OneStop Shop.

Creating a secure password is a critical aspect of modern digital security. Weak passwords are vulnerable to brute-force attacks, dictionary attacks, and other malicious techniques. To mitigate these risks, developers often implement random password generators that produce strong, unpredictable passwords. In this article, we will explore how to create a robust random password generator function using VB.NET, ensuring that the generated passwords meet common security requirements.

During an application development many time we required a random string. Whether it is to make the URL unique or to send a SMS for mobile verification or to generate dynamic Cookie random strings are very useful. In the below Random password generator function I am doing so using VB.NET String Builder methods from System.IO Namespace.

Logic I implemented here is so simple. Inside a for loop I am using Convert.ToChar() method against random.NextDouble() Function. Random function is taking care to generate random number. While using Convert.ToChar() I am converting the random number to String and appending that to a StringBuilder variable.

VB.NET Random password generator

Private Function RandomString(ByVal size As Integer, ByVal lowerCase As Boolean) As String
Dim builder As New StringBuilder()
Dim random As New Random()
Dim ch As Char
Dim i As Integer
For i = 0 To size - 1
ch = Convert.ToChar(Convert.ToInt32((26 * random.NextDouble() + 65)))
builder.Append(ch)
Next i
If lowerCase Then
Return builder.ToString().ToLower()
End If
Return builder.ToString()
End Function

The Role of Randomness in Password Generation

True randomness is crucial for password security. Pseudo-random number generators (PRNGs) in programming languages, such as the `Random` class in VB.NET, are sufficient for most applications. However, for cryptographic purposes, the `RNGCryptoServiceProvider` class (or its successor, `RandomNumberGenerator`) is preferred due to its higher entropy.

Best Practices for Password Generation

Weak or compromised passwords can lead to data breaches, identity theft, and financial losses. To mitigate these risks, it is essential to follow best practices for password generation. This article outlines key strategies, including avoiding predictable patterns, using sufficient length, incorporating all character types, avoiding password reuse, and storing passwords securely.

Avoid Predictable Patterns

One of the most common mistakes in password creation is using easily guessable patterns. Hackers often exploit predictable sequences, such as “123456,” “password,” or “qwerty.” These passwords are frequently targeted in brute-force attacks, where automated tools systematically try common combinations.

To enhance security, avoid using:

Sequential numbers or letters (e.g., “abcdef,” “987654”).
Personal information (e.g., birthdays, pet names, or family members’ names).
Dictionary words, as these are vulnerable to dictionary attacks.

Instead, opt for random combinations that do not follow a recognizable structure. A passphrase—a sequence of unrelated words—can be a strong alternative if it is sufficiently long and unpredictable.

Use Sufficient Length

Password length is a critical factor in security. The longer a password, the more difficult it is to crack. Experts recommend a minimum of 12 characters, though longer passwords (16 characters or more) provide even greater protection.

Each additional character exponentially increases the number of possible combinations, making brute-force attacks impractical. For example, an 8-character password with lowercase letters has approximately 200 billion possible combinations, while a 12-character password with mixed characters has trillions.

Incorporate All Character Types

A strong password should include a mix of:

Uppercase letters (A-Z).
Lowercase letters (a-z).
Numbers (0-9).
Special characters (e.g., !, @, , $, %).

This diversity makes the password more resistant to cracking attempts. For instance, “T7mP9$kL2!” is significantly stronger than “templk12.” Avoid substituting letters with similar-looking numbers (e.g., “P@ssw0rd”) as these are still predictable.

Avoid Reusing Passwords

Using the same password across multiple accounts is a significant security risk. If one account is compromised, attackers can gain access to all other accounts sharing that password. This practice, known as credential stuffing, is a common attack vector.

To prevent this, create unique passwords for each account. Managing dozens of distinct passwords can be challenging, but password managers (discussed later) can simplify this process.

Store Passwords Securely

Even the strongest passwords can be compromised if stored improperly. Avoid writing passwords on paper or saving them in unsecured digital files (e.g., plain text documents or spreadsheets). Instead, use a reputable password manager.

Password managers encrypt and store credentials in a secure vault, accessible via a master password. They also generate strong, random passwords and auto-fill them when needed. Popular options include LastPass, Bitwarden, and 1Password.

For additional security, enable two-factor authentication (2FA) wherever possible. This adds an extra verification step, such as a fingerprint scan or a one-time code sent to your phone, further protecting your accounts.

Conclusion

A well-implemented random password generator in VB.NET can significantly enhance security by creating strong, unpredictable passwords. By leveraging cryptographically secure random number generation and enforcing character diversity, developers can ensure that generated passwords resist common attack vectors. The provided function serves as a foundation that can be further customized to meet specific security requirements. Always test password generation logic thoroughly to confirm its effectiveness in real-world applications.

The post Random Password Generator Function using VB.NET appeared first on OneStop Shop.

Generally while designing a CMS we found this situation (Generate Dynamic HTML) to handle. Let us assume we have records in Database. From those records we required to Create HTML pages dynamically. Here I did the same using VB.NET File Operations.

Look at the below Codes from my Code behind file. Here I have 2 functions & page load event. During page load I am calling the function CreatePage(). CreatePage function accepts 3 parameters page title, HTML text here I mean contents for HTML page & The file name I want to create physically.

VB.NET CreatePage function to Generate Dynamic HTML

Inside CreatePage function I am concatenating a string with HTML format. In head tag I am adding the page title. Then entering a new-line character. Similarly did for title & body content. Not doing the File Operations here. For file operation I have one more separate function SaveTextToFile(). SaveTextToFile accepts 2 parameters. First parameter is the HTML string we concatenating in CreatePage function. Second one is the file path. File path means where to Create the HTML page.

To Create file physically here I referred System.IO & StreamWriter method. After Create Instance I am using Write method. Including this I have a boolean variable. Which helps to know whether the file created successfully or not. This variable default value is false. Just after StreamWriter Write method I am updating this variable.

Generate Dynamic HTML using VB.NET Codes

Imports System.IO

Partial Class _CreateHtml
Inherits System.Web.UI.Page

Public Sub CreatePage(ByVal HTMLTitle As String, ByVal HTMLText As String, ByVal HTMLFileName As String)
Dim strFile As String
strFile = ""
'Constructing the String strFile
strFile = "<html>" & vbNewLine
strFile = strFile & "<head>" & vbNewLine
strFile = strFile & "<title>" & HTMLTitle & "</title>" & vbNewLine
strFile = strFile & "</head><body>" & vbNewLine
strFile = strFile & HTMLText & vbNewLine
strFile = strFile & "</body></html>"
'Calling SaveTextToFile function for IO Operation
SaveTextToFile(strFile, Server.MapPath(".") & "\HTMLFiles\" & HTMLFileName & ".html")
End Sub

Public Function SaveTextToFile(ByVal strData As String, ByVal FullPath As String, Optional ByVal ErrInfo As String = "") As Boolean
Dim Contents As String
Dim Saved As Boolean = False
'Using StreamWriter to Create File
Dim objReader As IO.StreamWriter
Try
objReader = New IO.StreamWriter(FullPath)
objReader.Write(strData)
objReader.Close()
Saved = True
Catch Ex As Exception
Response.Write(Ex.Message)
End Try
Return Saved
End Function

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
CreatePage("Title goes here", "Hello world! This is a HTML file Created from Code Behind.", "Sample")
End Sub
End Class

Introduction to Generate Dynamic HTML (DHTML)

Unlike static HTML, which presents fixed content, DHTML allows elements on a webpage to change dynamically without requiring a full page reload. This interactivity is achieved through a combination of HTML, Cascading Style Sheets (CSS), JavaScript, and the Document Object Model (DOM).

For example, drop-down menus, form validations, and drag-and-drop interfaces are often powered by DHTML. The key advantage is that content modifications happen on the client side, reducing server requests and improving performance.

Core Components of DHTML

1. HTML (HyperText Markup Language) HTML forms the backbone of any webpage, defining the structure and content. In DHTML, HTML elements serve as the foundation upon which dynamic behaviors are applied. Elements like `

`, “, and forms are frequently manipulated using JavaScript and CSS to create interactive effects.

2. CSS (Cascading Style Sheets) CSS controls the presentation of HTML elements, including layout, colors, fonts, and animations. In DHTML, CSS is used to modify styles dynamically. For instance, JavaScript can change CSS properties to hide or show elements, adjust dimensions, or apply transitions.

3. JavaScript JavaScript is the scripting language that enables dynamic behavior. It interacts with the DOM to manipulate HTML and CSS in real-time. Functions like `document.getElementById()` allow developers to select and modify elements, while event listeners (e.g., `onclick`, `onmouseover`) trigger these changes based on user actions.

How DHTML Works

DHTML operates by combining these technologies in the following way:

User Interaction Triggers an Event – A user action, such as clicking a button or hovering over an element, generates an event.

JavaScript Handles the Event – An event listener in JavaScript detects the action and executes a corresponding function.

DOM Manipulation Occurs – The function modifies the DOM, changing HTML content or adjusting CSS properties.

Browser Renders Changes Instantly – The updated DOM is re-rendered by the browser, displaying the changes to the user.

Common Applications of DHTML

1. Drop-Down Menus Navigation menus that expand or collapse based on user clicks are powered by DHTML, improving site usability.

2. Drag-and-Drop Interfaces Web applications like Trello or file uploaders use DHTML to allow users to drag elements across the screen.

3. Dynamic Content Loading Single-page applications (SPAs) use DHTML to load new content without refreshing the page, providing a seamless browsing experience.

4. Animations and Effects Subtle animations, such as fading elements or sliding panels, enhance visual appeal and guide user attention.

Best Practices for Implementing DHTML

Optimize Performance – Excessive DOM manipulation can slow down a webpage. Use efficient selectors and minimize reflows.

Ensure Accessibility – DHTML elements should remain usable for screen readers and keyboard navigation.

Graceful Degradation – Design webpages to function even if JavaScript is disabled, ensuring broader compatibility.

Cross-Browser Testing – Verify that DHTML features work across different browsers and devices.

Use Modern Frameworks – Libraries like jQuery, React, and Vue.js simplify DHTML implementation and improve maintainability.

Future of DHTML

As web technologies evolve, DHTML continues to integrate with modern frameworks and APIs. Web Components, for example, allow reusable custom elements with encapsulated functionality. Additionally, advancements in CSS (like Grid and Flexbox) and JavaScript (ES6+) enable more sophisticated dynamic behaviors.

The rise of progressive web apps (PWAs) and real-time web applications further emphasizes the importance of DHTML in delivering fast, interactive experiences.

Conclusion

Dynamic HTML remains a fundamental technology for creating engaging, interactive web applications. By leveraging HTML, CSS, JavaScript, and the DOM, developers can build responsive interfaces that enhance user experience while reducing server dependency. As web standards advance, DHTML will continue to evolve, offering even more powerful tools for modern web development.

The post How to Generate Dynamic HTML Document using VB.NET Codes? appeared first on OneStop Shop.

Excel is very common practice to share data across Network. Recently one of my Customer wants to provide export an excel button in their products list page. What I did to implement Export DataTable to Excel functionality sharing the same here.

Exporting data from a DataTable to an Excel file is a common requirement in many business applications. Whether for reporting, data analysis, or sharing information, automating this process can save time and reduce errors. VB.NET, with its robust libraries and straightforward syntax, provides multiple ways to accomplish this task. This article explores various methods to export a DataTable to an Excel file, including using Microsoft Office Interop, OpenXML, and third-party libraries like EPPlus.

I added a asp.net server side button with text “Export to Excel”. Then inside this button click event I am calling a function Export2Excel. Export2Excel function accepts 2 parameters Select Query & output File Name. Inside the function first I am clearing response object. Then defining Content Type & File Header information. Then fetching data in SQLDataAdapter & Cloning the same data to DataTable. To Create table running loop over TR. According to requirement showing the number of TD’s. Finally writing the complete string using response.write.

Button Click

Protected Sub btnExportToExcel_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnExportToExcel.Click
If Request("Keyword") = 1 Then
Export2Excel("SELECT SearchString, DateOfSearch FROM SearchString WHERE FoundNotFound=1 ORDER BY DateOfSearch DESC", "SearchStrings.xls")
Else
Export2Excel("SELECT SearchString, DateOfSearch FROM SearchString WHERE FoundNotFound=0 ORDER BY DateOfSearch DESC", "SearchStrings.xls")
End If
End Sub

Export DataTable to Excel Function

Private Sub Export2Excel(ByVal SqlQry As String, ByVal FileName As String)
Response.ClearContent()
Response.ContentType = "Application/vnd.ms-excel"
Response.AddHeader("Content-Disposition", "attachment; filename=" & FileName & "")
Response.Flush()

Dim SqlDataAdp As New SqlDataAdapter(SqlQry, sqlConn)
Dim DT As New DataTable
SqlDataAdp.Fill(DT)
sqlConn.Open()

Dim tempTable As String = String.Empty
Dim DTCol As DataColumn
Dim DTRow As DataRow

tempTable = "<table cellpadding='2' cellspacing='2' border='1' width='100%'>"

tempTable = tempTable & "<tr>"
For Each DTCol In DT.Columns
tempTable = tempTable & "<td style='font-weight:bold;'>"
tempTable = tempTable & DTCol.ColumnName.ToString()
tempTable = tempTable & "</td>"
Next
tempTable = tempTable & "</tr>"

For Each DTRow In DT.Rows
tempTable = tempTable & "<tr>"
For i = 0 To DT.Columns.Count - 1
tempTable = tempTable & "<td align='left'>"
tempTable = tempTable & DTRow(i).ToString()
tempTable = tempTable & "</td>"
Next
tempTable = tempTable & "</tr>"
Next

tempTable = tempTable & "</table>"

Response.Write(tempTable)
Response.End()
End Sub

Conclusion

Exporting a DataTable to Excel in VB.NET can be achieved through multiple methods, each with its advantages. Microsoft Office Interop is feature-rich but requires Excel installation, OpenXML is lightweight but complex, and EPPlus offers a balanced approach with easy implementation. Choose the method that best fits your project requirements to ensure efficient and reliable Excel exports.

The post How to export DataTable to Excel file using VB.NET? appeared first on OneStop Shop.

Customization in a web app is very common. Requirement updates everyday. Depending on this it happens occasionally Gridview is incapable to meet customers demand. In this case we choose ASP.NET inline Table to present data. Commonly there are 2 ways to fetch data from the database DataSet & DataReader. DataSet is connection less architecture. While DataReader is a pointer. DataReader fetch data faster then DataSet mechanism.

Here in this below example I am fetching data from my table PortalWebLink. In side table tag before start the row (tr) I am with a while loop. The condition is until data read is readable bind data. Inside the td I am binding weblinks using dreaderobj(“WebLinkTitle”).ToString().

Table using data from a DataReader

<table border="0" cellpadding="4" cellspacing="1" width="100%" bgcolor="#e3eef6">
<%
Dim connObj As New SqlConnection(ConfigurationManager.AppSettings.Get("DBKey").ToString())
Dim qryStr As String = "SELECT * FROM PortalWebLink WHERE STATUS='ACTIVE' ORDER BY CreatedDate DESC"
'Response.Write(qryStr)
Dim sqlCommObj As New SqlCommand(qryStr, connObj)

Try
connObj.Open()
Dim dreaderobj As SqlDataReader = sqlCommObj.ExecuteReader

While dreaderobj.Read
%>
<tr>
<td bgcolor="#e3eef6">
<table border='0' cellpadding='0' cellspacing='0'>
<tr>
<td>
<img src='../IMAGES/old-edit-redo.png' />
</td>
<td>
&nbsp;<a href='<%= dreaderobj("WebLink").ToString %>' target='blank'><%=dreaderobj("WebLinkTitle").ToString()%></a>
</td>
</tr>
</table>
</td>
</tr>
<%
End While
Catch ex As Exception
Dim TrackError As New ErrorLog()
TrackError.ErrorLog(ex.Message, ex.ToString(), ex.Source, ex.TargetSite.ToString(), "", "../Admin/Weblink.aspx", connObj)
Finally
connObj.Close()
End Try
%>
<%
Dim strChkQry As String = "SELECT Count(*) as CNT FROM PortalWebLink WHERE STATUS='ACTIVE'"
Dim sqlCommandObj As New SqlCommand(strChkQry, connObj)

try
connObj.Open()
Dim str As Object = sqlCommandObj.ExecuteScalar()
Dim i As Integer = str

If i = 0 Then
%>
<table cellpadding="2" cellspacing="2" width="100%" class="fbox">
<tr>
<td>
No Record(s) Found.
</td>
</tr>
</table>
<%
end if
Catch ex As Exception
Dim TrackError As New ErrorLog()
TrackError.ErrorLog(ex.Message, ex.ToString(), ex.Source, ex.TargetSite.ToString(), "", "../Admin/Weblink.aspx", connObj)
Finally
connObj.Close()
End Try
%>
<tr>
<td>
&nbsp;
</td>
</tr>
</table>

The post How to Create ASP.NET inline Table using data from a DataReader? appeared first on OneStop Shop.

Generally where only one option lefts to Choose from a list of records we use Dropdownlist Control. Let’s talk about a Country dropdownlist. What you need to do is need to fetch records from Database. In second step need to bind that data to the data-source of ASP.NET dropdownlist. The same I did in the below example.

The logic here I implement is very simple. Using ExecuteReader I am executing my command object against a DataReader. Then with the conditional check DataReader.read method I am running a while loop. Inside this loop adding new listitems with key & value pair from DataReader.

Compare to DataSet DataReader executes faster. DataReader is like a pointer. While DataSet is Connection less architecture.

dropdown

<asp:DropDownList ID="ddlOrgType" runat="server" TabIndex="3" ToolTip="Select your Organization Type" Width="244px" AutoPostBack="True"></asp:DropDownList>

Connection String I Used

Dim connObj As New SqlConnection(ConfigurationManager.AppSettings.Get("connString").ToString())

in web.config:

<appSettings>
<add key="connString" value="Data Source=localhost; uid=sa; pwd=tiger; database=TRAINNINGMANAGER;"/>
</appSettings>

SelectedIndexChanged event of dropdown

Protected Sub ddlOrgType_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ddlOrgType.SelectedIndexChanged
ddlDivision.Items.Clear()
'Fill up ddlDivision dropdownlist from DivisionTab
Dim commDivision As New SqlCommand("SELECT * FROM DivisionTab WHERE divisionStatus='1' and fkTypeOrgID=" & ddlOrgType.SelectedValue.ToString, connObj)

Try
connObj.Open()
Dim Objdr As SqlDataReader = commDivision.ExecuteReader
ddlDivision.Items.Add(New ListItem("Please Select...", 0))
While Objdr.Read
ddlDivision.Items.Add(New ListItem(Objdr(1), Objdr(0)))
End While

Catch ex As Exception
Response.Write(ex.ToString())

Finally
connObj.Close()
End Try
End Sub

The post How to bind data to a ASP.NET Dropdownlist using DataReader? appeared first on OneStop Shop.

Among Server side web programming ASP.NET is so popular. It was found in ASP.NET applications Gridview is a key element to present data in tabular shape. Above 90% ASP.NET web application uses Gridview. While presenting data in a Gridview to make this more user friendly Customer like to implement Paging and Sorting. Pagination helps to load data faster. Rather loading all records in one turn pagination loads data page wise. Similarly sorting give flexibility to sort the data alphabetically. Sorting also helps for search.

In this session I am sharing an example from my application, where I did implemented pagination & sorting in a Gridview. Look at the Code below how I did this.

Paging and Sorting in ASP.NET Gridview

<asp:GridView DataKeyNames="AdvID" CssClass="bodytext" AutoGenerateColumns="False" PageSize="25"
AllowPaging="True" AllowSorting="True" ID="grdEditViewAll" runat="server"
Width="100%" CellPadding="4" BackColor="White" BorderColor="#CCCCCC"
BorderStyle="None" BorderWidth="1px">
<Columns>
<asp:TemplateField ItemStyle-HorizontalAlign="Center">
<HeaderTemplate>
<img src="../../IMAGES/input_arrow_down.gif" />
</HeaderTemplate>
<ItemTemplate>
<img src="../../IMAGES/icn_paper.gif" />
</ItemTemplate>
<HeaderStyle Width="25px" />
<ItemStyle HorizontalAlign="Center"></ItemStyle>
</asp:TemplateField>

<asp:TemplateField ItemStyle-CssClass="bodytext" HeaderStyle-HorizontalAlign="Left" HeaderText="Title" SortExpression="AdvTitle">
<ItemTemplate>
<span onmouseover="Tip('Click to preview <%# Container.DataItem("AdvTitle") %>')" onmouseout="UnTip()">
<asp:HyperLink ID="hypPreview" runat="server" Text=<%# Container.DataItem("AdvTitle") %>></asp:HyperLink>
</span>
</ItemTemplate>
<HeaderStyle HorizontalAlign="Left"></HeaderStyle>
<ItemStyle CssClass="bodytext" HorizontalAlign="Left"></ItemStyle>
</asp:TemplateField>

<asp:BoundField ItemStyle-CssClass="bodytext" HeaderStyle-HorizontalAlign="Left"
DataField="AdvCompany" HeaderText="Company" SortExpression="AdvCompany">
<HeaderStyle HorizontalAlign="Left"></HeaderStyle>
<ItemStyle CssClass="bodytext" HorizontalAlign="Left"></ItemStyle>
</asp:BoundField>
<asp:BoundField ItemStyle-CssClass="bodytext" HeaderStyle-HorizontalAlign="Left"
DataField="AdResolution" HeaderText="Resolution" SortExpression="AdResolution">
<HeaderStyle HorizontalAlign="Left"></HeaderStyle>
<ItemStyle CssClass="bodytext" HorizontalAlign="Left"></ItemStyle>
</asp:BoundField>
<asp:BoundField Visible="false" ItemStyle-CssClass="bodytext" HeaderStyle-HorizontalAlign="Left"
DataField="NewCopyNPaste" HeaderText="Flag" SortExpression="NewCopyNPaste">
<HeaderStyle HorizontalAlign="Left"></HeaderStyle>
<ItemStyle CssClass="bodytext" HorizontalAlign="Left"></ItemStyle>
</asp:BoundField>
<asp:BoundField Visible="false" ItemStyle-CssClass="bodytext" HeaderStyle-HorizontalAlign="Left"
DataField="textColor" HeaderText="textColor" SortExpression="textColor">
<HeaderStyle HorizontalAlign="Left"></HeaderStyle>
<ItemStyle CssClass="bodytext" HorizontalAlign="Left"></ItemStyle>
</asp:BoundField>
<asp:BoundField Visible="false" ItemStyle-CssClass="bodytext" HeaderStyle-HorizontalAlign="Left"
DataField="Backgroundcolor" HeaderText="Backgroundcolor" SortExpression="Backgroundcolor">
<HeaderStyle HorizontalAlign="Left"></HeaderStyle>
<ItemStyle CssClass="bodytext" HorizontalAlign="Left"></ItemStyle>
</asp:BoundField>
<asp:TemplateField ItemStyle-CssClass="bodytext" HeaderStyle-HorizontalAlign="Left"
HeaderText="Edit">
<ItemTemplate>
<asp:HyperLink ID="hypEdit" runat="server" ImageUrl="../../Images/grdEdit.png"></asp:HyperLink>
</ItemTemplate>
<HeaderStyle HorizontalAlign="Left"></HeaderStyle>
<ItemStyle CssClass="bodytext" HorizontalAlign="Left"></ItemStyle>
</asp:TemplateField>
<asp:TemplateField ItemStyle-CssClass="bodytext" HeaderStyle-HorizontalAlign="Left"
HeaderText="Delete">
<ItemTemplate>
<asp:HyperLink ID="hypDelete" runat="server" ImageUrl="../../Images/grdDelete.png"></asp:HyperLink>
</ItemTemplate>
<HeaderStyle HorizontalAlign="Left"></HeaderStyle>
<ItemStyle CssClass="bodytext" HorizontalAlign="Left"></ItemStyle>
</asp:TemplateField>
<asp:TemplateField ItemStyle-CssClass="bodytext" HeaderStyle-HorizontalAlign="Left"
HeaderText="Code">
<ItemTemplate>
<a href='javascript:popupPageWH("../../AdManager/GenerateCode.aspx?AdvID=<%# Container.DataItem("AdvID") %>","theWindow","750","250")'
style="cursor: hand;"><img src="../../Images/arrow_circle_double.png" style="border:0px;" /></a>
</ItemTemplate>
<HeaderStyle HorizontalAlign="Left"></HeaderStyle>
<ItemStyle CssClass="bodytext" HorizontalAlign="Left"></ItemStyle>
</asp:TemplateField>
</Columns>
<RowStyle Height="20px" ForeColor="#000066" />
<FooterStyle BackColor="White" ForeColor="#000066" />
<PagerStyle BackColor="White" ForeColor="#000066" HorizontalAlign="Left" />
<SelectedRowStyle BackColor="#669999" Font-Bold="True" ForeColor="White" />
<HeaderStyle BackColor="#005b90" Font-Bold="True" ForeColor="White" />
</asp:GridView>

To enable pagination & sorting first add these attribute to your Gridview control AllowPaging=”True” AllowSorting=”True”. Define DataKeyNames to your Gridview.

from Code-Behind

In your Code-Behind file first declare two variables ASCENDING & DESCENDING.

Dim ASCENDING As String = " ASC"
Dim DESCENDING As String = " DESC"

Then to Create PageIndexChanging event for your Gridview & add the below Code. Directly don’t Copy the below Code. First Create event then Copy the Code Inside.

Protected Sub grdEditViewAll_PageIndexChanging(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewPageEventArgs) Handles grdEditViewAll.PageIndexChanging
grdEditViewAll.PageIndex = e.NewPageIndex
grdEditViewAll.DataBind()
End Sub

Then to implement Sorting implement the following. Here I created events for my Gridview while implementing make sure you updated correctly.

Protected Sub grdEditViewAll_Sorting(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewSortEventArgs) Handles grdEditViewAll.Sorting
Dim sortExpression As String = e.SortExpression
If GridViewSortDirection = SortDirection.Ascending Then
GridViewSortDirection = SortDirection.Descending
SortGridView(sortExpression, DESCENDING)
Else
GridViewSortDirection = SortDirection.Ascending
SortGridView(sortExpression, ASCENDING)
End If
End Sub

Public Sub SortGridView(ByVal sortExpression As String, ByVal direction As String)
Dim dtable As DataTable = ds.Tables(0)
Dim dview As New DataView(dtable)
dview.Sort = sortExpression & direction
grdEditViewAll.DataSource = dview
grdEditViewAll.DataBind()
End Sub

Private Property GridViewSortDirection() As SortDirection
Get
If ViewState("sortDirection") Is Nothing Then
ViewState("sortDirection") = SortDirection.Ascending
End If
Return CType(ViewState("sortDirection"), SortDirection)
End Get
Set(ByVal Value As SortDirection)
ViewState("sortDirection") = Value
End Set
End Property

The post How to implement Paging and Sorting in ASP.NET Gridview Example? appeared first on OneStop Shop.

During we display data in a Gridview in many places Customer wants to implement checkbox in the grid for Select all & individual rows. Using this feature user can edit or delete records. Expected behavior is like user can select the rows which one he/she want to edit or delete. For edit purpose only one row need to select. While for delete multiple rows can be OK. During delete we need to ask confirmation. After confirmation we can go for delete records. The same I implemented in my App. Sharing you the code from there. Hope it will help you to implement your own.

ASP.NET Gridview

<asp:GridView DataKeyNames="VisitorTrackingID" CssClass="bodytext" AutoGenerateColumns="false" PageSize="18"
AllowPaging="True" AllowSorting="True" ID="grdVisitorTracking" runat="server"
Width="100%" CellPadding="2" BackColor="White" BorderColor="#CCCCCC"
BorderStyle="None" BorderWidth="1px">
<Columns>
<asp:TemplateField>
<HeaderTemplate>
<input type="checkbox" style="width: 20px;" id="chkAll" onclick="javascript:checkAll(this);" />
</HeaderTemplate>
<ItemTemplate>
<input type="checkbox" style="width: 20px;" id="chkSelect" runat="server" name="chkSelect" />
</ItemTemplate>
<HeaderStyle Width="25px"/>
</asp:TemplateField>
<asp:BoundField ItemStyle-CssClass="bodytext" HeaderStyle-HorizontalAlign="Left"
DataField="TrackingID" HeaderText="Tracking ID" SortExpression="TrackingID">
<HeaderStyle HorizontalAlign="Left"></HeaderStyle>
<ItemStyle HorizontalAlign="Left"></ItemStyle>
</asp:BoundField>
<asp:BoundField ItemStyle-CssClass="bodytext" HeaderStyle-HorizontalAlign="Left"
DataField="TrackingCompany" HeaderText="Company" SortExpression="TrackingCompany">
<HeaderStyle HorizontalAlign="Left"></HeaderStyle>
<ItemStyle HorizontalAlign="Left"></ItemStyle>
</asp:BoundField>

<asp:TemplateField HeaderStyle-HorizontalAlign="Left" HeaderText="Weblink" SortExpression="TrackingUrl">
<ItemTemplate>
<a href='<%# Container.DataItem("TrackingUrl") %>' target="_blank" style="cursor: hand;">
<%# Container.DataItem("TrackingUrl") %></a>
</ItemTemplate>
<HeaderStyle HorizontalAlign="Left"></HeaderStyle>
<ItemStyle HorizontalAlign="Left"></ItemStyle>
</asp:TemplateField>

<asp:TemplateField ItemStyle-CssClass="bodytext" HeaderStyle-HorizontalAlign="Left" HeaderText="Edit">
<ItemTemplate>
<asp:HyperLink ID="hypEdit" runat="server" ImageUrl="../Images/grdEdit.png"></asp:HyperLink>
</ItemTemplate>
<HeaderStyle HorizontalAlign="Left"></HeaderStyle>
<ItemStyle CssClass="bodytext" HorizontalAlign="Left"></ItemStyle>
</asp:TemplateField>
</Columns>
<RowStyle Height="20px" ForeColor="#000066" />
<FooterStyle BackColor="White" ForeColor="#000066" />
<PagerStyle BackColor="White" ForeColor="#000066" HorizontalAlign="Left" />
<SelectedRowStyle BackColor="#669999" Font-Bold="True" ForeColor="White" />
<HeaderStyle BackColor="#005b90" Font-Bold="True" ForeColor="White" />
<%--<AlternatingRowStyle BackColor="#E1F0FF" />--%>
</asp:GridView>

To implement delete functionality depending upon those rows we selected, here I added checkbox in the TemplateField of my Grid. For Select All I added a checkbox in HeaderTemplate & for rows I added another checkbox (HTML Control) in ItemTemplate. To make Select All operate on its onClick event I am calling a JavaScript function checkAll(this).

CheckAll() Function

function checkAll(obj)
{
if(obj.checked) markAllState = true;
else markAllState = false;
frm = document.forms[0];
for(i=0;i< frm.elements.length;i++)
{
e = frm.elements[i];
//GridView2$ctl01$check" type="checkbox" id="GridView2_ctl01_check
if (e.type == 'checkbox' && e.name != 'GridView2$ctl01$check')
{
temp='e.checked = '+markAllState;
eval(temp);
}
}
}

This function is responsible to Check all rows in the grid. The logic I implemented here is first I am getting all the checkbox from the form. Then to identify grid related checkbox I am doing a conditional checking if (e.type == ‘checkbox’ && e.name != ‘GridView2$ctl01$check’).

Once rows are selected to proceed ahead delete operation we need to show a confirmation to the user. To handle this I implemented the below JavaScript function.

Delete User Confirmation Function

function deluser()
{
var j= 0;
frm = document.forms[0];
for(i=0;i< frm.elements.length;i++)
{
e = frm.elements[i];

if (e.type == 'checkbox')
{
if(e.checked==true)
j=j+1;
}
}
//if(j>1 || j<1)
if(j<1)
{
alert("Please select a Visitor Tracking to Delete.")
return false;
}
//return true;
var con = confirm("Are you sure, You want to delete this Visitor Tracking.");
if(con) return true;
else return false;
}

This function checks state of the Check-boxes. If checkbox is checked it means user selected that row for delete. To get the confirmation from user showing a confirmation window with message “Are you sure, You want to delete this Visitor Tracking.”.

This is all about front-end. After user confirmation we need to fire delete query from code behind. Look at the Code below.

Code-Behind Delete Query

Protected Sub btnDel_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnDel.Click
Dim i As Integer
For i = 0 To grdVisitorTracking.Rows.Count - 1
Dim row As GridViewRow = grdVisitorTracking.Rows(i)
Dim ischecked As Boolean = (CObj(row).FindControl("chkSelect")).Checked
If (ischecked) Then
aDel.Add(grdVisitorTracking.DataKeys.Item(i).Value)
End If
Next
If Not aDel.Count <> 0 Then
'Do Nothing
Else
'Dim confirm = MsgBox("Are you sure you want to delete this item", MsgBoxStyle.OkCancel)
'If confirm = 1 Then
For i = 0 To aDel.Count - 1

Dim sDelStr As String = "DELETE FROM VisitorsTracking WHERE VisitorTrackingID=" & aDel(i)
Dim oDelComm As New SqlCommand(sDelStr, sqlConn)
sqlConn.Open()
oDelComm.ExecuteNonQuery()
sqlConn.Close()

grdVisitorTracking.DataBind()
Next
End If

Response.Redirect("../ADMIN/EditVisitorTracking.aspx")
End Sub

Finally for delete operation in Code-behind I am detecting chkSelect state. If it returns true I am storing its value to an array “aDel”. In next phase checking the count of aDel if it is greater then zero then executing SQL Delete command against that particular record id.

The post In a dynamic ASP.NET Gridview Delete row example appeared first on OneStop Shop.

Stored procedures are precompiled SQL statements stored in a database, offering improved performance, security, and maintainability. In VB.NET, executing a stored procedure from a code-behind file involves connecting to the database, setting up command objects, and handling parameters. This guide provides a step-by-step approach to executing stored procedures efficiently.

Experienced programmers prefer to use stored procedures in place of inline SQL Query. There are several advantages of using stored procedure. First of all stored procedure provides security & it helps to improve performance. Once a stored procedure execute it cached on the server. Stored procedure are easy to maintain & debug like a separate unit. Stored procedure can be tested independent of the application. In this session let us show you in Microsoft Technology VB.NET how to execute a stored procedure from the Code behind file.

In the below example I am using the stored procedure “USP_SearchLogo”. This stored procedure accepts 4 parameters. To execute this stored procedure here I am creating a new instance (SearchLogoCmd) of SqlCommand object by passing the stored procedure name & connection details (Connection String). Then to make compiler know that we are using stored procedure in command object in place of SQL Query, I defined command type to StoredProcedure. Now I need to pass parameter values before execute the procedure. To do that I am using SearchLogoCmd.Parameters.Add method. In this method I am passing parameter name with the data type depending upon the Stored procedure. Finally executing the Command object using ExecuteReader.

Execute a Stored Procedure from VB.NET Example

Dim SearchLogoCmd As New SqlCommand("USP_SearchLogo", sqlConn)

SearchLogoCmd.CommandType = CommandType.StoredProcedure

SearchLogoCmd.Parameters.Add("@NativeFlag", SqlDbType.NVarChar).Value = Request("NativeFlag")
SearchLogoCmd.Parameters.Add("@LogoName", SqlDbType.NVarChar).Value = Trim(txtLogoName.Text)
SearchLogoCmd.Parameters.Add("@LogoFileName", SqlDbType.NVarChar).Value = Trim(txtFileName.Text)
SearchLogoCmd.Parameters.Add("@Status", SqlDbType.NVarChar).Value = ddlStatus.SelectedValue

Try
sqlConn.Open()
ds = ConvertDataReaderToDataSet(SearchLogoCmd.ExecuteReader())

grdImageFiles.DataSource = ds
grdImageFiles.DataBind()

Catch ex As Exception
Response.Write(ex.ToString())
Finally
sqlConn.Close()
End Try

You may noticed here I used a function ConvertDataReaderToDataSet(). This is because of here my Stored procedure returns reader specific data. To bind those data to my gridview “grdImageFiles” using a DataSet I used this function.

Best Practices

1. Use Parameterized Queries – Avoid SQL injection by always using parameters.
2. Dispose Objects – Utilize `Using` statements to ensure proper disposal of `SqlConnection` and `SqlCommand`.
3. Connection Pooling – Let ADO.NET manage connections efficiently.
4. Error Logging – Log exceptions for debugging and monitoring.

Conclusion

Executing a stored procedure from VB.NET involves setting up a database connection, configuring a `SqlCommand` object, passing parameters, and handling results. Following these steps ensures secure and efficient database operations. By adhering to best practices, developers can maintain robust and scalable applications.

The post How to Execute a Stored Procedure from VB.NET Code behind File? appeared first on OneStop Shop.

During application development sometime we fetch data from the database using DataReader. Later to do some other operations we required that DataReader data in a DataSet. In this case the below function can help you. Here I created the function which will accept a DataReader & will return DataSet for you.

The Logic I implemented here is very simple. After receiving DataReader as a parameter to the function I am storing its schema to a DataTable. Then using a for loop I am adding row & columns definition to the DataTable. After define the row & column adding DataTable to DataSet using dataSet.Tables.Add method. Now to fill data in DataTable executing a while loop until reader.Read(). Creating an instance for new row & using a for loop adding DataRow dynamically. To store value from DataReader here I am using GetValue() method. Finally using dataTable.Rows.Add method adding all rows to the DataTable. Already before binding rows data, my DataTable is added to DataSet. Now by just using return dataSet I am getting DataSet with DataReader values.

While Creating this function create it as public shared function so that you can easily use this with your executeReader method like ds = convertDataReaderToDataSet(cmd.ExecuteReader()).

DataReader to DataSet Converter Function

Public Shared Function convertDataReaderToDataSet(ByVal reader As SqlDataReader) As DataSet
Dim dataSet As New DataSet()
Do
' Create a New Data Table to store DataReader data temporarily
Dim tblSchema As DataTable = reader.GetSchemaTable()
Dim dataTable As New DataTable()

If tblSchema IsNot Nothing Then
For i As Integer = 0 To tblSchema.Rows.Count - 1
Dim dataRow As DataRow = tblSchema.Rows(i)
' Creating unique Column name to Data Table
Dim columnName As String = DirectCast(dataRow("ColumnName"), String)
Dim column As New DataColumn(columnName, DirectCast(dataRow("DataType"), Type))
dataTable.Columns.Add(column)
Next

dataSet.Tables.Add(dataTable)

' Fill the data table from Data Reader
While reader.Read()
Dim dataRow As DataRow = dataTable.NewRow()

For i As Integer = 0 To reader.FieldCount - 1
dataRow(i) = reader.GetValue(i)
Next

dataTable.Rows.Add(dataRow)
End While
Else
' No records to Return
Dim column As New DataColumn("AffectedRows")
dataTable.Columns.Add(column)
dataSet.Tables.Add(dataTable)
Dim dataRow As DataRow = dataTable.NewRow()
dataRow(0) = reader.RecordsAffected
dataTable.Rows.Add(dataRow)
End If
Loop While reader.NextResult()
Return dataSet
End Function

The post SqlDataReader to DataSet Converter VB.NET Function appeared first on OneStop Shop.

During web application design some time we required to upload local files to server. Let’s talk about a job portal, where candidates need to upload their career profiles. To provide this facility we need to implement file uploading in our application. If your application is designed using Microsoft Technology ASP.NET compare to other languages in web it is very easy to implement File uploading. In the below example I created a sample application to implement ASP.NET File Upload to Server.

To implement ASP.NET File Uploading Create a new web project using Visual Studio. Then in the root folder add a folder “upload”. Look at the code below in my Default.aspx.vb file I used Server.MapPath to generate the path for file uploading. Here I used the folder upload, where user file will store. You can update this as per your folder structure.

Understanding the FileUpload Control

The FileUpload control is a powerful tool that provides an easy way to allow users to send files from their local system to a web server. With this control, developers can efficiently handle file uploads while also ensuring they meet security standards. The control enables applications to collect essential information from users, which can be critical for operations like applying for jobs.

Look at my aspx file to make this presentation simple I used one ASP.NET file uploader control & a button. On click of my button btnUpload I am calling the file uploader SaveAs method with the parameter file path. By declaring fileUploader.FileName I am uploading the file with similar name. If you want to generate different file name for uploaded files you can implement your logic here.

Keep remember by default file uploading supports the maximum size 4096 (4 MB) file. To upload larger file you need to update your web.config file as below.

<configuration>
<system.web>
<httpRuntime maxRequestLength="Size in KB" />
</system.web>
</configuration>

Default.aspx

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
<title>ASP.NET File Upload to Server Example</title>
</head>
<body>
<form id="frmUpload" runat="server">
<asp:FileUpload ID="fileUploader" runat="server" /><br />
<br />
<asp:Button ID="btnUpload" runat="server" Text="Upload File" />&nbsp;<br />
<br />
<asp:Label ID="lblStatus" runat="server"></asp:Label>
</form>
</body>
</html>

Default.aspx.vb

Partial Class _Default
Inherits System.Web.UI.Page

Protected Sub btnUpload_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnUpload.Click
'Checking is file uploader control has any file.
If fileUploader.HasFile Then
Try
'Using SaveAs method to upload the file.
fileUploader.SaveAs(Server.MapPath("upload/") & fileUploader.FileName)
'After Successfully file uploaded show msg to user.
lblStatus.Text = "File name: " & fileUploader.PostedFile.FileName & "<br>" & "File Size: " & fileUploader.PostedFile.ContentLength & " kb<br>" & "Content type: " & fileUploader.PostedFile.ContentType()
Catch ex As Exception
'Handling exception if any.
lblStatus.Text = "ERROR: " & ex.Message.ToString()
End Try
Else
'Showing msg if user hit on upload button without selected a valid file.
lblStatus.Text = "You have not specified a file."
End If
End Sub
End Class

Conclusion

The capability to upload files in a web application is essential, especially for platforms like job portals where candidates frequently submit their resumes. By using the FileUpload control, developers can create a seamless experience for users while ensuring the application remains secure and efficient. Implementing proper validation and feedback mechanisms will further enhance the effectiveness of file uploads, making them a vital feature of any job application platform.

The post ASP.NET File Upload to Server using FileUpload Control Example appeared first on OneStop Shop.

To present data in tabular form in ASP.NET Gridview is so popular. Nearly 90% ASP.NET Developers love to work with Gridview. In a Gridview we can bind several data sources. Gridview is easy & take less time to implement. Any time of Customization we required to show in a tabular data it is possible using Gridview. In this example let us discuss a situation where On mouse over I want to Highlight Gridview Selected Row. To do this here I used a XML data source to display records in Gridview. On over the mouse event I am binding 2 different CSS classes to highlight the row.

From several events of a Gridview control RowCreated is fired when a row created programmatically. To add my CSS classes for highlight feature inside grdDemo_RowCreated() event I added 2 events onmouseover & onmouseout to each row of the Grid. In onmouseover event I am assigning the CSS class hightlighrow with background-color:#CCCCCC;. While when user remove his mouse from the row to revert back into previous background color I added onmouseout event with CSS class normalrow. normalrow CSS class contains the default background color white. Look at the demo code below.

Default.aspx

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
<title>On Mouseover how to Highlight ASP.NET Gridview Selected Row</title>
<style type="text/css">
.normalrow
{
background-color:white;
}
.hightlighrow
{
background-color:#cccccc;
}
</style>
</head>
<body>
<form id="frmGridview" runat="server">
<asp:GridView ID="grdDemo" runat="server">
</asp:GridView>
</form>
</body>
</html>

Default.aspx.vb

Imports System.Data

Partial Class _Default
Inherits System.Web.UI.Page

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
Dim employeelog = New DataSet
employeelog.ReadXml(MapPath("employees.xml"))
grdDemo.DataSource = employeelog
grdDemo.DataBind()
End If
End Sub

Protected Sub grdDemo_RowCreated(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles grdDemo.RowCreated
If e.Row.RowType = DataControlRowType.DataRow Then
e.Row.Attributes.Add("onmouseover", "this.className='hightlighrow'")
e.Row.Attributes.Add("onmouseout", "this.className='normalrow'")
End If
End Sub
End Class

employees.xml

<?xml version="1.0" encoding="ISO-8859-1"?>
<employees>
<emp>
<name>Abhishek Srivastab</name>
<designation>Technical Head</designation>
<company>Cognizant Solution</company>
<salary>75,000</salary>
</emp>
<emp>
<name>Biswabhusan Panda</name>
<designation>Project Manager</designation>
<company>TATA Technology</company>
<salary>86,000</salary>
</emp>
<emp>
<name>Sunanda Patnayak</name>
<designation>Team Leader</designation>
<company>Wipro</company>
<salary>82,000</salary>
</emp>
<emp>
<name>Raghav Roy</name>
<designation>Sr. UI Developer</designation>
<company>Persistent System</company>
<salary>61,000</salary>
</emp>
</employees>

The post On Mouseover how to Highlight ASP.NET Gridview Selected Row appeared first on OneStop Shop.

To present data from several data source ASP.NET introduced controls like datagrid, datalist & repeater. Compare to datagrid repeater is connection oriented & gives faster access to data. Inner logic of repeater is similar to pointer. During data bind for custom structure repeater control is very useful. In this example I created a demo app to display a XML file data in tabular shape using ASP.NET repeater control.

Fetch Data from a XML File

In the below example I have a employees.xml file which contains name, designation, company & salary of several employees. What I want is, I want to display these data in a HTML Table using ASP.NET repeater control. To achieve this in code-behind file “Default.aspx.vb” page_load event I am creating an instance of new DataSet as employeelog. Then using ReadXml() method I am assigning the XML file data to the DataSet employeelog. Later to bind these data in repeater control I pointed the repeater control DataSource to DataSet employeelog. Finally calling emplog.DataBind() to bind XML data.

Now in Default.aspx page I have my repeater control is with data. To show these data in particular table rows & columns here I used <%#Container.DataItem(“Respective Field Name”)%> inside ItemTemplate of repeater control. To make each data rows user friendly here with ItemTemplate I used AlternatingItemTemplate with background color #e8e8e8.

Data from a XML File using ASP.NET Repeater

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
<title>How to bind XML data to ASP.NET repeater control?</title>
</head>
<body>
<form id="frmRepeater" runat="server">
<asp:Repeater id="emplog" runat="server">

<HeaderTemplate>
<table border="1" width="100%">
<tr>
<th>Employee Name</th>
<th>Designation</th>
<th>Company</th>
<th>Monthly Salary</th>
</tr>
</HeaderTemplate>

<ItemTemplate>
<tr>
<td><%#Container.DataItem("name")%> </td>
<td><%#Container.DataItem("designation")%> </td>
<td><%#Container.DataItem("company")%> </td>
<td><%#Container.DataItem("salary")%> </td>
</tr>
</ItemTemplate>

<AlternatingItemTemplate>
<tr bgcolor="#e8e8e8">
<td><%#Container.DataItem("name")%> </td>
<td><%#Container.DataItem("designation")%> </td>
<td><%#Container.DataItem("company")%> </td>
<td><%#Container.DataItem("salary")%> </td>
</tr>
</AlternatingItemTemplate>

<FooterTemplate>
</table>
</FooterTemplate>

</asp:Repeater>
</form>
</body>
</html>

Default.aspx.vb

Imports System.Data

Partial Class _Default
Inherits System.Web.UI.Page

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
Dim employeelog = New DataSet
employeelog.ReadXml(MapPath("employees.xml"))
emplog.DataSource = employeelog
emplog.DataBind()
End If
End Sub
End Class

XML File to Fetch Data (employees.xml)

<?xml version="1.0" encoding="ISO-8859-1"?>
<employees>
<emp>
<name>Sujata Panigraphi</name>
<designation>Chief Business Officer</designation>
<company>Infosys</company>
<salary>92,000</salary>
</emp>
<emp>
<name>Abhishek Srivastab</name>
<designation>Technical Head</designation>
<company>Cognizant Solution</company>
<salary>75,000</salary>
</emp>
<emp>
<name>Biswabhusan Panda</name>
<designation>Project Manager</designation>
<company>TATA Technology</company
<salary>86,000</salary>
</emp>
<emp>
<name>Sunanda Patnayak</name>
<designation>Team Leader</designation>
<company>Wipro</company>
<salary>82,000</salary>
</emp>
<emp>
<name>Raghav Roy</name>
<designation>Sr. UI Developer</designation>
<company>Persistent System</company>
<salary>61,000</salary>
</emp>
<emp>
<name>John Markoni</name>
<designation>QA Developer</designation>
<company>Intel Corporation</company>
<salary>32,000</salary>
</emp>
<emp>
<name>Megha Srivastab</name>
<designation>HTML5 Developer</designation>
<company>Synechron Technologies</company>
<salary>22,000</salary>
</emp>
<emp>
<name>Manjulata Panda</name>
<designation>Sr. UI Developer</designation>
<company>Dell Technology</company>
<salary>72,000</salary>
</emp>
<emp>
<name>Bidyadhara Panda</name>
<designation>Sr. Oracle Developer</designation>
<company>InfoSys BPO</company>
<salary>45,000</salary>
</emp>
<emp>
<name>Sinha Malhotra</name>
<designation>Front-end Developer</designation>
<company>ESSPL</company>
<salary>32,000</salary>
</emp>
</employees>

The post How to Fetch Data from a XML File using ASP.NET Repeater Control? appeared first on OneStop Shop.

Security is a key in Information Technologies. From banking to insurance domain every where we want our data to be safe. In web technologies security is a major factor. Looking into this Microsoft provides Cryptography in their advanced programming languages .NET Framework. There are several types of encryption & decryption available in the chapter of Cryptography. The most common used Cryptography functions are RC2, MD5, Triple Des, 128 Encryption & Byte.

In the area of day today developments programmers are looking for a ready-made function to encrypt or decrypt their strings. To start with Cryptography Microsoft provides the base Class System.Security.Cryptography. You need to import this System Class before using the following functions. Here with I am sharing the functions how to encrypt or decrypt a string using vb.net. With these functions you can easily encrypt or decrypt a string to RC2, MD5, 128 & Byte format. Enjoy the programming.

Cryptography function to encrypt a String

Public Function EncodeString(ByVal value As String, ByVal key As String) As String
Dim crdes As New System.Security.Cryptography.TripleDESCryptoServiceProvider
crdes.IV = New Byte(7) {}
Dim pdb As New System.Security.Cryptography.PasswordDeriveBytes(key, New Byte(-1) {})
crdes.Key = pdb.CryptDeriveKey("RC2", "MD5", 128, New Byte(7) {})
Dim ms As New IO.MemoryStream((value.Length * 2) - 1)
Dim encStream As New System.Security.Cryptography.CryptoStream(ms, crdes.CreateEncryptor(), System.Security.Cryptography.CryptoStreamMode.Write)
Dim plainBytes As Byte() = Text.Encoding.UTF8.GetBytes(value)
encStream.Write(plainBytes, 0, plainBytes.Length)
encStream.FlushFinalBlock()
Dim encryptedBytes(CInt(ms.Length - 1)) As Byte
ms.Position = 0
ms.Read(encryptedBytes, 0, CInt(ms.Length))
encStream.Close()
Return Convert.ToBase64String(encryptedBytes)
End Function

Cryptography function to decrypt a String

Public Function DecodeString(ByVal value As String, ByVal key As String) As String
Dim crdes As New System.Security.Cryptography.TripleDESCryptoServiceProvider
crdes.IV = New Byte(7) {}
Dim pdb As New System.Security.Cryptography.PasswordDeriveBytes(key, New Byte(-1) {})
crdes.Key = pdb.CryptDeriveKey("RC2", "MD5", 128, New Byte(7) {})
Dim encryptedBytes As Byte() = Convert.FromBase64String(value)
Dim ms As New IO.MemoryStream(value.Length)
Dim decStream As New System.Security.Cryptography.CryptoStream(ms, crdes.CreateDecryptor(), System.Security.Cryptography.CryptoStreamMode.Write)
decStream.Write(encryptedBytes, 0, encryptedBytes.Length)
decStream.FlushFinalBlock()
Dim plainBytes(CInt(ms.Length - 1)) As Byte
ms.Position = 0
ms.Read(plainBytes, 0, CInt(ms.Length))
decStream.Close()
Return Text.Encoding.UTF8.GetString(plainBytes)
End Function

The post RC2, MD5, Triple Des, Byte, 128 Cryptography functions appeared first on OneStop Shop.