大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
都是用SQL语句完成的
成都创新互联长期为1000多家客户提供的网站建设服务,团队从业经验10年,关注不同地域、不同群体,并针对不同对象提供差异化的产品和服务;打造开放共赢平台,与合作伙伴共同营造健康的互联网生态环境。为南雄企业提供专业的网站建设、网站制作,南雄网站改版等技术服务。拥有十余年丰富建站经验和众多成功案例,为您定制开发。
写入数据库
strSQL="INTO TABLENAME (OPTION1,OPTIN2)VALUES(VALUE1,VALUE2)";
cmd.Connection = conn;
cmd.CommandText = strSQL;
cmd.Parameters.Add(paramrs[i]);
try
{
conn.Open();
}
catch(Exception ex)
{
throw ex;
}
finally
{
cmd.Parameters.Clear();
cmd.CommandText = null;
cmd.Dispose();
conn.Close();
}
读取值
strSQL ="SELECT OPTION1,OPTION2 FROM TABLENAME";
cmd.CommandText = strSQL;
cmd.Connection = conn;
DataSet ds = new DataSet();
try
{
conn.Open();
SqlDataAdapter da = new SqlDataAdapter(cmd);
da.Fill(ds);
}
catch (Exception ex)
{
throw ex;
}
finally
{
cmd.Dispose();
conn.Close();
}
TextBox2.text = ds.Tables[0].rows[0][0].value.tostring();
保存文件的步骤为:
关闭流,特别是写入流
关闭并保存文件
示例代码如下:
Imports System.Windows.Forms
Imports System.IO
Imports System.Text
Sub SaveFileDemo()
'打开文件。如果文件不存在则创建新的文件
Dim myFile As New IO.FileStream("d:\data.txt", _
FileMode.OpenOrCreate, _
FileAccess.Write)
'在文件末尾添加一行
Dim tw As New StreamWriter(myFile)
myFile.Seek(0, SeekOrigin.End)
tw.WriteLine("白刃格斗英雄连英模部队方队亮相阅兵")
'关闭流
tw.Close()
'关闭文件并保存文件
myFile.Close()
End Sub
窗体上建立BUTTON1和TEXTBOX1
代码如下
100%正确,刚刚写的,调试好了
Imports System.io
Public Class form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim fs As New FileStream("d:\文本.txt", FileMode.Create, FileAccess.Write)
Dim r As New StreamWriter(fs)
Dim I As Integer
r.Write(TextBox1.Lines(I))
r.Flush()
r.Close()
End Sub
End Class
路径自己修改
(你的给分是我回答的动力)
VB可以用任何格式保存文件数据不仅仅是注册表\XML\INI
甚至于未知的格式。我教你命令:
open "C:\setup.safe" for output as #1
print #1,"object"
close #1
其中setup.safe就是一个文件,后缀为.safe,当然可以改成.dat包括其他任何后缀.
object就是你要写入setup.safe的内容.