求在vs2008下用C#写登录网页和sql2005连接的代码(给个详细的代码谢谢了)_百度知道
求在vs2008下用C#写登录网页和sql2005连接的代码(给个详细的代码谢谢了)
只要求有一个登录网页能进入另一个页面，就是说要输入密码/帐号才能登录（密码和帐号要和sql2005里的数据库student里的xuesheng表里的学号和姓名对应）
求这里的连接代码！！！尽量详细一点我刚刚学，谢谢了（是网页的啊！！）谢谢！！！要是能给个具体的列子最好，我用的是vs2008和sql2005Express满意会追加分的，谢谢！
急急！！！！1希望高手帮帮忙吧！！！
提问者采纳
using Susing System.Collections.Gusing System.Lusing System.Dusing System.Data.SqlCusing System.Wusing System.Web.Cusing System.Web.UI; private void button1_Click(object sender, EventArgs e)
{//检查是否输入学号与密码
if (this.textBox1.Text == &&)
AlertMessage(&请输入学号&);
this.textBox1.Focus();
if (this.textBox2.Text == &&)
AlertMessage(&请输入密码&);
this.textBox2.Focus();
}string ConnStr = &&;//数据源
string SQLStr = &select * from student where stuNum=@stuNum and stuPassword=@stuPassword&;//同时将账号和密码找出
SqlConnection MyCon = new SqlConnection(CString);
SqlCommand MyCom = new SqlCommand();
MyCom.Connection = MyC
mandType = CommandType.T
mandText = SQLS
SqlParameter[] paras = new SqlParameter[2];
paras[0] = new OleDbParameter(&@stuNum&, OleDbType.VarChar, 12);
paras[0].Value = this.textBox1.Text.Trim();
paras[1] = new OleDbParameter(&@stuPassword&, OleDbType.VarChar, 20);
paras[1].Value = this.textBox2.Text.Trim();
for (int i = 0; i & paras.L i++)
MyCom.Parameters.Add( paras[i]);
MyCon.Open();
MessageBox.Show(&连接失败！&, &出错&);
OleDbDataReader Mydr =com.ExecuteReader();//执行SELECT命令得到
if (Mydr.Read())//该循环依次读取数据集中的每一条记录的数据
LoginInfo.IsLogin =
LoginInfo.StuNum = Mydr[&stuNum&].ToString();
AlertMessage(&登录成功！&);
this.Close();
{//无则提示找不到
MessageBox.Show(&请检查账户和密码是否正确&);
Mydr.Close();
conn.Close();
运行还是出错啊！！！
你就把using加上咯[大汗！]
提问者评价
谢谢你喽！辛苦你帮我，但因为你一会用sql一会用access的语句，虽然改了是没错了，运行还有点问题！
其他类似问题
vs2008的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁& & 复制代码代码如下:& & & & & & & & 选择文件& & & & & & & & && & & & & & 选择文件(excel)& & & & & & & & & & & & & & & & & & & & & & & & & & & & & & & & & & & & <%& & dim upfile_5xSoft_Stream& & Class upload_5xSoft& & dim Form,File,Version& & Private Sub Class_Initialize& & dim iStart,iFileNameStart,iFileNameEnd,iEnd,vbEnter,iFormStart,iFormEnd,theFile& & dim strDiv,mFormName,mFormValue,mFileName,mFileSize,mFilePath,iDivLen,mStr& & Version="任翔专用上传程序"& & if Request.TotalBytes<1 then Exit Sub& & set Form=CreateObject("Scripting.Dictionary")& & set File=CreateObject("Scripting.Dictionary")& & set upfile_5xSoft_Stream=CreateObject("Adodb.Stream")& & upfile_5xSoft_Stream.mode=3& & upfile_5xSoft_Stream.type=1& & upfile_5xSoft_Stream.open& & upfile_5xSoft_Stream.write Request.BinaryRead(Request.TotalBytes)& & vbEnter=Chr(13)&Chr(10)& & iDivLen=inString(1,vbEnter)+1& & strDiv=subString(1,iDivLen)& & iFormStart=iDivLen& & iFormEnd=inString(iformStart,strDiv)-1& & while iFormStart < iFormEnd& & iStart=inString(iFormStart,"name=""")& & iEnd=inString(iStart+6,"""")& & mFormName=subString(iStart+6,iEnd-iStart-6)& & iFileNameStart=inString(iEnd+1,"filename=""")& & if iFileNameStart>0 and iFileNameStart<iFormEnd then& & iFileNameEnd=inString(iFileNameStart+10,"""")& & mFileName=subString(iFileNameStart+10,iFileNameEnd-iFileNameStart-10)& & iStart=inString(iFileNameEnd+1,vbEnter&vbEnter)& & iEnd=inString(iStart+4,vbEnter&strDiv)& & if iEnd>iStart then& & mFileSize=iEnd-iStart-4& & else& & mFileSize=0& & end if& & set theFile=new FileInfo& & theFile.FileName=getFileName(mFileName)& & theFile.FilePath=getFilePath(mFileName)& & theFile.FileSize=mFileSize& & theFile.FileStart=iStart+4& & theFile.FormName=FormName& & file.add mFormName,theFile& & else& & iStart=inString(iEnd+1,vbEnter&vbEnter)& & iEnd=inString(iStart+4,vbEnter&strDiv)& & if iEnd>iStart then& & mFormValue=subString(iStart+4,iEnd-iStart-4)& & else& & mFormValue=""& & end if& & form.Add mFormName,mFormValue& & end if& & iFormStart=iformEnd+iDivLen& & iFormEnd=inString(iformStart,strDiv)-1& & wend& & End Sub& & Private Function subString(theStart,theLen)& & dim i,c,stemp& & upfile_5xSoft_Stream.Position=theStart-1& & stemp=""& & for i=1 to theLen& & if upfile_5xSoft_Stream.EOS then Exit for& & c=ascB(upfile_5xSoft_Stream.Read(1))& & If c > 127 Then& & if upfile_5xSoft_Stream.EOS then Exit for& & stemp=stemp&Chr(AscW(ChrB(AscB(upfile_5xSoft_Stream.Read(1)))&ChrB(c)))& & i=i+1& & else& & stemp=stemp&Chr(c)& & End If& & Next& & subString=stemp& & End function& & Private Function inString(theStart,varStr)& & dim i,j,bt,theLen,str& & InString=0& & Str=toByte(varStr)& & theLen=LenB(Str)& & for i=theStart to upfile_5xSoft_Stream.Size-theLen& & if i>upfile_5xSoft_Stream.size then exit Function& & upfile_5xSoft_Stream.Position=i-1& & if AscB(upfile_5xSoft_Stream.Read(1))=AscB(midB(Str,1)) then& & InString=i& & for j=2 to theLen& & if upfile_5xSoft_Stream.EOS then& & inString=0& & Exit for& & end if& & if AscB(upfile_5xSoft_Stream.Read(1))AscB(MidB(Str,j,1)) then& & InString=0& & Exit For& & end if& & next& & if InString0 then Exit Function& & end if& & next& & End Function& & Private Sub Class_Terminate& & form.RemoveAll& & file.RemoveAll& & set form=nothing& & set file=nothing& & upfile_5xSoft_Stream.close& & set upfile_5xSoft_Stream=nothing& & End Sub& & Private function GetFilePath(FullPath)& & If FullPath
"" Then& & GetFilePath = left(FullPath,InStrRev(FullPath, "\"))& & Else& & GetFilePath = ""& & End If& & End function& & Private function GetFileName(FullPath)& & If FullPath
"" Then& & GetFileName = mid(FullPath,InStrRev(FullPath, "\")+1)& & Else& & GetFileName = ""& & End If& & End function& & Private function toByte(Str)& & dim i,iCode,c,iLow,iHigh& & toByte=""& & For i=1 To Len(Str)& & c=mid(Str,i,1)& & iCode =Asc(c)& & If iCode<0 Then iCode = iCode + 65535& & If iCode>255 Then& & iLow = Left(Hex(Asc(c)),2)& & iHigh =Right(Hex(Asc(c)),2)& & toByte = toByte & chrB("&H"&iLow) & chrB("&H"&iHigh)& & Else& & toByte = toByte & chrB(AscB(c))& & End If& & Next& & End function& & End Class& & Class FileInfo& & dim FormName,FileName,FilePath,FileSize,FileStart& & Private Sub Class_Initialize& & FileName = ""& & FilePath = ""& & FileSize = 0& & FileStart= 0& & FormName = ""& & End Sub& & Public function SaveAs(FullPath)& & dim dr,ErrorChar,i& & SaveAs=1& & if trim(fullpath)="" or FileSize=0 or FileStart=0 or FileName="" then exit function& & if FileStart=0 or right(fullpath,1)="/" then exit function& & set dr=CreateObject("Adodb.Stream")& & dr.Mode=3& & dr.Type=1& & dr.Open& & upfile_5xSoft_Stream.position=FileStart-1& & upfile_5xSoft_Stream.copyto dr,FileSize& & dr.SaveToFile FullPath,2& & dr.Close& & set dr=nothing& & SaveAs=0& & end function& & End Class& & %>& & <%& & function sqlstr(data)& & if not isnull(data) then& & sqlstr="'"& replace(data,"'","''") &"'"& & else& & sqlstr="'"& data &"'"& & end if& & end function& & %>& & <%& & session.CodePage=936& & Server.ScriptTimeOut=600000& & set upload=new upload_5xsoft& & set file=upload.file("filexls")& & %>& & <%& & if file.fileSize>0 then& & filename=year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)& & filename=filename+"."& & filenameend=file.filename& & filenameshow=file.filename& & filenameend=split(filenameend,".")& & if filenameend(1)="xls" then& & filename=filename&filenameend(1)& & file.saveAs Server.mappath("uploadfiles/"&filename)& & else& & response.write "数据格式不对！"& & response.write "& & & & & & & & & & & & 您可能感兴趣的文章:EXCEL数据上传到SQL SERVER中的简单实现方法Asp.net中把Excel数据存储至SQL Server中的具体实现方法如何把Excel数据导入到SQL2008数据库的实例方法Excel导入Sqlserver数据库脚本Excel数据导入Mysql数据库的实现代码把excel表格里的数据导入sql数据库的两种方法& & QQ空间
百度搜藏更多& & Tags：Excel SQLServer& & 复制链接收藏本文打印本文关闭本文返回首页& & 上一篇：asp 判断是否为搜索引擎蜘蛛的代码& & 下一篇：Microsoft JET Database Engine(0x)未指定错误的解决方法& & 相关文章asp下实现记录集内随机取记录的代码使用ODBC数据库管理Serv-U的FTP用户及相关ASP编程[附源码示例下载ASP新闻分页，将一篇过长的文章分页，生成静态页面asp在服务器把 XML 转换为 XHTML的实现代码asp adodb.stream对象的方法/属性asp下实现字符串的补充fill()asp 之上传漏洞终结篇asp ajax跨域提交数据asp实现限制搜索的关键字的函数asp验证Ip格式的函数& & 文章评论& & 最 近 更 新& & asp长文章用分页符来分页显示冒泡算法的三种JavaScript表示asp下实现替换远程文件为本地文件并保存远在ASP中用组件检测当前网卡地址的代码编写通用的asp防注入程序在Asp程序中取得表单所有内容的代码生成EAN13标准的条形码的ASP代码实例用asp实现网页调用doc附Response.Contentasp 多关键词搜索的简单实现方法比较详细的Asp伪静态化方法及Asp静态化探& & 热 点 排 行& & 错误类型：Provider (0x关于“未指定的错误”的问题 的比utf-8 网页不显示+utf-8网页乱码asp 字符串截取函数Asp 日期格式化问题C#入门教程之ListBox控件使用方法asp获取URL参数的几种方法分析总ASP注册登陆实例代码ASP UTF-8页面乱码+GB2312转UTF-asp UTF-8 乱码问题的解决方法小
说明：该文章系网友上传分享，若未进行原创声明，则表明该文章系转载自互联网；若该文章内容涉嫌侵权，请及时向
上一篇：下一篇：
相关经验教程
的原创经验被浏览，获得 ￥0.001 收益
的原创经验被浏览，获得 ￥0.001 收益
的原创经验被浏览，获得 ￥0.005 收益
的原创经验被浏览，获得 ￥0.005 收益
的原创经验被浏览，获得 ￥0.005 收益
的原创经验被浏览，获得 ￥0.005 收益
的原创经验被浏览，获得 ￥0.005 收益
的原创经验被浏览，获得 ￥0.001 收益
的原创经验被浏览，获得 ￥0.001 收益
的原创经验被浏览，获得 ￥0.005 收益
的原创经验被浏览，获得 ￥0.005 收益
的原创经验被浏览，获得 ￥0.005 收益
的原创经验被浏览，获得 ￥0.001 收益
的原创经验被浏览，获得 ￥0.005 收益
的原创经验被浏览，获得 ￥0.005 收益
的原创经验被浏览，获得 ￥0.005 收益
的原创经验被浏览，获得 ￥0.002 收益
的原创经验被浏览，获得 ￥0.001 收益
的原创经验被浏览，获得 ￥0.005 收益
的原创经验被浏览，获得 ￥0.001 收益
的原创经验被浏览，获得 ￥0.005 收益
的原创经验被浏览，获得 ￥0.001 收益
的原创经验被浏览，获得 ￥0.005 收益
的原创经验被浏览，获得 ￥0.005 收益asp.net MVC3 excel导入到sql server，怎么写？求代码！！
asp.net MVC3 excel导入到sql server，怎么写？求代码！！ 5
不区分大小写匿名
Excel数据导入到数据库， 可以分两个步骤：
第一步，先将Excel的数据读取到DataSet。
第二步，将DataSet中的数据逐条写入数据库。
&
这里我给你一个将Excel数据读取到DataSet的方法：
先引用：using System.Data.OleDb;
//读取Excel数据到DataSet
public DataSet ImportToDS(string fileName)
{
&&& string strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + fileName + ";Extended Properties=Excel 8.0";
&&& OleDbConnection connOleDb = new OleDbConnection(strConn);
&&& DataSet ds = new DataSet();
&&& OleDbDataAdapter da = new OleDbDataAdapter("select * from [Sheet1$]", connOleDb);
&&& da.Fill(ds);
&&&
}
得到数据的DataSet很容易就写入数据库了。
&
以上信息希望对你有帮助。。^^
等待您来回答
编程领域专家之前发表关于关于SQL Server 2005内置加密方法的链接是&, 但发现它的长度有限制,太长会不成功的加密,我发了email转给我的客户再转去问MS, 相关人员还没有给一个正确的答复.
下边我把我的测试代码贴下来:
--Create a table for test
CREATE TABLE [dbo].[SourceStringTable](
[ID] [int] NOT NULL,
[VarcharEngString] [varchar](max) NULL,
[NVarcharEngString] [nvarchar](max) NULL,
[NVarcharChnString] [nvarchar](max) NULL,
CONSTRAINT [PK_SourceStringTable] PRIMARY KEY CLUSTERED
)WITH (PAD_INDEX
= OFF, STATISTICS_NORECOMPUTE
= OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS
= ON, ALLOW_PAGE_LOCKS
= ON) ON [PRIMARY]
) ON [PRIMARY]
-----------------------------------------------------------------------
delete from SourceStringTable
--接受加密的英文字符串(varchar)最大长度是117
--接受加密的英文字符串(nvarchar)最大长度是58
--接受加密的中文字符串(nvarchar)最大长度是58(116 bytes)
declare @VarcharEngString varchar(max)
declare @NVarcharEngString nvarchar(max)
declare @NVarcharChnString nvarchar(max)
--/*Below three string all can encrypt and decrypt correctly*/
--length: 117
set @VarcharEngString='Based on NCSA Mosaic. NCSA Mosaic(TM); was developed at the National Center for Supercomputing Applications at the Un'
--length: 58
set @NVarcharEngString='Based on NCSA Mosaic. NCSA Mosaic(TM); was developed at th'
--length: 58
set @NVarcharChnString='改进产品以满足用户不断增长的需求，所以不应将这些信息视为腾腾讯公司的承诺，另一方面，腾讯公司也不能保证在发布日期之后'
--/*******************/
insert into SourceStringTable(ID, VarcharEngString, NVarcharEngString, NVarcharChnString)
values(1, @VarcharEngString, @NVarcharEngString, @NVarcharChnString)
--/*Below three string all can not encrypt and decrypt correctly*/
--length: 118
set @VarcharEngString='Based on NCSA Mosaic. NCSA Mosaic(TM); was developed at the National Center for Supercomputing Applications at the Uni'
--length: 59
set @NVarcharEngString='Based on NCSA Mosaic. NCSA Mosaic(TM); was developed at thi'
--length: 59
set @NVarcharChnString='改进产品以满足用户不断增长的需求，所以不应将这些信息视为腾腾讯公司的承诺，另一方面，腾讯公司也不能保证在发布日期之后提'
--/*******************/
insert into SourceStringTable(ID, VarcharEngString, NVarcharEngString, NVarcharChnString)
values(2, @VarcharEngString, @NVarcharEngString, @NVarcharChnString)
select * from SourceStringTable
-----------------------------------------------------------------------
CREATE TABLE [dbo].[Customer](
[CustomerID] [int] NULL,
[Name] [varchar](50) COLLATE Chinese_PRC_CI_AS NULL,
[City] [varchar](50) COLLATE Chinese_PRC_CI_AS NULL,
[CreditCardType] [varbinary](max) NULL,
[CreditCardNumber] [varbinary](max) NULL,
[Notes] [varbinary](max) NULL,
[Descr] [varchar](max) COLLATE Chinese_PRC_CI_AS NULL
) ON [PRIMARY]
--Create a DB master key
CREATE MASTER KEY ENCRYPTION BY PASSWORD = 'abcd1234';
--Create a Certificate
CREATE CERTIFICATE User2Certificate
AUTHORIZATION ODMSDB_User_Name
---this parameter should change to your DB user name
WITH SUBJECT = 'DB testing',
START_DATE = '10/31/2007',
EXPIRY_DATE = '10/31/2017';
--delete all data in this table
delete from Customer
-------------CustomerID=12. this row CAN decrypt correctly----------------------------------------------------
declare @VarcharEngString varchar(max)
declare @NVarcharEngString nvarchar(max)
declare @NVarcharChnString nvarchar(max)
select @VarcharEngString=VarcharEngString,
@NVarcharEngString=NVarcharEngString,
@NVarcharChnString=NVarcharChnString
from SourceStringTable where ID=1
--print @VarcharEngString
--print @NVarcharEngString
--print @NVarcharChnString
INSERT INTO Customer
VALUES (12, 'John Doe', 'Fairbanks',
EncryptByCert(Cert_ID('User2Certificate'), @VarcharEngString),
EncryptByCert(Cert_ID('User2Certificate'), @NVarcharEngString),
EncryptByCert(Cert_ID('User2Certificate'), @NVarcharChnString),
'Description for test')
select * from Customer where CustomerID=12
SELECT CustomerID, Name, City,
CONVERT(VARCHAR(max), DecryptByCert(Cert_ID('User2Certificate'), CreditCardType) ) as CreditCardType,
CONVERT(NVARCHAR(max), DecryptByCert(Cert_ID('User2Certificate'), CreditCardNumber)) as CreditCardNumber,
CONVERT(NVARCHAR(max), DecryptByCert(Cert_ID('User2Certificate'), Notes) ) as Notes,
FROM Customer WHERE CustomerID = 12
-------------CustomerID=13, this row CAN NOT decrypt correctly----------------------------------------------------
declare @VarcharEngString2 varchar(max)
declare @NVarcharEngString2 nvarchar(max)
declare @NVarcharChnString2 nvarchar(max)
select @VarcharEngString2=VarcharEngString,
@NVarcharEngString2=NVarcharEngString,
@NVarcharChnString2=NVarcharChnString
from SourceStringTable where ID=2
INSERT INTO Customer
VALUES (13, 'John Doe', 'Fairbanks',
EncryptByCert(Cert_ID('User2Certificate'), @VarcharEngString2),
EncryptByCert(Cert_ID('User2Certificate'), @NVarcharEngString2),
EncryptByCert(Cert_ID('User2Certificate'), @NVarcharChnString2),
'Description for test')
SELECT CustomerID, Name, City,
CONVERT(VARCHAR(max), DecryptByCert(Cert_ID('User2Certificate'), CreditCardType) ) as CreditCardType,
CONVERT(NVARCHAR(max), DecryptByCert(Cert_ID('User2Certificate'), CreditCardNumber)) as CreditCardNumber,
CONVERT(NVARCHAR(max), DecryptByCert(Cert_ID('User2Certificate'), Notes) ) as Notes,
FROM Customer WHERE CustomerID = 13
select * from Customer where CustomerID=13
--my question is: Each input parameter of the method EncryptByCert's maximal length when input value under the data type of varchar/nvarchar(english or chinese string)
客户转发回来咨询MS的内容如下:
I just confirmed that the max length of EncryptByCert(&,str) parameter str is 8000 bytes, which is the max length for a varchar/char/nvarchar/nchar data type. I understand that we can specify &max& such as &varchar(max)& so that the varchar data type can have length of 2^31-1 bytes, but in EncryptBycert() function the max length is 8000. I am sorry I did not find any public document that clearly state this.&By the way the return value of this function also has a &maximum size of 8,000 bytes.&但跟我实际测试的结果不相符,真YM我在网上根本找不到与之相关的问题和知识,google或百度搜到的相关关键字只有几个
* 以上用户言论只代表其个人观点，不代表CSDN网站的观点或立场
访问：67265次
积分：1041
积分：1041
排名：第17680名
原创：40篇
转载：10篇
评论：27条
(1)(1)(2)(2)(2)(1)(2)(6)(1)(3)(3)(2)(6)(15)(2)(1)用C#代码写一个数据库导入系统，只是将excel表导入到SQL2008数据库中
[问题点数：60分，结帖人zhangjie]
用C#代码写一个数据库导入系统，只是将excel表导入到SQL2008数据库中
[问题点数：60分，结帖人zhangjie]
不显示删除回复
显示所有回复
显示星级回复
显示得分回复
只显示楼主
相关帖子推荐：
匿名用户不能发表回复！|
每天回帖即可获得10分可用分！小技巧：
你还可以输入10000个字符
(Ctrl+Enter)
请遵守CSDN，不得违反国家法律法规。
转载文章请注明出自“CSDN（www.csdn.net）”。如是商业用途请联系原作者。