[C#]
＜%@ WebService Language="C#" Class="PrimeFactorizer" %＞

using System;
using System.Collections;
using System.Web.Services;

class PrimeFactorizer {

　[WebMethod]
　public long[] Factorize(long factorizableNum){
　　ArrayList outList = new ArrayList();
　　long i = 0;
　　int j;
　　try{
　　　long Check = factorizableNum;

　　　//Go through every possible integer
　　　//factor between 2 and factorizableNum / 2.
　　　//Thus, for 21, check between 2 and 10.
　　　for (i = 2; i ＜ (factorizableNum / 2); i++){
　　　　while(Check % i == 0){
　　　　　outList.Add(i);
　　　　　Check = (Check/i);
　　　　}
　　　}
　　　//Double-check to see how many prime factors have been added.
　　　//If none, add 1 and the number.
　　　j = outList.Count;
　　　if (j == 0) {
　　　　outList.Add(1);
　　　　outList.Add(factorizableNum);
　　　}
　　　j = outList.Count;

　　　//Return the results and
　　　//create an array to hold them.
　　　long[] primeFactor = new long[j];
　　　for (j = 0; j ＜ outList.Count; j++){
　　　　//Pass the values one by one, making sure
　　　　//to convert them to type ulong.
　　　　primeFactor[j] = Convert.ToInt64(outList[j]);
　　　}
　　　return primeFactor;
　　}
　　catch (Exception) {
　　　return null;
　　}
　}
}

[Visual Basic]
＜%@ WebService Class="PrimeFactorizer" Language="VB" %＞
Imports System
Imports System.Collections
Imports System.Web.Services

Public Class PrimeFactorizer
＜WebMethod＞ _
Public Function Factorize(factorizableNum As Long) As Long()
　Dim outList As New ArrayList()
　Dim i As Long = 0
　Dim j As Integer
　Try
　　Dim Check As Long = factorizableNum

　　'Go through every possible integer
　　'factor between 2 and factorizableNum / 2.
　　'Thus, for 21, check between 2 and 10.
　　For i = 2 To CLng(factorizableNum / 2) - 1
　　　While Check Mod i = 0
　　　　outList.Add(i)
　　　　Check = CLng(Check / i)
　　　End While
　

推荐阅读更多>

1. GridView 数据绑定有关问题
2. 一个向父窗体传值的简单有关问题
3. 本来每行有不同颜色，怎么改变各行的颜色
4. 怎么引用一个 Html 控件对象
5. 怎么删除A表中,A_1字段相同的记录，但还保留一条（A_Time字段时间最大的那一条）
6. 如何把0,1,2,3.依次替换成A,B,C,D.
7. 名称地址（Namespace）_Asp.Net基础教程
8. 水晶表格工具栏不可使用
9. 怎么用正则表达式限制TextBox中的字符个数
10. 这篇vb写的,哪位高手帮小弟我翻译成C#小弟我用网上的翻译器,出现异常,小弟我也不会改,解决100分
11. COM与.NET的互操作（初级）
12. gridview导入excel有关问题
13. 求vs2000部署项目图解,该如何处理
14. ASP.net的URL重写
15. 请问CKEditor编辑时自动加上 的有关问题
16. COM+ Web 服务：通过复选框路由到 XML Web Services(1) （微软中国）
17. 简单的循环有关问题
18. asp.net高级教程（四）-实战篇
19. 初学者再次Calendar控件.style.display = 'none'后就不能使用了
20. 《.net编程先锋C#》第九章 配置和调度（转）