sqlserver数据导入mysql八: 把sqlserver中的存储过程注释后创建
欢迎进入Windows社区论坛,与300万技术人员互动交流 >>进入 把sqlserver中的存储过程注释后创建到mysql中 #!/usr/bin/perl use DBI; use Switch; use Encode; use Encode::CN; my $source_name = "sqldb"; my $source_user_name = "sa"; my $source_user_psd
欢迎进入Windows社区论坛,与300万技术人员互动交流 >>进入
把sqlserver中的存储过程注释后创建到mysql中
#!/usr/bin/perl
use DBI;
use Switch;
use Encode;
use Encode::CN;
my $source_name = "sqldb";
my $source_user_name = "sa";
my $source_user_psd = "123";
my $db_name="mysqldb";
my $location="192.168.0.208";
my $port="3306";
my $db_user="zoe";
my $db_pass="123";
my $dbh=DBI->connect("dbi:ODBC:$source_name",$source_user_name,$source_user_psd);
#获取所有的用户表
my $sth=$dbh->prepare("select name from sys.objects where type='P'");
$sth->execute();
my $n=0;
my $ok=0;
my $sort_column="";
while (@data=$sth->fetchrow_array())
{
#print $data[0];
print '正在查询表'.$data[0]."的存储过程\n";
my $sql_create="EXEC Sp_HelpText '$data[0]'";
my $dbh_mssql=DBI->connect("dbi:ODBC:$source_name",$source_user_name,$source_user_psd,{RaiseError =>1});
$dbh_mssql->{LongTruncOk}=1;
$dbh_mssql->{LongReadLen}=1048576;
my $sth_select=$dbh_mssql->prepare($sql_create);
$sth_select->execute() or die 'Cannot execute: '. $sth_select->errstr();
my $select_col;
my $select_data;
while($select_data=$sth_select->fetchrow_array())
{
$select_col.=$select_data;
}
do_sql($data[0],$select_col);
}
$sth->finish;
$dbh ->disconnect;
print '所有表的存储过程创建结束'."\n";
sub do_sql
{
print '开始创建'.$_[0].'表的存储过程'."\n";
my $sql=$_[1];
open(FILE,"》createtableallproduce.txt");
syswrite(FILE,"$n\n");
syswrite(FILE,"$data[0]\n");
syswrite(FILE,"$sql\n");
close(FILE);
$sql=~s/\/\*/------注释开始--------/g;
$sql=~s/\*\//------注释结束--------/g;
$sql='CREATE PROCEDURE '.$_[0].'()'." \n".' BEGIN '."\n".' /* '.$sql.'*/'."\n".'END; ';
my $data_base = "DBI:mysql:$db_name:$location:$port";
my $dbh3=DBI -> connect($data_base,$db_user,$db_pass);
$dbh3->do("SET character_set_client = 'utf8'");
$dbh3->do("SET character_set_connection = 'utf8'");
my $data_str=encode("utf-8",decode("gbk",$sql));
my $sth=$dbh3->prepare($sql);
open(FILE,"》myproduce.txt");
syswrite(FILE,"$n\n");
syswrite(FILE,"$data[0]\n");
syswrite(FILE,"$sql\n");
close(FILE);
$sth->execute() or die "$data_str----ERROR::$data_str::$dbh3->errstr";
$dbh3->disconnect;
print '创建'.$_[0].'表的存储过程结束'."\n";
}

熱AI工具

Undresser.AI Undress
人工智慧驅動的應用程序,用於創建逼真的裸體照片

AI Clothes Remover
用於從照片中去除衣服的線上人工智慧工具。

Undress AI Tool
免費脫衣圖片

Clothoff.io
AI脫衣器

AI Hentai Generator
免費產生 AI 無盡。

熱門文章

熱工具

記事本++7.3.1
好用且免費的程式碼編輯器

SublimeText3漢化版
中文版,非常好用

禪工作室 13.0.1
強大的PHP整合開發環境

Dreamweaver CS6
視覺化網頁開發工具

SublimeText3 Mac版
神級程式碼編輯軟體(SublimeText3)

熱門話題

MySQL是一個開源的關係型數據庫管理系統。 1)創建數據庫和表:使用CREATEDATABASE和CREATETABLE命令。 2)基本操作:INSERT、UPDATE、DELETE和SELECT。 3)高級操作:JOIN、子查詢和事務處理。 4)調試技巧:檢查語法、數據類型和權限。 5)優化建議:使用索引、避免SELECT*和使用事務。

可以通過以下步驟打開 phpMyAdmin:1. 登錄網站控制面板;2. 找到並點擊 phpMyAdmin 圖標;3. 輸入 MySQL 憑據;4. 點擊 "登錄"。

MySQL是一種開源的關係型數據庫管理系統,主要用於快速、可靠地存儲和檢索數據。其工作原理包括客戶端請求、查詢解析、執行查詢和返回結果。使用示例包括創建表、插入和查詢數據,以及高級功能如JOIN操作。常見錯誤涉及SQL語法、數據類型和權限問題,優化建議包括使用索引、優化查詢和分錶分區。

選擇MySQL的原因是其性能、可靠性、易用性和社區支持。 1.MySQL提供高效的數據存儲和檢索功能,支持多種數據類型和高級查詢操作。 2.採用客戶端-服務器架構和多種存儲引擎,支持事務和查詢優化。 3.易於使用,支持多種操作系統和編程語言。 4.擁有強大的社區支持,提供豐富的資源和解決方案。

Redis 使用單線程架構,以提供高性能、簡單性和一致性。它利用 I/O 多路復用、事件循環、非阻塞 I/O 和共享內存來提高並發性,但同時存在並發性受限、單點故障和不適合寫密集型工作負載的局限性。

MySQL和SQL是開發者必備技能。 1.MySQL是開源的關係型數據庫管理系統,SQL是用於管理和操作數據庫的標準語言。 2.MySQL通過高效的數據存儲和檢索功能支持多種存儲引擎,SQL通過簡單語句完成複雜數據操作。 3.使用示例包括基本查詢和高級查詢,如按條件過濾和排序。 4.常見錯誤包括語法錯誤和性能問題,可通過檢查SQL語句和使用EXPLAIN命令優化。 5.性能優化技巧包括使用索引、避免全表掃描、優化JOIN操作和提升代碼可讀性。

直接從數據庫中恢復被刪除的行通常是不可能的,除非有備份或事務回滾機制。關鍵點:事務回滾:在事務未提交前執行ROLLBACK可恢復數據。備份:定期備份數據庫可用於快速恢復數據。數據庫快照:可創建數據庫只讀副本,在數據誤刪後恢復數據。慎用DELETE語句:仔細檢查條件,避免誤刪數據。使用WHERE子句:明確指定要刪除的數據。使用測試環境:在執行DELETE操作前進行測試。

MySQL在數據庫和編程中的地位非常重要,它是一個開源的關係型數據庫管理系統,廣泛應用於各種應用場景。 1)MySQL提供高效的數據存儲、組織和檢索功能,支持Web、移動和企業級系統。 2)它使用客戶端-服務器架構,支持多種存儲引擎和索引優化。 3)基本用法包括創建表和插入數據,高級用法涉及多表JOIN和復雜查詢。 4)常見問題如SQL語法錯誤和性能問題可以通過EXPLAIN命令和慢查詢日誌調試。 5)性能優化方法包括合理使用索引、優化查詢和使用緩存,最佳實踐包括使用事務和PreparedStatemen
