第一个问题，存储数据：
成都创新互联是专业的银海网站建设公司，银海接单;提供网站设计、成都做网站,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行银海网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!
使用SqlCommand（如果是Sql的）：
Using
cmd
As
New
SqlCommand()
cmd.Connection
=
new
SqlConnection("server=.;database=数据库名;integrated
security=sspi")
cmd.Connection.Open()
cmd.CommandText=string.Format("Insert
into
表名字
Values('{0}','{1}'",您的第一个字符串变量，第二个字符串变量【如果是数值类型的，不要在索引前加单引号了】)
cmd.NonExecuteQuery();
'获取数据
SqlDataAdapter
adapter
=
new
SqlDataAdapter(cmd);
cmd.CommandText="select
*
from
表"
DataTable
dt
=
new
DataTable()
adapter.Fill(dt)
DataGridView.DataSource
=
dt
End
Using
你的语句并没有完全贴出来？
要注意区别：
1，如果是插入完整的一条记录（包括所有字段）
INSERT
INTO
表名称
VALUES
(值1,
值2,....)
2，如果插入只包含若干个指定字段（其余字段为空）
INSERT
INTO
table_name
(列1,
列2,...)
VALUES
(值1,
值2,....)
另外，你使用了变量，那么应该这样使用：
"insert
into
Personal_table
('"
Name_CH
"',
......
后面看不出了，
其实，你可以在这句之前，加一句输出，看看具体内容，你就知道了！
msgbox()在括号里把你的这个字符串放进去，看看结果是什么？
现在工程里添加引用Microsoft.Office.Interop.Excel，然后可以使用如下代码输出。
Dim oXl As Excel.Application = New Excel.Application()
Dim oWb As Excel.Workbook
Dim oWs As Excel.Worksheet
On Error GoTo Morn
oWb = oXl.Workbooks.Add()
oWs = oWb.Worksheets(1)
With oWs
.Cells._Default(1, 1).Value ="a"
.Cells._Default(1, 2).Value ="b"
.Cells._Default(1, 3).Value ="c"
.Cells._Default(1, 4).Value ="d"
.Cells._Default(2, 1).Value ="32"
.Cells._Default(2, 2).Value ="1"
.Cells._Default(2, 3).Value ="90"
.Cells._Default(2, 4).Value ="合格"
End With
oWs.Parent.Names.Add("CostRange", "=" "A1:B39")
oWs.SaveAs(sFileName)
System.Windows.Forms.Cursor.Current = System.Windows.Forms.Cursors.Default
If MsgBox("已将数据输出到Excel文件中！ 现在打开该文件?", MsgBoxStyle.Question + MsgBoxStyle.YesNo, "已完成") = MsgBoxResult.No Then
oXl.Quit()
Else
oXl.Visible = True
End If
oXl = Nothing
oWs = Nothing
oWb = Nothing
报的错是什么？
或者，输出一下，你的str。
Response.Write(str)
Response.End()
